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

diff --git a/as/cmd/AND/and1.casl b/as/cmd/AND/and1.casl
index 91ea8cf..5c348f7 100644
--- a/as/cmd/AND/and1.casl
+++ b/as/cmd/AND/and1.casl
@@ -1,9 +1,9 @@
-;;; AND r1,r2
+;;; AND r,adr,x
 MAIN    START
         LD      GR1,A
-        LD      GR2,B
-        AND     GR1,GR2
+        LAD     GR2,1
+        AND     GR1,A,GR2
         RET
 A       DC      #3000
-B       DC      #4FFF
+        DC      #4FFF
         END