OpenEuphoria

Re: OCR and fonts....Jiri or anyone else?

• Posted by Colin Taylor <cetaylor at COMPUSERVE.COM> May 15, 1999
• 531 views

Message text written by Norm:
>I am getting memory over-run problems when the program is opening and
closing so many character files (over 200 32X32-bit full font sets).  I a=
m
planning on converting this in the not-too-distant future to one enormo
bitmap file (as Jiri has so brilliantly outlined earlier to me) but for n=
ow
I have limp along with the multi sets of files.  I only open one of them =
at
a time, but does the routine also flush (dump and reset; garbage-collect;=

reclaim, whatever) out the old font set.  And if it doesn't, how can I
manually do this myself?<

Jiri hasn't provided a way to delete fonts, but here is a patch that will=

work:

        -- start code
        global procedure purge_fonts()
            select_font(1)
            fonts =3D {fonts[1]}
            widths =3D {widths[1]}
            heights =3D {heights[1]}
            bheights =3D {bheights[1]}
            names =3D {names[1]}
            params =3D {params[1]}
        end procedure  -- purge_fonts
        -- end code

Paste this into font.e (version 4.40) after the select_font() routine. =

This procedure will zap all loaded fonts except the default Rom font.  Ca=
ll
purge_fonts() just before loading each new font file.

Also, referring to your earlier post on OCR - I am quite interested heari=
ng
more on the topic, but I don't know if I can contribute anything useful t=
o
the discussion.

Colin Taylor