lrb 0.0.0 → 0.0.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 95d432598099b498249adf215c114d4085422337
-  data.tar.gz: 8aae9bc76ed5963a18888b5947bf3be576cabda0
+  metadata.gz: f1cd3e16d04456b052cdabcd6ad3fd3509d5f4bd
+  data.tar.gz: 7db9624b48b357c1bb23fe4b280018c70945d73f
 SHA512:
-  metadata.gz: e7db38a8dfd2c6bd6fbd6bfb5ff7992a83e57be50b4571a46f4ce28b62d02b34d368cd2273e7c3dbc73b03bf08ece40879d6c22819d884512e85c196802af7dd
-  data.tar.gz: 9431a51e1921c0818aac68340cf90874e09a4405e18033489d8d682df16610dae2155d048b69b871e1b66c0808fb8b3070ca06606112f0f9543118c23915e7a5
+  metadata.gz: f9f53921407081952ac231180a3728a38ac2a612557e6d3a70ff8ce4948a5fbb44dcee6572cbf5110d6cf2184a6447f64df3f61744fd0f121f98fe284b5f0707
+  data.tar.gz: 5b068a2f5f1b8dfd166e12fae9dbca72ca2cd46b0976eaa90745fa7869b630f1a31c09fedabafa387200206ef3eedaf134f712863824918f7a36f31d459c3d86

data/README.md

@@ -0,0 +1,213 @@
+# Lispy Ruby
+[LRB] transform Ruby to a Lisp with braces, remain all ruby keywords and same funtionalities.
+
+\* Install:
+
+    gem install lrb
+
+\* LRB source look like lisp, but with braces:
+
+    [require "colorize"]
+
+    [def [square x]
+      [* x x]
+    ]
+
+    [def [factorial acc n]
+      [if [< n 1]
+        acc
+        [factorial [* acc n] [- n 1]]]]
+
+
+    [puts [square 10]]
+    [puts [factorial 1 10]]
+
+
+    [def [single_exp]
+      [puts "only block !"]
+    ]
+
+    [def [multiple_exps][
+        [puts "1st statement"]
+        [puts "2nd statement"]
+      ]
+    ]
+
+    [single_exp]
+    [multiple_exps]
+
+
+    [puts [== 1 1]]
+
+    [= name :Trung.to_s ]
+    [puts name]
+    [puts [+ "Hello " name " \!"]]
+
+    [= lst [list 1 2 3]]
+    [= lst Array.new]
+    [<< lst 4]
+    [puts lst.to_s.blue]
+
+    [puts [.to_s.blue [+ "Heell" "o"]]]
+
+    [do [.map [list 1 2 3]] [n][
+        [puts n]
+      ]
+    ]
+
+    [unless [< 1 0]
+      [puts "one is not lesser than zero"]
+      [puts "you're doomed."]
+    ]
+
+    [= square 
+      [lambda [x]
+        [* x x]
+      ]
+    ]
+
+    [puts 
+      [.to_s.blue [square.call 2]]]
+
+    [def [argumented x=2] 
+      [puts x]
+    ]
+
+    [argumented]
+
+
+    [cond 
+      [< 1 0] [puts "1 < 0"]
+      [> 3 4] [puts "3 > 4"]
+      [<= 1 0] [puts "1 <= 0"]
+      [>= 1 0] [puts "1 >= 0"]
+      true    [puts "as always"]
+    ]
+
+\* By then, LRB compile down into Ruby:
+
+    require "colorize"
+
+    def square x
+      x * x
+    end
+
+    def factorial acc, n
+      if n < 1
+        acc
+      else
+        factorial acc * n, n - 1
+      end
+    end
+
+    puts square 10
+
+    puts factorial 1, 10
+
+    def single_exp 
+      puts "only block !"
+    end
+
+    def multiple_exps 
+      puts "1st statement"
+      puts "2nd statement"
+    end
+
+    single_exp 
+
+    multiple_exps 
+
+    puts 1 == 1
+
+    name = :Trung.to_s
+
+    puts name
+
+    puts "Hello " + name + " !"
+
+    lst = [1, 2, 3]
+
+    lst = Array.new
+
+    lst << 4
+
+    puts lst.to_s.blue
+
+    puts ("Heell" + "o").to_s.blue
+
+    ([1, 2, 3]).map do |n|
+      puts n
+    end
+
+    unless 1 < 0
+        puts "one is not lesser than zero"
+      else
+        puts "you're doomed."
+      end
+
+    square = lambda {|x|
+      x * x
+    }
+
+    puts (square.call 2).to_s.blue
+
+    def argumented x=2
+      puts x
+    end
+
+    argumented 
+
+    if 1 < 0
+      puts "1 < 0"
+    elsif 3 > 4
+      puts "3 > 4"
+    elsif 1 <= 0
+      puts "1 <= 0"
+    elsif 1 >= 0
+      puts "1 >= 0"
+    elsif true
+      puts "as always"
+    end
+    100
+    3628800
+    only block !
+    1st statement
+    2nd statement
+    true
+    Trung
+    Hello Trung !
+    [4]
+    Heello
+    1
+    2
+    3
+
+
+\* And evaluate everything:
+
+    [evaluated]:
+    100
+    3628800
+    only block !
+    1st statement
+    2nd statement
+    true
+    Trung
+    Hello Trung !
+    [4]
+    Heello
+    1
+    2
+    3
+
+
+\* To run a source such as `test.lrb` in this repo:
+
+    lrb file_name.lrb
+
+It will compile and run just as above.
+
+Currently, it's only experiment toy, 
+not yet support `repl` or `macros`.
+
+Have fun !

