asmrb 0.0.2.6.1.2 → 0.0.2.6.1.3

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 57d706ea40276b6485207d9090aa93329ef6090c
-  data.tar.gz: a7b388a89846c4a280419790c4139578afdb0722
+  metadata.gz: 43288f18e0561f0edf394d9522578c582ea0956e
+  data.tar.gz: 3007f21ca287b145f4a04222c653433c74065cfc
 SHA512:
-  metadata.gz: 5ac464f3459c2ac32f4454b25a3597b39392791124a05dc7a76fdbe7b30240de7051d8394979f06e27bedf7d094f0f86c32066a331d750ba0715601591213de6
-  data.tar.gz: 7eaa37903c8dd999209ab4fd78512fd29ba5ba2e8ab15fd2ff63d88eed461bee1bf7819674ade9430c4c31ba4645022d0d51bc8ff18415959e648c21489516b3
+  metadata.gz: 922176943cbb5921580c25157f6845f2453976a68d8fa93807f7656065c2ad4d236d0d13a28f3d353e035a127e27ca46103184343f25c7bffcd9811bb2db29c2
+  data.tar.gz: c27e8a276ae85073b5422e4b61c50bba94e6a27d85de9345ecb369277bee13a175b6eb7de6690d232014e0f6593e6b6efc213c8cdd46b78ff336dfc8d87a67a9

data/lib/asmrb.rb

