minruby 1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 39f7f065132debe11242193f8be1fe7d820e17c4
+  data.tar.gz: 213eff7a9b7da0f576bf059b282145d5d334a0c1
+SHA512:
+  metadata.gz: 121f1dc50cfd70035b8cdd7d93fb57302bc2d99ac65f554ed0d8ccd5dd8890698e1e28b87e7c8680bec9e2ed079c10b4c26b9930fc1bdde617fb8cec27868a9d
+  data.tar.gz: 314bdb65c1fefe2c03ca5029e0db7367456ae552ccc5679605a1c70fdd4f5cb2e86e9edfcd1f91ac10a98195b068bbf77de55bcac2b25b477d2026c397720c49

data/.travis.yml

@@ -0,0 +1,4 @@
+sudo: false
+language: ruby
+rvm:
+  - 2.3.1

data/Gemfile

@@ -0,0 +1,3 @@
+source 'https://rubygems.org'
+
+gemspec

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2016 Yusuke Endoh
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,33 @@
+# 『Ruby で学ぶ Ruby』用ライブラリ
+
+ASCII.jp の Web 連載『[Ruby で学ぶ Ruby](http://ascii.jp/elem/000/001/230/1230449/)』のための補助ライブラリです。
+
+## インストール方法
+
+コンソールで
+
+    gem install minruby
+
+というコマンドを実行してください。
+また、あなたのプログラムの最初の行に
+
+    require "minruby"
+
+という行を追加してください。
+
+## 別のインストール方法
+
+`gem` でのインストールがうまく行かない場合は、[ライブラリのファイル](https://github.com/mame/minruby/lib/minruby.rb)をダウンロードしてあなたのプログラムと同じフォルダに置いてください。それから、あなたのプログラムの最初の行に
+
+    require "./minruby"
+
+という行を追加してください。
+
+## 使い方
+
+連載記事を参照してください。第 4 回以降でこのライブラリを使用しています。
+
+## ライセンス
+
+[MIT License](http://opensource.org/licenses/MIT)
+

data/Rakefile

@@ -0,0 +1,10 @@
+require "bundler/gem_tasks"
+require "rake/testtask"
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << "test"
+  t.libs << "lib"
+  t.test_files = FileList['test/**/*_test.rb']
+end
+
+task :default => :test

data/lib/minruby.rb

@@ -0,0 +1,161 @@
+require "pp"
+require "ripper"
+
+class MinRubyParser
+  def self.minruby_parse(program)
+    MinRubyParser.new.minruby_parse(program)
+  end
+
+  def minruby_parse(program)
+    simplify(Ripper.sexp(program))
+  end
+
+  def simplify(exp)
+    case exp[0]
+    when :program, :bodystmt
+      make_stmts(exp[1])
+    when :def
+      name = exp[1][1]
+      params = exp[2]
+      params = params[1] if params[0] == :paren
+      params = (params[1] || []).map {|a| a[1] }
+      body = simplify(exp[3])
+      ["func_def", name, params, body]
+    when :call
+      recv = simplify(exp[1])
+      name = exp[3][1]
+      ["method_call", recv, name, []]
+    when :fcall
+      name = exp[1][1]
+      ["func_call", name, []]
+    when :method_add_arg
+      call = simplify(exp[1])
+      e = exp[2]
+      e = e[1] || [] if e[0] == :arg_paren
+      e = e[1] || [] if e[0] == :args_add_block
+      e = e.map {|e_| simplify(e_) }
+      call[call[0] == "func_call" ? 2 : 3] = e
+      call
+    when :command
+      name = exp[1][1]
+      args = exp[2][1].map {|e_| simplify(e_) }
+      ["func_call", name, args]
+    when :if, :elsif
+      cond_exp = simplify(exp[1])
+      then_exp = make_stmts(exp[2])
+      if exp[3]
+        if exp[3][0] == :elsif
+          else_exp = simplify(exp[3])
+        else
+          else_exp = make_stmts(exp[3][1])
+        end
+      end
+      ["if", cond_exp, then_exp, else_exp]
+    when :if_mod
+      cond_exp = simplify(exp[1])
+      then_exp = make_stmts([exp[2]])
+      ["if", cond_exp, then_exp, nil]
+    when :while
+      cond_exp = simplify(exp[1])
+      body_exp = make_stmts(exp[2])
+      ["while", cond_exp, body_exp]
+    when :binary
+      exp1 = simplify(exp[1])
+      op = exp[2]
+      exp2 = simplify(exp[3])
+      [op.to_s, exp1, exp2]
+    when :var_ref
+      case exp[1][0]
+      when :@kw
+        case exp[1][1]
+        when "nil" then ["lit", nil]
+        when "true" then ["lit", true]
+        when "false" then ["lit", false]
+        else
+          raise
+        end
+      when :@ident
+        ["var_ref", exp[1][1]]
+      when :@const
+        ["const_ref", exp[1][1]]
+      end
+    when :@int
+      ["lit", exp[1].to_i]
+    when :string_literal
+      ["lit", exp[1][1][1]]
+    when :symbol_literal
+      ["lit", exp[1][1][1].to_sym]
+    when :assign
+      case exp[1][0]
+      when :var_field
+        ["var_assign", exp[1][1][1], simplify(exp[2])]
+      when :aref_field
+        ["ary_assign", simplify(exp[1][1]), simplify(exp[1][2][1][0]), simplify(exp[2])]
+      else
+        raise
+      end
+    when :case
+      arg = simplify(exp[1])
+      when_clauses = []
+      exp = exp[2]
+      while exp && exp[0] == :when
+        pat = exp[1].map {|e_| simplify(e_) }
+        when_clauses << [pat, make_stmts(exp[2])]
+        exp = exp[3]
+      end
+      else_clause = make_stmts(exp[1]) if exp
+      #["case", arg, when_clauses, else_clause]
+
+      exp = else_clause
+      when_clauses.reverse_each do |patterns, stmts|
+        patterns.each do |pattern|
+          exp = ["if", ["==", arg, pattern], stmts, exp]
+        end
+      end
+      exp
+    when :method_add_block
+      call = simplify(exp[1])
+      blk_params = exp[2][1][1][1].map {|a| a[1] }
+      blk_body = exp[2][2].map {|e_| simplify(e_) }
+      call << blk_params << blk_body
+    when :aref
+      ["ary_ref", simplify(exp[1]), *exp[2][1].map {|e_| simplify(e_) }]
+    when :array
+      ["ary_new", *(exp[1] ? exp[1].map {|e_| simplify(e_) } : [])]
+    when :hash
+      kvs = []
+      if exp[1]
+        exp[1][1].each do |e_|
+          key = simplify(e_[1])
+          val = simplify(e_[2])
+          kvs << [key, val]
+        end
+      end
+      ["hash_new", kvs]
+    when :void_stmt
+      ["lit", nil]
+    when :paren
+      simplify(exp[1][0])
+    else
+      pp exp
+      raise "unsupported node: #{ exp[0] }"
+    end
+  end
+
+  def make_stmts(exps)
+    exps = exps.map {|exp| simplify(exp) }
+    exps.size == 1 ? exps[0] : ["stmts", *exps]
+  end
+end
+
+def minruby_load()
+  File.read(ARGV.shift)
+end
+
+def minruby_parse(src)
+  MinRubyParser.minruby_parse(src)
+end
+
+def minruby_call(mhd, args)
+  send(mhd, *args)
+end

data/minruby.gemspec

@@ -0,0 +1,22 @@
+# coding: utf-8
+Gem::Specification.new do |spec|
+  spec.name          = "minruby"
+  spec.version       = "1.0"
+  spec.authors       = ["Yusuke Endoh"]
+  spec.email         = ["mame@ruby-lang.org"]
+
+  spec.summary       = %q{A helper library for "Ruby de manabu Ruby"}
+  spec.description   = %q{This library provides some helper modules to implement a toy Ruby implementation.  This is created for a series of articles, "Ruby de manabu Ruby (Learning Ruby by Ruby)", in ASCII.jp}
+  spec.homepage      = "http://github.com/mame/minruby/"
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files -z`.split("\x0").reject do |f|
+    f.match(%r{^(test|spec|features)/})
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.13"
+  spec.add_development_dependency "rake", "~> 10.0"
+end

metadata

@@ -0,0 +1,81 @@
+--- !ruby/object:Gem::Specification
+name: minruby
+version: !ruby/object:Gem::Version
+  version: '1.0'
+platform: ruby
+authors:
+- Yusuke Endoh
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2016-10-23 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.13'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.13'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+description: This library provides some helper modules to implement a toy Ruby implementation.  This
+  is created for a series of articles, "Ruby de manabu Ruby (Learning Ruby by Ruby)",
+  in ASCII.jp
+email:
+- mame@ruby-lang.org
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".travis.yml"
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- lib/minruby.rb
+- minruby.gemspec
+homepage: http://github.com/mame/minruby/
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.6.7
+signing_key: 
+specification_version: 4
+summary: A helper library for "Ruby de manabu Ruby"
+test_files: []