Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28909/src
Modified Files:
Class.f Comment.f Utils.f imageman.f
Log Message:
arm: redefine ?loading in terms of source-id; correct ?winerror and remove call to save-input
Index: Utils.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Utils.f,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Utils.f 12 Mar 2005 09:09:57 -0000 1.2
--- Utils.f 13 Apr 2005 00:09:26 -0000 1.3
***************
*** 715,719 ****
: _stack-check ( -- )
! ?loading @ 0= \ if we are not loading
state @ or \ or we are in compile state,
\ then don't check stack depth change
--- 715,719 ----
: _stack-check ( -- )
! ?loading 0= \ if we are not loading
state @ or \ or we are in compile state,
\ then don't check stack depth change
***************
*** 1064,1066 ****
- |
