X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcmd%2FAND%2Fand1.casl;h=5c348f7541f5dff96ac8da86473e34e2eee2177c;hb=1581cd076b7917f7687a105093c1c04e18e400e7;hp=abec8edd38b62b4d777deba25af20f8d38a9d974;hpb=2ef92a7c1a848fbe897ac6e14f73fd6dbeef8c84;p=YACASL2.git

diff --git a/as/cmd/AND/and1.casl b/as/cmd/AND/and1.casl
index abec8ed..5c348f7 100644
--- a/as/cmd/AND/and1.casl
+++ b/as/cmd/AND/and1.casl
@@ -1,7 +1,8 @@
-;;; AND r,adr
+;;; AND r,adr,x
 MAIN    START
         LD      GR1,A
-        AND     GR1,1,A
+        LAD     GR2,1
+        AND     GR1,A,GR2
         RET
 A       DC      #3000
         DC      #4FFF