Update of /cvsroot/win32forth/win32for4web/downloads
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7769/win32for4web/downloads
Modified Files:
STRUCT.F
Log Message:
gah: modified vocabulary name to structs to match later versions of struct.f
Index: STRUCT.F
===================================================================
RCS file: /cvsroot/win32forth/win32for4web/downloads/STRUCT.F,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** STRUCT.F 12 Jun 2005 08:14:46 -0000 1.1
--- STRUCT.F 18 Jun 2005 12:56:06 -0000 1.2
***************
*** 30,36 ****
0 value _struct
! vocabulary allocation \ avoids conflicts. e.g. word
! also allocation definitions
code n+adr@ ( n adr - adr@+n ) \ was incorrect @+
--- 30,36 ----
0 value _struct
! vocabulary structs \ avoids conflicts. e.g. word
! also structs definitions
code n+adr@ ( n adr - adr@+n ) \ was incorrect @+
***************
*** 132,136 ****
: struct{ ( - )
! \in-system-ok also allocation
0 to _struct ;
--- 132,136 ----
: struct{ ( - )
! \in-system-ok also structs
0 to _struct ;
***************
*** 215,216 ****
--- 215,217 ----
\s
+ |
