[Wisp-cvs] wisp/users/dig i8080.tran,1.2,1.3

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

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

Modified Files:
	i8080.tran 
Log Message:
implemented |$rst int|

Index: i8080.tran
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/i8080.tran,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- i8080.tran	19 May 2003 09:08:41 -0000	1.2
+++ i8080.tran	19 May 2003 09:20:47 -0000	1.3
@@ -22,4 +22,6 @@
 :[ %sp lit ] $mov #x31 b, w, drop ;
 :[ reg8 lit ] $mov swap minor 8 * #o006 + b, b, ;
 
+:[ int ] $rst 8 * #o307 + b, ;
+
 \ vim: ft=tran