lrb 0.0.3 → 0.0.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 91b1b3463d0a8c5618c45cfe15e829cdd7340ac6
-  data.tar.gz: 2318438a0a671cc8b1e7f12adb30e35e9a5f7bac
+  metadata.gz: 294318f491436616cca102f561589256b103640a
+  data.tar.gz: a272338296524e821c4f2cfd53ce5aaf7a02dfa4
 SHA512:
-  metadata.gz: 180ec2126d1c55a186d55c7b6ac69fdabc3f7991098d88b5b27f5cbaa7e8d54299974e5ab3f8dc2a5553da37942342c9ca1ed9e9b94c0b33feaa9af5593412b6
-  data.tar.gz: 9839e93cc80d0cec69d4f40dcf0561d0954d3aa2e5b2aad884062b2630d2580cc222363d2f90cf6674ff6b20e17ea8ce28cb6bcf1db888b8621d4ce63fabdf64
+  metadata.gz: 947acff96b79c641bd39ac4ffecda87af08d5152e7a0013ddbaf83cfc0fd73f6ac09b4d09d0a1adb117ab87d7212b07e32a5220e965bb5eaf1becfff646f2812
+  data.tar.gz: 351ee6bee811e3fe9fe8508b61c15948040acb89ab2b317f685b7260bd7008942fe85600bcde59173acfe86840191f33dc062018cc6850067f1907db9c924ecf

data/bin/lrb

@@ -12,20 +12,20 @@ spec = Oyster.spec do
     lrb FILE_NAME [OPTIONS]
   EOS
   
-  flag :interactive, :desc =>
-        'Start an interactive Scheme session'
+  flag :debug, :desc => 'Start an interactive Lrb debug session'
 end
 
 require "rubygems"
 
 begin
   options = spec.parse
+  version = Gem.loaded_specs["lrb"].version.to_s
   
-  if options[:interactive] or options[:unclaimed].empty?
-    puts "lrb:repl".light_yellow
+  if options[:unclaimed].empty?
+    puts "lrb #{version} #{'DEBUG' if options[:debug]} REPL".light_yellow
     Lrb.new.repl
   else
-    puts "lrb:compile".light_yellow
+    puts "lrb #{version} COMPILE".light_yellow
     lrb = Lrb.new
     lrb.eval_file File.expand_path(options[:unclaimed].first)
   end

data/lib/lrb.rb

@@ -1,34 +1,33 @@
 require "readline"
 require "colorize"
 require "bracer"
-# require "sexpistol"
 require "pry"
 
 class Lrb
   attr_accessor :parser, :debug
 
   def initialize
-    @debug = false
-    @indent = 0
-    @stack = Array.new
-    @parser = Bracer.new
-    @parser.ruby_keyword_literals = true
+    @_dbg = false
+    @_indent = 0
+    @_stack = Array.new
+    @_parser = Bracer.new
+    @_parser.ruby_keyword_literals = true
     readline_autocompletion
   end
 
   def parse source
-    @parser.parse_string source 
+    @_parser.parse_string source 
   end
 
   def repl
     begin
       while line = readline_with_hist_management
-        @stack << line
+        @_stack << line
         if balanced?
-          e = eval_source @stack.join " "
+          e = eval_source @_stack.join " "
           puts e.to_s.blue
-          @stack.clear
-          @indent = 0
+          @_stack.clear
+          @_indent = 0
         end
       end
     rescue Interrupt => e
@@ -47,13 +46,13 @@ class Lrb
       e = to_ruby source
       evaluated = eval e
     rescue Exception => ex
-      if @debug
+      if @_dbg
         puts ex.backtrace.join("\n").red
         binding.pry 
       end
       puts ex.message.red
     end
-    if @debug
+    if @_dbg
       if mode == :compile
         puts "[LRB]:".light_yellow
         puts source.light_yellow
@@ -74,7 +73,7 @@ class Lrb
   def list_to_ruby ast
     ast = ast.map do |sexp|
       result = transform sexp
-      puts result if @debug
+      puts result if @_dbg
       result
     end
     ast.join "\n\n"
@@ -82,17 +81,17 @@ class Lrb
 
   def to_ruby source
     ast = parse source 
-    puts "parsed: #{ast}".green if @debug
+    puts "parsed: #{ast}".green if @_dbg
     list_to_ruby ast
   end
 
   def transform sexp
-    puts line if @debug
+    puts line if @_dbg
     if sexp.class == Array
       fun = sexp.first
       args = wrap_string sexp.drop(1)
       result = ""
-      if @debug
+      if @_dbg
         puts "function: #{fun}".yellow
         puts "args: #{args}".yellow
         puts line 
@@ -108,23 +107,23 @@ class Lrb
         result = compose_function fun, args
       end
 
-      if @debug
+      if @_dbg
         puts result.light_green
         puts line
       end
       indent + result
     else
-      puts "#{sexp}".yellow if @debug
+      puts "#{sexp}".yellow if @_dbg
       sexp
     end
   end
 
   private
   def balanced?
-    source = @stack.join " "
+    source = @_stack.join " "
     @left = source.count "["
     @right = source.count "]"
-    @indent = @left - @right if (@left - @right) > 0
+    @_indent = @left - @right if (@left - @right) > 0
     @left == @right
   end
   
@@ -165,13 +164,20 @@ class Lrb
   end
 
   def replace_parenthese arg
-    if arg.to_s["("] && arg.to_s[")"]
-      old = arg
-      arg = arg.to_s.gsub(/\((.*)\)/, '[\1]').to_sym
-      puts "arg: #{old} => #{arg}".light_yellow if @debug
+    if arg.kind_of? Array
+      arg = arg.map{ |element|
+        replace_parenthese element
+      }
       arg
     else
-      arg
+      if arg.to_s["("] && arg.to_s[")"]
+        old = arg
+        arg = arg.to_s.gsub(/\((.*)\)/, '[\1]').to_sym
+        puts "arg: #{old} => #{arg}".light_yellow if @_dbg
+        arg
+      else
+        arg
+      end
     end
   end
 
@@ -191,21 +197,13 @@ class Lrb
   end
 
   def indent
-    "  " * @indent
+    "  " * @_indent
   end
 
   def line
     "-" * 80
   end
 
-  def push node
-    @stack.push node
-  end
-
-  def fetch
-    @stack.pop unless @stack.empty?
-  end
-
   def operator op, args
     args = args.map do |arg|
       transform arg
@@ -283,8 +281,8 @@ class Lrb
         ].join("\n")
       },
     :debug => lambda {
-        @debug = !@debug
-        puts "[DEBUG = #{@debug}]".light_yellow
+        @_dbg = !@_dbg
+        puts "[DEBUG = #{@_dbg}]".light_yellow
         ""
         },
     :do => lambda {|fun, args, bodies|

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: lrb
 version: !ruby/object:Gem::Version
-  version: 0.0.3
+  version: 0.0.4
 platform: ruby
 authors:
 - The Trung
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-05-28 00:00:00.000000000 Z
+date: 2015-05-31 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: pry
@@ -66,7 +66,7 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
-description: It transform Ruby to a Lisp with braces, included REPL mode.
+description: It transform Ruby to a Lisp with braces, included REPL and COMPILE mode.
 email: deulamco@gmail.com
 executables:
 - lrb