シフト演算に関するCASLコードを追加

[YACASL2.git] / as / cmd / SRL / srl.casl

diff --git a/as/cmd/SRA/sra_so.casl b/as/cmd/SRL/srl.casl
similarity index 63%
rename from as/cmd/SRA/sra_so.casl
rename to as/cmd/SRL/srl.casl
index d5aee00..5170cf0 100644 (file)
--- a/as/cmd/SRA/sra_so.casl
+++ b/as/cmd/SRL/srl.casl
@@ -1,5 +1,6 @@
+;;; SRL r,adr
 MAIN    START
         LAD     GR1,#C000
-        SLA     GR1,1
+        SRL     GR1,14
         RET
         END