@@ -70,6 +70,9 @@ class Asmrb
   end
 
   OPS = {
+    "lea" => lambda { | name |
+                @variables[name] = @stack.pop
+              },
 
     "len" => lambda { | lst |
                 @stack.push @variables[lst].length
@@ -89,7 +92,7 @@ class Asmrb
                 @stack.push e
               },
 
-    "dupl" => lambda {
+    "dup" => lambda {
                 @stack.push @stack.last
               },
 
@@ -109,11 +112,11 @@ class Asmrb
                 @stack.push @stack.pop / @stack.pop
               },
 
-    "incr" => lambda { |dest, incval = 1|
+    "icr" => lambda { |dest, incval = 1|
                 @variables[dest] += incval
               },
 
-    "decr" => lambda { |dest, decrval = 1|
+    "dcr" => lambda { |dest, decrval = 1|
                 @variables[dest] -= decrval
               },
 
@@ -123,6 +126,11 @@ class Asmrb
                       @variables[src] : src
               },
 
+    "jnl" => lambda { | name |
+                req_args "jnl", 1
+                @pc = @labels[name] if @stack.pop.nil?
+              },
+
     "jz" => lambda { | name |
                 req_args "jz", 1
                 @pc = @labels[name] if @stack.pop == 0
@@ -166,7 +174,7 @@ class Asmrb
                 @variables[val] = @stack.pop
               },
 
-    "push" => lambda {|src|
+    "psh" => lambda {|src|
                 @stack.push(
                   src.is_a?(Symbol) ? @variables[src] : src )
               },
@@ -190,7 +198,7 @@ class Asmrb
                 #binding.pry if @is_debug
               },
 
-    "func"  => lambda {|name|
+    "fn"  => lambda {|name|
                 args = []
                 params = eval "$#{name}.params"
                 params.times do
@@ -202,15 +210,15 @@ class Asmrb
                 #binding.pry
               },
 
-    "ivok" => lambda { |obj, f , n|
-                req_args "ivok",n          # obj.send(:func, args)
+    "inv" => lambda { |obj, f , n|
+                req_args "inv",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|
+    "cal" => lambda {|fname|
                 _method = method(fname)
                 if _method.parameters.length > 0
                   args = []
@@ -223,7 +231,7 @@ class Asmrb
                 end
                 @stack.push invoke if !invoke.nil?
               },
-    "recur" => lambda {
+    "rec" => lambda {
                 @pc = -1
               },
 
@@ -231,14 +239,14 @@ class Asmrb
                 @pc = @program.length-1
               },
 
-    "exit"  => lambda {
+    "end"  => lambda {
                 exit
               }
   }
 
-  def create_label lbl
-    @labels[lbl] = @program.length-1
-    puts "#{@label[lbl]}: #{lbl}".purple if @is_debug
+  def create_label blo
+    @labels[blo] = @program.length-1
+    puts "#{@label[blo]}: #{blo}".purple if @is_debug
   end
 
   def method_missing(name, *args)
@@ -246,7 +254,7 @@ class Asmrb
     @source << [name, args]
 
     # :name => "name"
-    sname = name.to_s
+    sname = name.to_s.gsub "_", ""
 
     if OPS.keys.include?(sname)
       @program << [sname, args]
@@ -255,10 +263,10 @@ class Asmrb
     else
       case sname
 
-      when "label"
+      when "blo"
         create_label args.first
 
-      when "defn"
+      when "def"
         @name = args.first
         #create_label args.first
 
@@ -280,7 +288,7 @@ class Asmrb
       until @pc == @program.length
         # get instruction:
         instr = @program[@pc]
-        puts "#{@pc}: #{instr[0]} #{instr[1]}".light_green if debug
+        puts "#{@pc}: #{instr[0]} #{instr[1].join " "}".light_green if debug
         # execute proc: arg ,  proc
         self.instance_exec *instr[1], &OPS[instr[0]]
         #binding.pry if debug
@@ -378,89 +386,81 @@ class Asmrb
     eval "$#{@name}"
   end
 
-  #primitive fac: that will overflow
-  def self.fac(acc, n)
-    if(n > 0)
-      fac(
-         (acc * n),
-         (n - 1))
-    else
-      acc
-    end
-  end
-
-  def llvm_init
-    LLVM.init_jit
-    @mod = LLVM::Module.new @name.to_s
-    puts "[LLVM]: initialized".light_green
-  end
-
-  def llvm_finalize
-    @mod.verify
-    @mod.dump
-    @engine = LLVM::JITCompiler.new(@mod)
-  end
-
-  def llvm_partition
+  def partition
     puts "partitioning...".light_green if@is_debug
     if @labels.empty?
-      @partitions = { @name => @source }
+      @partitions = { @name => @program }
     else
-      @partitions = {}
-      index = 0
+      @partitions = Hash.new
       @labels.each do |label|
-        puts "block #{label[0]}:".light_yellow
-        partition = []
-        (@source.length - index).times.each do
-          if @source[index][0] != :label
-            puts " #{index}: #{@source[index]}".white if@is_debug
-            partition.push @source[index]
-            index+=1
-          else
-            index+=1
-            break
+        puts "#{label[1]+1}:#{label[0]}".magenta
+        partition = Array.new
+        # navigate down to the block:
+        @program[label.last+1..@program.length-1].each.with_index do |instruction, index|
+          break if instruction.first == :label
+          if@is_debug
+            message = "  #{index}: #{instruction.first}" +
+              " #{instruction.last.join(" ") unless instruction.last.empty?}"
+            puts message.light_yellow 
           end
+          partition << instruction
         end
         @partitions[label[0]] = partition.dup
       end
     end
-    puts "[LLVM]: partitioning completed.".light_green
+    puts "partitioning completed.".light_green
     @partitions if@is_debug
   end
-
-  def llvm_emit
-    # Checkout kaleidescope sample of ruby-llvm
-  end
-
-  def compile
-    llvm_init
-    llvm_partition
-    llvm_emit
-    #llvm_finalize
-  end
-
 end
 
 #testing :
-Asmrb.new do
-  defn :factorial
-  arg  :acc, :n
-  push 1
-  push :n
-  cmp
-  jge  :recursion
-  push :acc
-  ret
-
-  label :recursion
-  push :acc
-  push :n
-  mul
-  push 1
-  push :n
-  sub
-  recur
-end
+# @a = Asmrb.new do
+#   _def :factorial
+#   _arg :acc, :n
+#   _psh 1
+#   _psh :n
+#   _cmp
+#   _jge :recursion
+#   _psh :acc
+#   _ret
+
+#   _blo :recursion
+  
+#   _psh :times
+#   _jnl :init_counter
+
+#   _psh 1
+#   _psh :times
+#   _add
+#   _lea :times
+#   _jmp :for_fun
+#   _blo :comeback
+
+#   _psh :acc
+#   _psh :n
+#   _mul
+#   _psh 1
+#   _psh :n
+#   _sub
+#   _rec
+
+#   _blo :for_fun
+#   _psh "recursions counts:"
+#   _cal :puts
+#   _psh :times
+#   _cal :puts
+#   _jmp :comeback
+
+#   _blo :init_counter
+#   _psh 0
+#   _lea :times
+#   _jmp :recursion
+
+# end
+
+#@a.is_debug = true
+#@a.partition
+#puts "partitioning test completed."
 
 #$factorial.is_debug = true
 #puts $factorial.invoke 1,3

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: asmrb
 version: !ruby/object:Gem::Version
-  version: 0.0.2.6.1.2
+  version: 0.0.2.6.1.3
 platform: ruby
 authors:
 - The Trung
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-04-20 00:00:00.000000000 Z
+date: 2015-04-29 00:00:00.000000000 Z
 dependencies: []
 description: create a toy assembly-like DSL in ruby, checkout the homepage for usage
   & syntax.