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

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

diff --git a/as/cmd/SRA/sra_ov.casl b/as/cmd/SRL/srl_z.casl
similarity index 56%
rename from as/cmd/SRA/sra_ov.casl
rename to as/cmd/SRL/srl_z.casl
index d5aee00..db11fb3 100644 (file)
--- a/as/cmd/SRA/sra_ov.casl
+++ b/as/cmd/SRL/srl_z.casl
@@ -1,5 +1,6 @@
+;;; SRL r,adr 結果は零
 MAIN    START
         LAD     GR1,#C000
-        SLA     GR1,1
+        SRL     GR1,17
         RET
         END