CLIM-EXTENSIONS:RECTANGULAR-TILE isn't providing BOUNDING-RECTANGLE*

[mgsouth]

Example program drawing-benchmark.lisp is dying when it tries to use glider as an ink:

There is no applicable method for the generic function
#<STANDARD-GENERIC-FUNCTION CLIM:BOUNDING-RECTANGLE* (22)>
when called with arguments
(#<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>).
[Condition of type SB-PCL::NO-APPLICABLE-METHOD-ERROR]

Restarts:
0: [RETRY] Retry calling the generic function.
1: [TRY-AGAIN] Try executing the command CLIM-DEMO::COM-RUN-DRAWING-BENCHMARK again.
2: [ABORT] Return to application command loop.
3: [ABORT] Return to application command loop.
4: [RETRY] Retry SLY mREPL evaluation request.
5: [*ABORT] Return to SLY's top level.
--more--

Backtrace:
0: ((:METHOD NO-APPLICABLE-METHOD (T)) #<STANDARD-GENERIC-FUNCTION CLIM:BOUNDING-RECTANGLE* (22)> #<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>) [fast-method]
1: (SB-PCL::CALL-NO-APPLICABLE-METHOD #<STANDARD-GENERIC-FUNCTION CLIM:BOUNDING-RECTANGLE* (22)> (#<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>))
2: ((:METHOD CLIM-CLX::DESIGN-GCONTEXT (CLIM-CLX:CLX-MEDIUM CLIM-EXTENSIONS:PATTERN)) #<CLIM-CLX:CLX-RENDER-MEDIUM {10108B87B3}> #<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>) [fast-method]
3: ((:METHOD CLIM-CLX::MEDIUM-GCONTEXT (CLIM-CLX:CLX-MEDIUM CLIM-EXTENSIONS:PATTERN)) #<CLIM-CLX:CLX-RENDER-MEDIUM {10108B87B3}> #<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>) [fast-method]
4: ((SB-PCL::EMF CLIM-CLX::MEDIUM-GCONTEXT) # # #<CLIM-CLX:CLX-RENDER-MEDIUM {10108B87B3}> #<CLIM-EXTENSIONS:RECTANGULAR-TILE {100705F793}>)
5: ((:METHOD CLIM:MEDIUM-DRAW-RECTANGLE* (CLIM-CLX:CLX-MEDIUM T T T T T)) #<CLIM-CLX:CLX-RENDER-MEDIUM {10108B87B3}> 10 10 568.0d0 289.6298828125d0 T) [fast-method]
6: ((:METHOD CLIM:MEDIUM-DRAW-RECTANGLE* :AROUND (CLIM-BACKEND:TRANSFORM-COORDINATES-MIXIN T T T T T)) #<CLIM-CLX:CLX-RENDER-MEDIUM {10108B87B3}> 10 10 568.0d0 289.6298828125d0 T) [fast-method]