[Wisp-cvs] wisp/users/dig i8086.tran,1.5,1.6 ia32.tran,1.13,1.14

[<di...@us...>]

Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv32552

Modified Files:
	i8086.tran ia32.tran 
Log Message:
introduced the |pw,| word

Index: i8086.tran
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/i8086.tran,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- i8086.tran	17 May 2003 09:36:39 -0000	1.5
+++ i8086.tran	17 May 2003 09:47:27 -0000	1.6
@@ -26,5 +26,6 @@
 :[ reg32 lit ] $mov $o32 swap minor #o270 + b, t, ;
 
 :[ reg16/32 ] $push $osize minor #o120 + b, ;
+:[ lit      ] $push #x68 b, pw, ;
 
 \ vim: ft=tran

Index: ia32.tran
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/ia32.tran,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -d -r1.13 -r1.14
--- ia32.tran	17 May 2003 09:36:39 -0000	1.13
+++ ia32.tran	17 May 2003 09:47:28 -0000	1.14
@@ -16,9 +16,10 @@
 :[ reg32 ] $osize ;         \ or $o32
 :[ reg16 ] $osize #x66 b, ; \ or $o16
 
+:[ ] pw, t, ; \ Processor Word for ia32 is tetra
+
 \ These instructions are not completely operand width portable:
 
-:[ lit ] $push #x68 b, t, ;
 :[ lit ] $call #xe8 b, 4 - $-t, ;
 
 \ vim: ft=tran