X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcmd%2FAND%2Fand1.casl;h=5c348f7541f5dff96ac8da86473e34e2eee2177c;hb=b0f981469cdea23225ca5c3ef0ca6759d6a92b43;hp=abec8edd38b62b4d777deba25af20f8d38a9d974;hpb=93cd1261d2f4247c3324a2bcb69dc4a077a4aa77;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