brainfuck 0.1.2 → 0.2.0

data/test/brainfuck/parser_test.rb

@@ -0,0 +1,16 @@
+require 'test_helper'
+
+module Brainfuck
+  class ParserTest < MiniTest::Unit::TestCase
+
+    %w{fwd bwd inc dec puts gets iteration exp}.each do |rule|
+      define_method "test_implements_a_#{rule}_rule" do
+        rules = Parser.rules.map(&:first).map do |pattern|
+          pattern.instance_variable_get(:@pattern)
+        end.map(&:keys).flatten
+        assert_includes rules, rule.to_sym
+      end
+    end
+
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+require 'rubygems' if RUBY_VERSION == '1.8.7'
+
+require 'bundler/setup'
+
+gem 'minitest'
+require 'minitest/unit'
+require 'minitest/autorun'
+require 'mocha'
+
+require 'brainfuck'

metadata

@@ -1,12 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: brainfuck
 version: !ruby/object:Gem::Version 
-  prerelease: false
+  hash: 23
+  prerelease: 
   segments: 
   - 0
-  - 1
   - 2
-  version: 0.1.2
+  - 0
+  version: 0.2.0
 platform: ruby
 authors: 
 - Josep M. Bach
@@ -14,75 +15,52 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-02-02 00:00:00 +01:00
+date: 2011-05-16 00:00:00 +02:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
-  name: highline
+  name: parslet
   prerelease: false
   requirement: &id001 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
+        hash: 3
         segments: 
         - 0
         version: "0"
   type: :runtime
   version_requirements: *id001
 - !ruby/object:Gem::Dependency 
-  name: parslet
+  name: minitest
   prerelease: false
   requirement: &id002 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
+        hash: 3
         segments: 
         - 0
         version: "0"
-  type: :runtime
+  type: :development
   version_requirements: *id002
 - !ruby/object:Gem::Dependency 
-  name: rspec
+  name: mocha
   prerelease: false
   requirement: &id003 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
+        hash: 3
         segments: 
         - 0
         version: "0"
   type: :development
   version_requirements: *id003
-- !ruby/object:Gem::Dependency 
-  name: bundler
-  prerelease: false
-  requirement: &id004 !ruby/object:Gem::Requirement 
-    none: false
-    requirements: 
-    - - ">="
-      - !ruby/object:Gem::Version 
-        segments: 
-        - 0
-        version: "0"
-  type: :development
-  version_requirements: *id004
-- !ruby/object:Gem::Dependency 
-  name: simplecov
-  prerelease: false
-  requirement: &id005 !ruby/object:Gem::Requirement 
-    none: false
-    requirements: 
-    - - ">="
-      - !ruby/object:Gem::Version 
-        segments: 
-        - 0
-        version: "0"
-  type: :development
-  version_requirements: *id005
-description: Another Brainfuck interpreter in Ruby
+description: An implementation of Brainfuck on the Rubinius VM.
 email: 
 - josep.m.bach@gmail.com
 executables: 
@@ -104,17 +82,18 @@ files:
 - examples/hello_world.bf
 - lib/brainfuck.rb
 - lib/brainfuck/ast.rb
-- lib/brainfuck/interpreter.rb
+- lib/brainfuck/code_loader.rb
+- lib/brainfuck/compiler.rb
+- lib/brainfuck/lexer.rb
+- lib/brainfuck/main.rb
 - lib/brainfuck/parser.rb
-- lib/brainfuck/stack.rb
+- lib/brainfuck/stages.rb
 - lib/brainfuck/version.rb
-- spec/acceptance/acceptance_spec.rb
-- spec/brainfuck/ast_spec.rb
-- spec/brainfuck/interpreter_spec.rb
-- spec/brainfuck/parser_spec.rb
-- spec/brainfuck/stack_spec.rb
-- spec/brainfuck_spec.rb
-- spec/spec_helper.rb
+- test/acceptance/acceptance_test.rb
+- test/brainfuck/ast_test.rb
+- test/brainfuck/lexer_test.rb
+- test/brainfuck/parser_test.rb
+- test/test_helper.rb
 has_rdoc: true
 homepage: http://github.com/txus/brainfuck
 licenses: []
