Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31151/win32forth/src
Modified Files:
FONTS.F
Log Message:
gah: Added create: method which doesn't return a flag (as the original)
Index: FONTS.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/FONTS.F,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** FONTS.F 1 Nov 2005 12:21:40 -0000 1.6
--- FONTS.F 17 Feb 2006 11:54:57 -0000 1.7
***************
*** 29,32 ****
--- 29,34 ----
:M PitchAndFamily: ( n1 -- ) SetPitchAndFamily: super ;M
+ :M Create: ( n1 -- ) Create: super drop ;M
+
:M Delete: ( -- )
Destroy: super ;M
|