From: Dirk B. <db...@us...> - 2005-04-18 17:40:03
|
Update of /cvsroot/win32forth/win32forth/apps/WinEd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10915/apps/WinEd Modified Files: Ed_Globals.F Ed_Keys.F WinEd.f Log Message: zEXEC rewritten (see Shell.f), made DEPRECATED work for class members,SF[1178189] fixed, SF[1178189] fixed, SF[1178186] fixed, SF[1167791] fixed, SF[774094] fixed; and some other small changes I can't remebere any more Index: WinEd.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/apps/WinEd/WinEd.f,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** WinEd.f 12 Mar 2005 09:29:20 -0000 1.3 --- WinEd.f 18 Apr 2005 17:39:22 -0000 1.4 *************** *** 88,92 **** FALSE to browse? 0 to left-margin ! NT? Win98? or to using98/NT? 0 to right-edge false to edit-changed? --- 88,93 ---- FALSE to browse? 0 to left-margin ! WinVer 4 >= ( NT? ) ! winver 2 3 between ( Win98? ) or to using98/NT? 0 to right-edge false to edit-changed? Index: Ed_Globals.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/apps/WinEd/Ed_Globals.F,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Ed_Globals.F 12 Mar 2005 09:29:20 -0000 1.1 --- Ed_Globals.F 18 Apr 2005 17:39:22 -0000 1.2 *************** *** 110,114 **** THEN ; ! : WaitForConsole { / ?deadlook -- } \ wait until console is ready to accept char's \ return's after 10 seconds even when the console is not ready 0 to ?deadlook --- 110,114 ---- THEN ; ! : WaitForConsole { \ ?deadlook -- } \ wait until console is ready to accept char's \ return's after 10 seconds even when the console is not ready 0 to ?deadlook *************** *** 125,130 **** file$ ?+\ s" Win32For.exe" file$ +place ! file$ +NULL ! file$ 1+ zEXEC \ wait untill Forth is loaded --- 125,129 ---- file$ ?+\ s" Win32For.exe" file$ +place ! file$ EXEC-CMD drop \ wait untill Forth is loaded *************** *** 140,141 **** --- 139,141 ---- + |