Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv21538/win32forth/src
Modified Files:
POINTER.F
Log Message:
gah:Fixed bug where NEW$ was faulty until pointers were initialised
Index: POINTER.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/POINTER.F,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** POINTER.F 29 Aug 2005 15:56:27 -0000 1.4
--- POINTER.F 4 Aug 2006 09:48:43 -0000 1.5
***************
*** 162,165 ****
MAXSTRING DynAlloc ;
! ' _new$ is new$
--- 162,170 ----
MAXSTRING DynAlloc ;
! : init-new$ ( -- )
! ['] _new$ is new$ ;
!
! init-new$
!
! initialization-chain chain-add init-new$
|