@@ -129,6 +108,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
@@ -137,21 +117,20 @@ required_rubygems_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
 requirements: []
 
 rubyforge_project: brainfuck
-rubygems_version: 1.3.7
+rubygems_version: 1.5.2
 signing_key: 
 specification_version: 3
-summary: Another Brainfuck interpreter in Ruby
+summary: An implementation of Brainfuck on the Rubinius VM.
 test_files: 
-- spec/acceptance/acceptance_spec.rb
-- spec/brainfuck/ast_spec.rb
-- spec/brainfuck/interpreter_spec.rb
-- spec/brainfuck/parser_spec.rb
-- spec/brainfuck/stack_spec.rb
-- spec/brainfuck_spec.rb
-- spec/spec_helper.rb
+- test/acceptance/acceptance_test.rb
+- test/brainfuck/ast_test.rb
+- test/brainfuck/lexer_test.rb
+- test/brainfuck/parser_test.rb
+- test/test_helper.rb

data/lib/brainfuck/interpreter.rb

@@ -1,20 +0,0 @@
-module Brainfuck
-  class Interpreter < Parslet::Transform
-    def self.stack
-      @@stack ||= Stack.new
-    end
-    
-    rule(:fwd => simple(:fwd))            { AST::FwdNode.new(Interpreter.stack) }
-    rule(:bwd => simple(:bwd))            { AST::BwdNode.new(Interpreter.stack) }
-
-    rule(:inc => simple(:inc))            { AST::IncNode.new(Interpreter.stack) }
-    rule(:dec => simple(:dec))            { AST::DecNode.new(Interpreter.stack) }
-
-    rule(:puts => simple(:puts))          { AST::PutsNode.new(Interpreter.stack) }
-    rule(:gets => simple(:gets))          { AST::GetsNode.new(Interpreter.stack) }
-
-    rule(:iteration => subtree(:iteration)) { AST::IterationNode.new(Interpreter.stack, iteration) }
-
-    rule(:exp => subtree(:exp)) { exp }
-  end
-end

data/lib/brainfuck/stack.rb

@@ -1,51 +0,0 @@
-module Brainfuck
-  class Stack
-    include HighLine::SystemExtensions
-
-    attr_reader :current
-    def initialize
-      @pointer = 0
-      @stack = [0]
-    end
-    def current
-      @stack[@pointer]
-    end
-    def fwd
-      @pointer += 1
-      initialize_cell_if_nil
-    end
-    def bwd
-      @pointer -= 1
-      ensure_pointer_is_above_zero
-      initialize_cell_if_nil
-    end
-    def inc
-      @stack[@pointer] = (current + 1) % 255
-    end
-    def dec
-      @stack[@pointer] = (current - 1) % 255
-    end
-    def puts
-      $stdout.print current.chr
-    end
-    def gets
-      @stack[@pointer] = (get_character % 255) rescue 0
-    end
-
-    def to_a
-      @stack
-    end
-
-    def clear
-      initialize
-    end
-
-    private
-    def initialize_cell_if_nil
-      @stack[@pointer] ||= 0
-    end
-    def ensure_pointer_is_above_zero
-      raise "Tried to access cell #{@pointer}." if @pointer < 0
-    end
-  end
-end

data/spec/acceptance/acceptance_spec.rb

