rb-scheme 0.3.5

data/lib/rb-scheme/vm/box.rb

@@ -0,0 +1,17 @@
+module RbScheme
+  class VM
+    class Box
+      def initialize(val)
+        @value = val
+      end
+
+      def set_box!(val)
+        @value = val
+      end
+
+      def unbox
+        @value
+      end
+    end
+  end
+end

data/lib/rb-scheme/vm/stack.rb

@@ -0,0 +1,45 @@
+module RbScheme
+  class VM
+    class Stack
+
+      def initialize
+        @stack ||= Array.new(1000)
+      end
+
+      def push(val, stack_p)
+        @stack[stack_p] = val
+        stack_p + 1
+      end
+
+      OFFSET = 1
+
+      def index(stack_p, i)
+        @stack[stack_p - (i + OFFSET)]
+      end
+
+      def index_set!(stack_p, i, val)
+        @stack[stack_p - (i + OFFSET)] = val
+      end
+
+      def save_stack(stack_p)
+        v = Array.new(stack_p)
+        i = 0
+        until i == stack_p
+          v[i] = @stack[i]
+          i += 1
+        end
+        v
+      end
+
+      def restore_stack(saved_stack)
+        s = saved_stack.length
+        i = 0
+        until i == s do
+          @stack[i] = saved_stack[i]
+          i += 1
+        end
+        s
+      end
+    end # Stack
+  end # VM
+end # RbScheme

data/rb-scheme.gemspec

@@ -0,0 +1,27 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'rb-scheme/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "rb-scheme"
+  spec.version       = RbScheme::VERSION
+  spec.authors       = ["tkhsh"]
+  spec.email         = ["uki.thashi@gmail.com"]
+
+  spec.summary       = %q{An implementation of Scheme written in Ruby.}
+  spec.description   = %q{An implementation of Scheme subset written in Ruby. It's based on the Stack-Based model introduced in Three Implementation Models for Scheme(http://www.cs.indiana.edu/~dyb/papers/3imp.pdf) by R. Kent Dybvig. The model is implemented by a compiler and virtual machine.}
+  spec.homepage      = "https://github.com/tkhsh/rb-scheme"
+  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"
+  spec.add_development_dependency "minitest", "~> 5.10"
+end

metadata

@@ -0,0 +1,118 @@
+--- !ruby/object:Gem::Specification
+name: rb-scheme
+version: !ruby/object:Gem::Version
+  version: 0.3.5
+platform: ruby
+authors:
+- tkhsh
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2017-06-18 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'
+- !ruby/object:Gem::Dependency
+  name: minitest
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '5.10'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '5.10'
+description: An implementation of Scheme subset written in Ruby. It's based on the
+  Stack-Based model introduced in Three Implementation Models for Scheme(http://www.cs.indiana.edu/~dyb/papers/3imp.pdf)
+  by R. Kent Dybvig. The model is implemented by a compiler and virtual machine.
+email:
+- uki.thashi@gmail.com
+executables:
+- rb-scheme
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.md
+- Rakefile
+- circle.yml
+- examples/nqueen.scm
+- examples/y_combinator.scm
+- exe/rb-scheme
+- lib/rb-scheme.rb
+- lib/rb-scheme/compiler.rb
+- lib/rb-scheme/evaluator.rb
+- lib/rb-scheme/executer.rb
+- lib/rb-scheme/extension.rb
+- lib/rb-scheme/extension/procedures.scm
+- lib/rb-scheme/global.rb
+- lib/rb-scheme/helpers.rb
+- lib/rb-scheme/lisp-objects.rb
+- lib/rb-scheme/parser.rb
+- lib/rb-scheme/primitive.rb
+- lib/rb-scheme/primitive/procedure.rb
+- lib/rb-scheme/printer.rb
+- lib/rb-scheme/symbol.rb
+- lib/rb-scheme/version.rb
+- lib/rb-scheme/vm.rb
+- lib/rb-scheme/vm/box.rb
+- lib/rb-scheme/vm/stack.rb
+- rb-scheme.gemspec
+homepage: https://github.com/tkhsh/rb-scheme
+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.4.5.2
+signing_key: 
+specification_version: 4
+summary: An implementation of Scheme written in Ruby.
+test_files: []