X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcmd%2FSLA%2Fsla_s.casl;h=2366bf027f59ca67dce1215ee6d2f125c237b979;hb=1fcf1d06bc3b36ca8f768d1fe75fc281e33407e6;hp=440cacc9e09dac7ab7d45461112aa61123b56c15;hpb=79c9b16dc33c688a93d47bd52e558e54fb875331;p=YACASL2.git

diff --git a/as/cmd/SLA/sla_s.casl b/as/cmd/SLA/sla_s.casl
index 440cacc..2366bf0 100644
--- a/as/cmd/SLA/sla_s.casl
+++ b/as/cmd/SLA/sla_s.casl
@@ -1,5 +1,6 @@
+;;; SLA r,adr 負数
 SLA2    START   BEGIN
-BEGIN   LAD     GR1,#8000
-        SLA     GR1,1
+BEGIN   LAD     GR1,#8003
+        SLA     GR1,13
         RET
         END