X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcmd%2FAND%2Fand1.casl;h=abec8edd38b62b4d777deba25af20f8d38a9d974;hp=d41a1d838376e7a9e7c31e5155274d89ab74d28e;hb=79c9b16dc33c688a93d47bd52e558e54fb875331;hpb=4fe8479d27f535a0ff44c9f6ce270249934e980f

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