fish.rb 1.0.2 → 1.0.3

checksums.yaml

@@ -1,15 +1,15 @@
 ---
 !binary "U0hBMQ==":
   metadata.gz: !binary |-
-    MjhkODdkZWVjMjFlODExNGZiNmQ4Yjk4NzFkNmQ1N2I0NmNhZWI5Mw==
+    Yzg3YmIzOWQ3NTJhYzgzZGE1M2QxODMyYjUyZmExYmE4YTI1MWJjOQ==
   data.tar.gz: !binary |-
-    MzNlMWE0MGQzZGQzZWQ1OTg3MWRkODczYjM1MzM0MGViNTg4ZmVjMg==
+    OGYyZGVjZDdkMzQ5OGY4MGYyNmJjOWZjM2M2ODA4MDZlM2Q2MDBjMQ==
 SHA512:
   metadata.gz: !binary |-
-    ZmZiYWZlMGEzNDNhNWQxM2QxMmEzMmZkMDIxZTQyYTEzZDE4MzVhNmYzMWYw
-    ZTQyZTM4YzZlMjY2YjNlZDNlYjk1M2MzNzA4MDkwMzY2M2U3M2ZjYmNmZjMw
-    N2NkOTY1MDBhM2JmZTAxMjU3NGU3NWNjZjc0NTMzZGFjZTdhMDc=
+    NzJkMzQ4YTc3MjhmYjM5NGZjOGY2NjY1MGYyODIyYTBkZDQyOWI4Mzc4MzQz
+    NTFjOGM4ODQwYzA4MzAzMTg5NGMyMjkwMWZkYTU4ZDQxM2YxODkxMDA0ZjA2
+    OTUxNjRmZDY3NDhkMDllZWZmMWU3NmQ2OTYxZTQwOTZkNjhhNGU=
   data.tar.gz: !binary |-
-    MWRhZGVhOTJhOGM5YTJkZGE2NWZkZDI3ODBkZDdkNjc3ZWU1MDdhZjhjOGE0
-    Yzg4MjdjOGZjNzJlYTRmODgzZjg5YzQzZTE3NWNiMzg0ZjYzYTAwNzA3NWM2
-    YWMzZDAxYmI2ZTcxMzcxNDE2MDg2MmE0MmI4MGE4ZTJiMTdiNTk=
+    MGM3YzdhYTFiZmQyNDU0OGY1NDJiZDhhY2YwN2JlYWYwNTQyZjJiOWQyZTFh
+    ZmE0NzEyNmJlYzNlYzAxM2Q2Y2YxNDkyOWI0ZTgwZGVkNjdiMDllZDQ4MmM0
+    OTMzMzlhNDNmYzRmNTZmYTEyMTVmNzA5YmI3ZGEwYmE5ZTAyZDM=

data/fish.rb

@@ -46,6 +46,7 @@ class CodeBox
             pt.replace [pt[0], (tmp == [] ? ys.max : tmp.max)]
             at pt
         end
+        def self.print; pp @data end
     end
 end # class CodeBox
 
@@ -130,8 +131,8 @@ class Interpreter
         'n' => lambda { |pt, dir, stks, box, cntl| @@stdout.write (stks[-1].pop 1)[0].to_s },
         'i' => lambda { |pt, dir, stks, box, cntl| stks[-1].push (cntl[:ibuf].empty? ? -1 : cntl[:ibuf][0].ord); cntl[:ibuf] = cntl[:ibuf][1..-1] unless cntl[:ibuf].length < 1 },
         # reflection
-        'g' => lambda { |pt, dir, stks, box, cntl| stks[-1].push (box.at stks[-1].pop 2).ord },
-        'p' => lambda { |pt, dir, stks, box, cntl| box.set (stks[-1].pop 2), (stks[-1].pop 1) },
+        'g' => lambda { |pt, dir, stks, box, cntl| stks[-1].push (box.at (stks[-1].pop 2).reverse).ord },
+        'p' => lambda { |pt, dir, stks, box, cntl| v = (stks[-1].pop 1)[0]; box.set ((stks[-1].pop 2).reverse), v.chr },
         # miscellaneous
         '&' => lambda { |pt, dir, stks, box, cntl| stks[-1].reg },
         ';' => lambda { |pt, dir, stks, box, cntl| cntl[:done] = true },
@@ -168,7 +169,7 @@ class Interpreter
             op = ' ' if op.nil?
             if options[:debug] >= 3; puts op end
             func = @@ops[op]
-            abort "\nsomething smells fishy... (invalid instruction)" if func.nil?
+            abort "\nsomething smells fishy... (invalid instruction #{op})" if func.nil?
             func.call @pt, @dir, @stks, @box, @cntl
             op = @box.send @dir, @pt
         end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: fish.rb
 version: !ruby/object:Gem::Version
-  version: 1.0.2
+  version: 1.0.3
 platform: ruby
 authors:
 - ! 'floomby