[Win32forth-cvs] win32forth/apps/Setup Setup.f,1.10,1.11

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth/apps/Setup
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv8301/win32forth/apps/Setup

Modified Files:
	Setup.f 
Log Message:
gah:Added ACTION-OF (per F200X) and made DEFER@ a (temporary) deprecated synonym. Replaced defer@ by action-of (accept in 486asm). Added DEFER!. Support for extension queries (partial) added to environment.f

Index: Setup.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Setup/Setup.f,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** Setup.f	23 Jul 2006 09:29:50 -0000	1.10
--- Setup.f	28 Sep 2006 10:16:47 -0000	1.11
***************
*** 72,76 ****
  : setup-bye     ( -- )
          &CB-BYE @ &noop &CB-BYE !  \ make BYE a noop; so that destroying the console
!         defer@ bye ['] noop is bye \ window will not terminate the setup
          _conHndl call DestroyWindow drop \ destroy the console window
          regsett count s" console" setsetting \ restore console window size in registry
--- 72,76 ----
  : setup-bye     ( -- )
          &CB-BYE @ &noop &CB-BYE !  \ make BYE a noop; so that destroying the console
!         action-of bye ['] noop is bye \ window will not terminate the setup
          _conHndl call DestroyWindow drop \ destroy the console window
          regsett count s" console" setsetting \ restore console window size in registry