[Win32forth-cvs] win32forth/src 486ASM.F, 1.8, 1.9 ENVIRON.F, 1.7, 1.8 Extend.f, 1.25, 1.26

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

Update of /cvsroot/win32forth/win32forth/src
In directory vz-cvs-4.sog:/tmp/cvs-serv32628

Modified Files:
	486ASM.F ENVIRON.F Extend.f 
Log Message:
Fixed CMPXCHG bug as per Alex. Changes for 200X structures (part 1).

Index: ENVIRON.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/ENVIRON.F,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** ENVIRON.F	25 Jun 2008 18:48:22 -0000	1.7
--- ENVIRON.F	31 Mar 2011 08:08:38 -0000	1.8
***************
*** 69,73 ****
                              : X:REQUIRED        ;
                              : X:DEFERRED        ;
! \                            : X:PARSE-NAME      ; \ Not yet
  \                            : X:EKEYS           ; \ Not sure
  
--- 69,76 ----
                              : X:REQUIRED        ;
                              : X:DEFERRED        ;
!                             : X:PARSE-NAME      ;
!                             : X:NUMBER-PREFIX   ;
! LOADED? SRC\STRUCT200X.F    [IF]
!                             : X:STRUCTURES      ;   [THEN]
  \                            : X:EKEYS           ; \ Not sure
  

Index: Extend.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Extend.f,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** Extend.f	16 Jan 2010 14:11:05 -0000	1.25
--- Extend.f	31 Mar 2011 08:08:38 -0000	1.26
***************
*** 45,48 ****
--- 45,49 ----
      FLOAD src\mapfile.f          \ Windows32 file into memory mapping words
  sys-FLOAD src\environ.f          \ environment? support
+ \    FLOAD src\struct200X.f       \ 200X structure words
  
      FLOAD src\utils.f            \ load other misc utility words

Index: 486ASM.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/486ASM.F,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** 486ASM.F	7 Aug 2010 21:16:27 -0000	1.8
--- 486ASM.F	31 Mar 2011 08:08:38 -0000	1.9
***************
*** 1776,1780 ****
    04f0f '       bs-compile opcode cmovnle
    04f0f '       bs-compile opcode cmovg
!     0bc ' xchg&alu-compile opcode cmpxchg
        0 '   cmpxchg8b-comp opcode cmpxchg8b
    0a20f '            2byte opcode cpuid
--- 1776,1780 ----
    04f0f '       bs-compile opcode cmovnle
    04f0f '       bs-compile opcode cmovg
!     0b0 ' xchg&alu-compile opcode cmpxchg
        0 '   cmpxchg8b-comp opcode cmpxchg8b
    0a20f '            2byte opcode cpuid