asmrb 0.0.2.1 → 0.0.2.3

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: f3068def65f664536adb24c11b82d0b7e63d6a85
-  data.tar.gz: 33f463277925245b25ef4f62fa78e4188c27b1c7
+  metadata.gz: c8b8ea4a6ef9586d90b45b4fbea0d27c3fe25d2c
+  data.tar.gz: 457793531698daf895a1f3b878a437570fce2b51
 SHA512:
-  metadata.gz: 3382c649f7a80fa31f28570003e5b56beaf8cc6c016bd3a94249cf1ffcc720d6d9b6622a9b5a1f44c4ec2c7acc17b4615846a42d71b369951d51ec3fce8d48ae
-  data.tar.gz: dfb30e2a85d3e595b34d36f4df32355946876811a7fd9bbdbad8976df6b8f3abd2d7c3fdcd97d19f358bfb1389413b4dc326dbca3a290e83dc588cdc1449ffe9
+  metadata.gz: 57207355602fa8b5440d45d64de9e62644e2b3e30ec3f97458b98858ea7698a31ec814289e4fa88a2b8ddf05c7ef2d565c34f9d618c4563f90898d9382a1844f
+  data.tar.gz: 3b82fb7f49b70dc03be8adbd223d7dd253522d1ab1f2a90a55eae70063244a7e947677c6d48ed04a52ef9e31cea8285fd69a7ab1484e2e2af594d61b6c4ce333

data/lib/asmrb.rb

@@ -2,7 +2,35 @@ require 'benchmark'
 require 'colorize'
 require 'pry'
 
+# You can make an instruction-based function with high level ruby by this Asm class.
 class Asm
+  # Sample with recursion:
+  #
+  # Asm.new do
+  #   defn :rec_print     # define a function, also a label to jump.
+  #   arg arr             # arguments
+  #   len arr             # get length of arr as array
+  #   pop l               # get value to l variable
+  #   cmp l , 0           # is l > 0 ?
+  #   jge :print          # then jump to :print block
+  #   jmp :exit           # else, jump to :exit block
+  #   label :print        # start of :print
+  #   car arr             # get out first element of arr
+  #   call :puts          # call ruby's puts
+  #   cdr arr             # get rest of arr Array
+  #   jmp :rec_print      # jump back to :rec_print ( or start of this function )
+  #   label :exit         # ending label.
+  # end
+  # => $rec_print
+  #
+  # debug:
+  # => $rec_print.is_debug = true
+  #
+  # calling:
+  # => $rec_print.invoke [1,2,3]
+  #
+  #
+
   attr_reader :variables, :stack, :name, :is_debug, :result, :functions, :params
   attr_writer :is_debug
 
@@ -12,10 +40,6 @@ class Asm
     assemble &block
   end
 
-  def export
-
-  end
-
   def new_scope
     @variables = {}
     @program = []
@@ -27,20 +51,33 @@ class Asm
     @name = "it"
   end
 
-  def new_var(dest)
-    eval("def #{dest}; #{@variables[dest]}; end")
-  end
-
   def refvar(val)
     val.is_a?(Symbol) ? @variables[val] : val
   end
 
+  def req_type(f,types)
+    s = types.is_a?(Array) ? types.join(', ') : types
+    raise Exception.new "[#{f}] got problem with #{lst}. need to be #{s}."
+  end
+
   def req_args(func,amount)
     raise Exception.new "[#{func}]: require #{amount} args to compare." if @stack.length < amount
   end
 
   OPS = {
 
+    "len" => lambda { | lst |
+                @stack.push @variables[lst].length
+              },
+
+    "cdr" => lambda { | lst |
+                @stack.push @variables[lst].drop(@variables[lst].first)
+              },
+
+    "car" => lambda { | lst |
+                @stack.push @variables[lst].first
+              },
+
     "rdu" => lambda { | ops |
                 e = eval "@stack.reduce(:#{ops})"
                 @stack.push e
@@ -107,7 +144,6 @@ class Asm
 
     "pop"  => lambda {|val|
                 @variables[val] = @stack.pop
-                #new_var val
               },
 
     "push" => lambda {|src|
@@ -131,7 +167,7 @@ class Asm
 
     "dbg" => lambda {
                 puts "#{@stack} > #{@program[@pc][0]}".light_green
-                binding.pry
+                binding.pry if @is_debug
               },
 
     "func"  => lambda {|name|
@@ -156,15 +192,15 @@ class Asm
                 #binding.pry
               },
 
-    "ivok" => lambda { |obj, f |
-                req_args "ivok",1 # obj.send(:func, args)
-                args = @stack.pop  # should be [ 1, 2, 3 ]
-                result = @variables[obj].send(f, args)
+    "ivok" => lambda { |obj, f , n|
+                req_args "ivok",n          # obj.send(:func, args)
+                args = []
+                n.times { args << @stack.pop } if n > 0
+                result = @variables[obj].send(f, eval("args.join(', ')"))
                 @stack.push result
               },
 
     "call" => lambda {|fname|
-                #binding.pry
                 _method = method(fname)
                 if _method.parameters.length > 0
                   args = []
@@ -175,7 +211,6 @@ class Asm
                 else
                   invoke = _method.call
                 end
-                #binding.pry
                 @stack.push invoke if !invoke.nil?
               },
 
@@ -279,7 +314,6 @@ class Asm
 
     # ranging...
     (debug_start..debug_end).each do | i |
-
       instr = @program[i]
       color = i != @pc ?  :light_green : :magenta
       puts "#{i}: #{instr[0]} #{instr[1]}".colorize color #if !instr.nil?
@@ -321,41 +355,11 @@ class Asm
   def self.fac(acc, n)
     if(n > 0)
       fac(
-        (acc * n),
-        (n - 1))
+         (acc * n),
+         (n - 1))
     else
       acc
     end
   end
 
-  def self.compare_speed
-    # recursive fac:
-    Asm.assemble do
-      defn :factorial
-      arg  acc, n
-      cmp  n, 1
-      jge  :cont
-
-      push acc
-      jmp  :exit
-
-      label :cont
-      mul  acc, n
-      sub  n,   1
-      jmp  :factorial
-
-      label :exit
-
-      #dbg
-    end
-
-    $factorial.is_debug = false
-
-    puts "Asm version vs primitive factorial (both recursive):".light_green
-    Benchmark.bm do |x|
-      x.report { $factorial.invoke 1, 8000 }
-      x.report { fac 1, 8000 }
-    end
-    puts "Run: 1 -> 8710, which is primitive version limitation".light_green
-  end
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: asmrb
 version: !ruby/object:Gem::Version
-  version: 0.0.2.1
+  version: 0.0.2.3
 platform: ruby
 authors:
 - The Trung
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-01-31 00:00:00.000000000 Z
+date: 2015-02-04 00:00:00.000000000 Z
 dependencies: []
 description: Inteprete your assembly style code inside ruby.
 email: deulamco@gmail.com