koi-vm 0.0.1 → 0.0.2

data/VERSION

@@ -1 +1 @@
-0.0.1
+0.0.2

data/koi-vm.gemspec

@@ -5,7 +5,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{koi-vm}
-  s.version = "0.0.1"
+  s.version = "0.0.2"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
   s.authors = ["Aaron Gough"]
@@ -34,6 +34,7 @@ Gem::Specification.new do |s|
      "lib/koi-vm/opcodes/_value_constants.rb",
      "lib/koi-vm/opcodes/comparative_operations/equal.rb",
      "lib/koi-vm/opcodes/comparative_operations/greater_than.rb",
+     "lib/koi-vm/opcodes/comparative_operations/invert.rb",
      "lib/koi-vm/opcodes/comparative_operations/less_than.rb",
      "lib/koi-vm/opcodes/control_operations/exit.rb",
      "lib/koi-vm/opcodes/control_operations/no_op.rb",
@@ -75,6 +76,7 @@ Gem::Specification.new do |s|
      "test/test_helper.rb",
      "test/unit/opcodes/comparative_operations/equal_test.rb",
      "test/unit/opcodes/comparative_operations/greater_than_test.rb",
+     "test/unit/opcodes/comparative_operations/invert_test.rb",
      "test/unit/opcodes/comparative_operations/less_than_test.rb",
      "test/unit/opcodes/control_operations/exit_test.rb",
      "test/unit/opcodes/control_operations/no_op_test.rb",
@@ -122,6 +124,7 @@ Gem::Specification.new do |s|
      "test/test_helper.rb",
      "test/unit/opcodes/comparative_operations/equal_test.rb",
      "test/unit/opcodes/comparative_operations/greater_than_test.rb",
+     "test/unit/opcodes/comparative_operations/invert_test.rb",
      "test/unit/opcodes/comparative_operations/less_than_test.rb",
      "test/unit/opcodes/control_operations/exit_test.rb",
      "test/unit/opcodes/control_operations/no_op_test.rb",

data/lib/koi-vm/opcodes/_opcode_constants.rb

@@ -34,6 +34,7 @@ module KoiVM
   EQUAL         = 100
   LESS_THAN     = 101
   GREATER_THAN  = 102
+  INVERT        = 103
   
   # 120
   PRINT         = 120

data/lib/koi-vm/opcodes/comparative_operations/invert.rb

@@ -0,0 +1,12 @@
+module KoiVM
+  class VM
+    
+    @@instruction[INVERT] = Proc.new() do |vm|
+      raise StackError, "Expecting at least one item on the data stack" unless(vm.data_stack.length > 0)
+      raise StackError, "Expecting boolean value" unless(vm.data_stack[-1][0] == BOOL_)
+      vm.data_stack[-1][1] = !vm.data_stack[-1][1]
+      vm.instruction_pointer = vm.instruction_pointer + 1
+    end
+    
+  end
+end

data/test/unit/opcodes/comparative_operations/invert_test.rb

@@ -0,0 +1,44 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', '..', '..', 'test_helper.rb'))
+
+class InvertTest < Test::Unit::TestCase
+
+  include KoiVM
+  
+  test "should invert boolean value true -> false" do
+    vm = VM.new
+    vm.data_stack = [[BOOL_, true]]
+    vm.run [
+      INVERT
+    ]
+    assert_equal [[BOOL_, false]], vm.data_stack
+  end
+  
+  test "should invert boolean value false -> true" do
+    vm = VM.new
+    vm.data_stack = [[BOOL_, false]]
+    vm.run [
+      INVERT
+    ]
+    assert_equal [[BOOL_, true]], vm.data_stack
+  end
+  
+  test "should raise StackError topmost stack value is not a bool" do
+    assert_raises StackError do
+      vm = VM.new
+      vm.data_stack = [[INTEGER_, 1]]
+      vm.run [
+        INVERT
+      ]
+    end
+  end
+  
+  test "should raise StackError if there are no items on the stack" do
+    assert_raises StackError do
+      vm = VM.new
+      vm.run [
+        INVERT
+      ]
+    end
+  end
+  
+end

metadata

@@ -5,8 +5,8 @@ version: !ruby/object:Gem::Version
   segments: 
   - 0
   - 0
-  - 1
-  version: 0.0.1
+  - 2
+  version: 0.0.2
 platform: ruby
 authors: 
 - Aaron Gough
@@ -45,6 +45,7 @@ files:
 - lib/koi-vm/opcodes/_value_constants.rb
 - lib/koi-vm/opcodes/comparative_operations/equal.rb
 - lib/koi-vm/opcodes/comparative_operations/greater_than.rb
+- lib/koi-vm/opcodes/comparative_operations/invert.rb
 - lib/koi-vm/opcodes/comparative_operations/less_than.rb
 - lib/koi-vm/opcodes/control_operations/exit.rb
 - lib/koi-vm/opcodes/control_operations/no_op.rb
@@ -86,6 +87,7 @@ files:
 - test/test_helper.rb
 - test/unit/opcodes/comparative_operations/equal_test.rb
 - test/unit/opcodes/comparative_operations/greater_than_test.rb
+- test/unit/opcodes/comparative_operations/invert_test.rb
 - test/unit/opcodes/comparative_operations/less_than_test.rb
 - test/unit/opcodes/control_operations/exit_test.rb
 - test/unit/opcodes/control_operations/no_op_test.rb
@@ -161,6 +163,7 @@ test_files:
 - test/test_helper.rb
 - test/unit/opcodes/comparative_operations/equal_test.rb
 - test/unit/opcodes/comparative_operations/greater_than_test.rb
+- test/unit/opcodes/comparative_operations/invert_test.rb
 - test/unit/opcodes/comparative_operations/less_than_test.rb
 - test/unit/opcodes/control_operations/exit_test.rb
 - test/unit/opcodes/control_operations/no_op_test.rb