From: Dirk B. <db...@us...> - 2005-03-12 09:10:09
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23015/src Modified Files: Primutil.f REGISTRY.F Utils.f imageman.f Log Message: dbu: DEPRECATED added Index: Utils.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/Utils.f,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Utils.f 21 Dec 2004 00:19:08 -0000 1.1 --- Utils.f 12 Mar 2005 09:09:57 -0000 1.2 *************** *** 712,716 **** \ add stack message increased ! THROW_MSGS LINK, -4103 , ," stack depth increased" : _stack-check ( -- ) --- 712,716 ---- \ add stack message increased ! THROW_MSGS LINK, -4103 ( WARN_STACK ) , ," stack depth increased" : _stack-check ( -- ) *************** *** 723,727 **** depth olddepth > \ if stack depth has increased if \ then warn of extra item on stack ! -4103 WARNMSG cr ." Stack: " .s cr then depth to olddepth ; --- 723,727 ---- depth olddepth > \ if stack depth has increased if \ then warn of extra item on stack ! -4103 ( WARN_STACK ) WARNMSG cr ." Stack: " .s cr then depth to olddepth ; *************** *** 1064,1065 **** --- 1064,1066 ---- + |