@@ -1,105 +0,0 @@
-require 'spec_helper'
-
-module Brainfuck
-  describe "Acceptance specs" do
-
-    subject { Brainfuck }
-
-    describe "without loops nor user input" do
-      let(:code) do
-        <<-EOS
-          ++++>++++---.<--.
-        EOS
-      end
-      it "sets two cells to 2 and 1" do
-        subject.run(code).should == [2,1]
-      end
-      it "prints 2 and 1" do
-        $stdout.should_receive(:print).twice
-        subject.run code
-      end
-    end
-
-    describe "with user input" do
-      let(:code) do
-        <<-EOS
-          ,++++
-        EOS
-      end
-      it "sets the first cell to a + 4" do
-        stack = Stack.new
-        Interpreter.stub(:stack).and_return stack
-
-        stack.should_receive(:get_character).once.and_return 97
-
-        subject.run(code).should == [101]
-      end
-    end
-
-    describe "with loops" do
-      let(:code) do
-        <<-EOS
-          ++++[-]+-+
-        EOS
-      end
-      it "runs the loop 4 times" do
-        subject.run(code).should == [1]
-      end
-    end
-    
-    describe "cell hopping examples" do
-
-      it "transfers the content from one cell to another" do
-        subject.run("++++++++++      [>+<-]").should == [0,10]
-      end
-
-      it "transfers the content from one cell to the third" do
-        subject.run("++++++++++      [>+<-]>[>+<-]").should == [0,0,10]
-      end
-
-      it "transfers the content from one cell to the third and back to the second" do
-        subject.run("++++++++++      [>+<-]>[>+<-]>[<+>-]").should == [0,10,0]
-      end
-
-    end
-
-    describe "nested loop examples" do
-
-      it "work flawlessly" do
-        subject.run("[++++++++++[-]+-+-]").should == [0]
-      end
-
-    end
-
-    describe "hello world" do
-
-      it "displays hello world" do
-        subject.run <<-EOS
-          +++++ +++++            
-          [                      
-              > +++++ ++         
-              > +++++ +++++      
-              > +++              
-              > +                
-              <<<< -              
-          ]                   
-          > ++ .                  
-          > + .                   
-          +++++ ++ .              
-          .                       
-          +++ .                   
-          > ++ .                  
-          << +++++ +++++ +++++ .  
-          > .                     
-          +++ .                   
-          ----- - .               
-          ----- --- .             
-          > + .                   
-          > .                     
-  EOS
-
-      end
-    end
-
-  end
-end

data/spec/brainfuck/ast_spec.rb

@@ -1,36 +0,0 @@
-require 'spec_helper'
-
-module Brainfuck
-  describe AST do
-    let(:stack) { double('stack') }
-
-    %w{fwd bwd inc dec puts gets}.each do |node|
-      describe "AST::#{node.capitalize}Node" do
-        subject { eval("AST::#{node.capitalize}Node").new stack }
-        describe "#eval" do
-          it "calls stack##{node}" do
-            subject.stack.should_receive(node)
-            subject.eval
-          end
-        end
-      end
-    end
-
-    describe AST::IterationNode do
-      let(:nodes) do
-        [ double('node'), double('node2') ]
-      end
-      subject { AST::IterationNode.new stack, nodes }
-      describe "#eval" do
-        it 'evaluates the expression until the stack cell is 0' do
-          subject.stack.stub(:current).and_return 3, 2, 1, 0
-          nodes.each do |node|
-            node.should_receive(:eval).exactly(3).times
-          end
-          subject.eval
-        end
-      end
-    end
-
-  end
-end

data/spec/brainfuck/interpreter_spec.rb

@@ -1,25 +0,0 @@
-require 'spec_helper'
-
-module Brainfuck
-  describe Interpreter do
-
-    describe ".stack" do
-      it 'returns a new or cached Stack' do
-        stack = Interpreter.stack
-        stack.should be_kind_of(Stack)
-        Interpreter.stack.should === stack
-      end
-    end
-
-    describe "rules" do
-      %w{fwd bwd inc dec puts gets iteration exp}.each do |rule|
-        it "implements a rule for :#{rule} node" do
-          subject.rules.map(&:first).map do |pattern|
-            pattern.instance_variable_get(:@pattern)
-          end.map(&:keys).flatten.should include(:"#{rule}")
-        end
-      end
-    end
-    
-  end
-end

data/spec/brainfuck/parser_spec.rb

@@ -1,27 +0,0 @@
-require 'spec_helper'
-
-module Brainfuck
-  describe Parser do
-
-    describe "INSTRUCTIONS constant" do
-      it 'returns valid symbols' do
-        Parser::INSTRUCTIONS.should == %w{> < + - [ ] . ,}
-      end
-    end
-
-    describe ".clean" do
-      it 'cleans all non-valid symbols from a string' do
-        Parser.clean(">3< 223+fn - ()()[r23-] .bdn*& ,").should == '><+-[-].,'
-      end
-    end
-
-    describe "rules" do
-      %w{lparen rparen space space? fwd bwd inc dec puts gets iteration expression}.each do |rule|
-        it "implements a rule for :#{rule} node" do
-          subject.should respond_to(:"#{rule}")
-        end
-      end
-    end
-    
-  end
-end