The Lambda Lab / projects / jars.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: d040fca)
Fixed typo in SPL action.
authorplugd <plugd@thelambdalab.xyz>
Mon, 11 May 2020 13:15:45 +0000 (15:15 +0200)
committerplugd <plugd@thelambdalab.xyz>
Mon, 11 May 2020 13:16:07 +0000 (15:16 +0200)
Bug still remains, however.

mars.scm patch | blob | history

diff --git a/mars.scm b/mars.scm
index e97d2ba..677d754 100644 (file)
--- a/mars.scm
+++ b/mars.scm
@@ -283,7 +283,7 @@
         ((SLT)
          (list (core '->addr (+ ptr (if (compare-instrs core A-ptr B-ptr modifier <) 2 1)))))
         ((SPL)
         ((SLT)
          (list (core '->addr (+ ptr (if (compare-instrs core A-ptr B-ptr modifier <) 2 1)))))
         ((SPL)
-         (list (core '->addr (+ ptr 1) (core '->addr A-ptr))))
+         (list (core '->addr (+ ptr 1)) (core '->addr A-ptr)))
         ((NOP)
          (list (core '->addr (+ ptr 1))))
         (else
         ((NOP)
          (list (core '->addr (+ ptr 1))))
         (else
The JAnky Redcode Simulator