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

SIZE struct

db4
Doug Coleman 2009-08-29 17:08:25 -05:00
parent ccb20bd00e
commit 3ecb3a85db
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/windows/types/types.factor
View File

@ -287,9 +287,9 @@ C-STRUCT: POINT
{ "LONG" "x" } { "LONG" "x" }
{ "LONG" "y" } ; { "LONG" "y" } ;
C-STRUCT: SIZE STRUCT: SIZE
{ "LONG" "cx" } { cx LONG }
{ "LONG" "cy" } ; { cy LONG } ;
C-STRUCT: MSG C-STRUCT: MSG
{ "HWND" "hWnd" } { "HWND" "hWnd" }

2
basis/windows/uniscribe/uniscribe.factor
View File

@ -82,7 +82,7 @@ TUPLE: script-string < disposable font string metrics ssa size image ;
: script-string-size ( script-string -- dim ) : script-string-size ( script-string -- dim )
ssa>> ScriptString_pSize ssa>> ScriptString_pSize
dup win32-error=0/f dup win32-error=0/f
[ SIZE-cx ] [ SIZE-cy ] bi 2array ; [ cx>> ] [ cy>> ] bi 2array ;
: dc-metrics ( dc -- metrics ) : dc-metrics ( dc -- metrics )
TEXTMETRICW <struct> TEXTMETRICW <struct>