From: Alex M. <ale...@us...> - 2005-06-02 21:15:05
|
Update of /cvsroot/win32forth/win32forth/apps/SciEdit In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23246/apps/SciEdit Modified Files: AnsLink.f ClassBrowser.f Log Message: arm: rename word str(nc)= to istr= (case insensitive compare) add id headers to assembler files modifications to disassembler to allow reassembley from generated text move LDP inline to system area correct comment in meta compiler Index: AnsLink.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/apps/SciEdit/AnsLink.f,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** AnsLink.f 21 Dec 2004 00:18:47 -0000 1.1 --- AnsLink.f 2 Jun 2005 21:14:54 -0000 1.2 *************** *** 394,398 **** if ANS-WORDS >r begin 2dup r@ count dup ! while STR(NC)= 0<> if 2drop r> exit then r> skip-string skip-string skip-string >r --- 394,398 ---- if ANS-WORDS >r begin 2dup r@ count dup ! while ISTR= 0<> if 2drop r> exit then r> skip-string skip-string skip-string >r *************** *** 417,419 **** module - |