テストがMacやCygwinなどでも成功するように変更
[YACASL2.git] / as / cmd / AND / and1.casl
index 91ea8cf..5c348f7 100644 (file)
@@ -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