CLIM mail archive
[Prev][Next][Index][Thread]

Re: CLIM 1.1 in MCL2.0: unbound slots in fonts

> can't you just write your own fns/methods to fill those things in when
> the fonts are created? I would...
> 
> or loop over all fonts and fill them in if they're already created...

I don't have a handle on the font. My text styles all come from global
parameters that have family, font, size, and index slots bound. But the
error is on a font object, not on a text style object. I call
clim:text-style-height and clim:text-style-width with the text style,
and get an error on a font object that I did not provide.  Seems like a
hack to have to fill in a bunch of slots on one platform in supposedly
portable software anyway ...

I tracked it down to inability to handle :sans-serif. If I don't use
this, fonts are initialized correctly. 

(trace clim:text-style-height)
NIL
? (bel)
 Calling (CLIM:TEXT-STYLE-HEIGHT
           #<TEXT-STYLE :FIX.:ROMAN.:NORMAL #x102F801>
           #<CORAL-WINDOW-STREAM-VIEW /x 100:400 y 100:300/ #x157ED69>) 
 CLIM:TEXT-STYLE-HEIGHT returned 12
... many calls ...
 Calling (CLIM:TEXT-STYLE-HEIGHT
           #<TEXT-STYLE :FIX.:ROMAN.:NORMAL #x102F801>
           #<CORAL-WINDOW-STREAM-VIEW /x 426:808 y 316:436/ #x156CA91>) 
 CLIM:TEXT-STYLE-HEIGHT returned 12
 Calling (CLIM:TEXT-STYLE-HEIGHT
           #<TEXT-STYLE :SANS-SERIF.:ROMAN.:NORMAL #x1332A61>
           #<CORAL-WINDOW-STREAM-VIEW /x 47:639 y 0:393/ #x1574511>) 
> Error: Slot CLIM::ASCENT is unbound in #<CLIM::FONT #x1552969>
> While executing: #<STANDARD-METHOD SLOT-UNBOUND (T T T)>

This is the first call involving :SANS-SERIF.

================================================================
Dan Suthers            	| Learning Research & Development Center
suthers+@pitt.edu      	| University of Pittsburgh
(412) 624-7036 voice	| 3939 O'Hara Street
(412) 624-9149 fax	| Pittsburgh, PA 15260
================================================================
Main Index | Thread Index