steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

windows.fonts: call reset-memoized for windows-fonts on startup

char-rename
Alexander Iljin 2016-07-25 19:29:25 +03:00 committed by John Benediktsson
parent 858c9b3a96
commit 4f74f5bd69
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/windows/fonts/fonts.factor
View File

@ -39,7 +39,10 @@ MEMO:: (cache-font) ( name size bold? italic? -- HFONT )
{ [ name>> ] [ size>> ] [ bold?>> ] [ italic?>> ] } cleave
(cache-font) ;
[ \ (cache-font) reset-memoized ] "windows.fonts" add-startup-hook
[
\ (cache-font) reset-memoized
\ windows-fonts reset-memoized
] "windows.fonts" add-startup-hook
: TEXTMETRIC>metrics ( TEXTMETRIC -- metrics )
[ metrics new 0 >>width ] dip {