Execute Brain****: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,409: / Line 1,409: @@
                 target: last vstack
                 chop 'vstack
-                set jumphash target instrPointer
+                jumphash\[target]: instrPointer
-                set jumphash instrPointer target
+                jumphash\[instrPointer]: target
             ]
         ]
@@ Line 1,435: / Line 1,435: @@
         command: get split Code InstructionPointer
         case [command=]
-            when? ["+"] -> set Tape DataPointer (Tape \ DataPointer)+1
+            when? ["+"] -> Tape\[DataPointer]: Tape\[DataPointer]+1
-            when? ["-"] -> set Tape DataPointer (Tape \ DataPointer)-1
+            when? ["-"] -> Tape\[DataPointer]: Tape\[DataPointer]-1
             when? [">"] [
                 inc 'DataPointer
@@ Line 1,442: / Line 1,442: @@
             ]
             when? ["<"] -> dec 'DataPointer
-            when? ["."] -> prints to :string to :char Tape \ DataPointer
+            when? ["."] -> prints to :string to :char Tape\[DataPointer]
             when? [","][
                 inp: to :integer input ""