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
- |
