Update of /cvsroot/win32forth/win32forth-610old/src
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv18551/win32forth-610old/src
Modified Files:
Primutil.f
Log Message:
gah:Moved RADIX: to application space so words defined with it work in turnkeyed apps.
Index: Primutil.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth-610old/src/Primutil.f,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Primutil.f 14 Dec 2004 23:53:57 -0000 1.1
--- Primutil.f 5 Aug 2006 14:51:00 -0000 1.2
***************
*** 491,496 ****
\ BINARY double number display with commas
- in-system
-
: RADIX: ( n1 -<name>- )
CREATE , DOCOL , !CSP ]
--- 491,494 ----
***************
*** 498,503 ****
LCOUNT BASE ! EXECUTE \ run headerless definition
R> BASE ! ;
-
- in-application
2 RADIX: BUD,.R ( ud width -- ) UD,.R ;
--- 496,499 ----
***************
*** 591,595 ****
( -- hndl ) \ Win32Forths startup initialization
0 value
! handles-list link, ;
:noname ( -- ) \ chain for cleanup
--- 587,591 ----
( -- hndl ) \ Win32Forths startup initialization
0 value
! handles-list link, ;
:noname ( -- ) \ chain for cleanup
|