data/lib/lrb.rb

@@ -51,10 +51,14 @@ class Lrb
         puts "args: #{args}".yellow
         puts line 
       end
-
+      
       if KEYWORD.include? fun
         result = self.instance_exec *args, &KEYWORD[fun]
+      elsif class_method? fun
+        puts "[ERROR] dot operator only take 1 arg.".red if args.length > 1
+        result = class_method_append fun, args.first
       else
+        # function call
         result = compose_function fun, args
       end
 
@@ -62,7 +66,6 @@ class Lrb
         puts result.light_green
         puts line
       end
-
       indent + result
     else
       puts "#{sexp}".yellow if @debug
@@ -71,6 +74,14 @@ class Lrb
   end
 
   private
+  def class_method? function
+    function[0] == "."
+  end
+
+  def class_method_append fun, args
+    "(#{transform args})#{fun}"
+  end
+
   def wrap_string args
     args.map do |arg| 
       if arg.class == String 
@@ -116,6 +127,35 @@ class Lrb
     args.join " #{op.to_s} " 
   end
 
+  def transform_body block
+    if block.first.class == Array
+      block.map{|body| transform body}.join "\n  "
+    else
+      transform block
+    end
+  end
+
+  def conditional_block keyword, cond, true_block, false_block
+    op = cond.first
+    cond = cond.drop(1).join " #{op} "
+    true_block = transform true_block
+    false_block = transform false_block
+    ["#{keyword} #{cond}",
+      "    #{true_block}",
+      "  else",
+      "    #{false_block}",
+      "  end"
+    ].join("\n")
+  end
+
+  def single_block keyword, block
+    block = transform_body block
+    ["#{keyword}",
+      "  #{block}",
+      "end"
+    ].join("\n")
+  end
+
   KEYWORD = {
     :* => lambda {|*args| operator :*, args},
     :/ => lambda {|*args| operator :/, args},
@@ -123,30 +163,79 @@ class Lrb
     :+ => lambda {|*args| operator :+, args},
     :<< => lambda {|*args| operator :<<, args},
     :'^' => lambda {|*args| operator :'^', args},
-    :'=' => lambda {|left, right| "#{left} = #{right}"},
-    :== => lambda {|left, right| "#{left} == #{right}"},
+    :'<' => lambda {|*args| operator :'<', args},
+    :'>' => lambda {|*args| operator :'>', args},
+    :'<=' => lambda {|*args| operator :'<=', args},
+    :'>=' => lambda {|*args| operator :'>=', args},
+    
+    :'=' => lambda {|left, right| "#{left} = #{transform right}"},
+    :== => lambda {|left, right| "#{transform left} == #{transform right}"},
+    
 
+    :list => lambda {|*args|
+        "[#{args.join ', '}]"
+      },
+    :lambda => lambda {|args, body|
+        args = args.join ", "
+        body = transform_body body
+        ["lambda {|#{args}|",
+          "  #{body}",
+          "}"
+        ].join("\n")  
+      },
+    :begin => lambda {|do_block, rescue_block| 
+        ["begin",
+          "  #{do_block}",
+          "rescue Exception => e",
+          "  #{rescue_block}",
+          "end"
+        ].join("\n")
+      },
+    :do => lambda {|fun, args, bodies|
+        fun = transform fun
+        args = args.join ", "
+        bodies = transform_body bodies
+        ["#{fun} do |#{args}|",
+          "  #{bodies}",
+          "end"
+        ].join("\n")  
+      },
     :def => lambda {|args, body| 
-      name = args.first
-      args = args.drop(1).join ", "
-      body = transform body
-      ["def #{name} #{args}",
-        "  #{body}",
-        "end"
-      ].join("\n")
-    },
-
+        name = args.first
+        args = args.drop(1).join ", "
+        body = transform_body body
+        ["def #{name} #{args}",
+          "  #{body}",
+          "end"
+        ].join("\n")
+      },
     :if => lambda {|cond, true_block, false_block|
-      op = cond.first
-      cond = cond.drop(1).join " #{op} "
-      true_block = transform true_block
-      false_block = transform false_block
-      ["if #{cond}",
-        "    #{true_block}",
-        "  else",
-        "    #{false_block}",
-        "  end"
-      ].join("\n")
-    }
+        conditional_block :if, cond, true_block, false_block
+      },
+    :unless => lambda {|cond, true_block, false_block|
+        conditional_block :unless, cond, true_block, false_block
+      },
+    :cond => lambda {|*conds|
+        conds = conds.map{|cond| 
+          transform cond
+        }.each_slice(2).to_a
+        cond_first = conds.first
+        cond_body = conds.drop(1).map do |pair|
+          ["elsif #{pair.first}",
+            "  #{pair.last}"
+            ].join "\n"
+        end
+        ["if #{cond_first.first}",
+          "  #{cond_first.last}",
+          cond_body,
+          "end"
+          ].join  "\n"
+      }
   }
-end
+end
+# @test = Lrb.new
+# #@test.debug = true
+# x = @test.to_ruby <<-REC
+# REC
+# puts x.blue
+# eval x

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: lrb
 version: !ruby/object:Gem::Version
-  version: 0.0.0
+  version: 0.0.1
 platform: ruby
 authors:
 - The Trung
@@ -14,56 +14,56 @@ dependencies:
   name: pry
   requirement: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
   name: oyster
   requirement: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
   name: bracer
   requirement: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
   name: colorize
   requirement: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
-    - - ">="
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '0'
 description: It transform Ruby to a Lisp with braces. Compile and run as ruby code.
@@ -71,8 +71,10 @@ email: deulamco@gmail.com
 executables:
 - lrb
 extensions: []
-extra_rdoc_files: []
+extra_rdoc_files:
+- README.md
 files:
+- README.md
 - bin/lrb
 - lib/lrb.rb
 homepage: http://github.com/thetrung/lrb.git
@@ -80,7 +82,9 @@ licenses:
 - MIT
 metadata: {}
 post_install_message: 
-rdoc_options: []
+rdoc_options:
+- "--main"
+- README.md
 require_paths:
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement