[Win32forth-cvs] win32forth/src 486ASM.F, 1.6, 1.7 Class.f, 1.35, 1.36

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth/src
In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv23726

Modified Files:
	486ASM.F Class.f 
Log Message:
Fixed jecxz to use ECX not CX (i.e. 16 bit) register.

Index: Class.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Class.f,v
retrieving revision 1.35
retrieving revision 1.36
diff -C2 -d -r1.35 -r1.36
*** Class.f	15 May 2010 21:09:14 -0000	1.35
--- Class.f	6 Aug 2010 20:03:27 -0000	1.36
***************
*** 654,658 ****
                  if      dup find                        \ if its defined
                          if      dup @ doCon =           \ and a constant
!                                 if      nip execute     \ then user its value
                                  else    drop >selector  \ else get selector
                                  then
--- 654,658 ----
                  if      dup find                        \ if its defined
                          if      dup @ doCon =           \ and a constant
!                                 if      nip execute     \ then use its value
                                  else    drop >selector  \ else get selector
                                  then

Index: 486ASM.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/486ASM.F,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** 486ASM.F	15 May 2008 04:28:26 -0000	1.6
--- 486ASM.F	6 Aug 2010 20:03:27 -0000	1.7
***************
*** 1892,1898 ****
                                              72 '      jcc-compile opcode jc
       76 '      jcc-compile opcode jbe       \ ' jbe      alias jna
!                                             76 '      jcc-compile opcode jna
!     0e3 '     jcxz-compile opcode jcxz      \ ' jcxz     alias jecxz
!                                             0e3 '     jcxz-compile opcode jecxz
       74 '      jcc-compile opcode je        \ ' je       alias jz
                                              74 '      jcc-compile opcode jz
--- 1892,1898 ----
                                              72 '      jcc-compile opcode jc
       76 '      jcc-compile opcode jbe       \ ' jbe      alias jna
!      76 '      jcc-compile opcode jna
!     0e3 '     jcxz-compile opcode jcxz
!     0e3 '    jecxz-compile opcode jecxz     \ DO NOT MAKE an alias of jcxz.
       74 '      jcc-compile opcode je        \ ' je       alias jz
                                              74 '      jcc-compile opcode jz