spec/symbol_spec.rb in nydp-0.1.15 vs spec/symbol_spec.rb in nydp-0.2.0
- old
+ new
@@ -1,11 +1,11 @@
require 'spec_helper'
describe Nydp::Symbol do
let(:bar) { Nydp::Symbol.mk :BAR, ns }
let(:foo) { Nydp::Symbol.mk :FOO, ns }
- let(:vm) { Nydp::VM.new }
+ let(:vm) { Nydp::VM.new(ns) }
it "returns a ruby symbol in #to_ruby" do
sym = Nydp::Symbol.mk :foo, ns
expect(sym.to_ruby).to eq :foo
end
@@ -41,37 +41,37 @@
expect(sym1.eql? sym2).to eq true
expect(sym1.equal? sym2).to eq false
end
it "works with builtin greater-than when true" do
- f = Nydp::Builtin::GreaterThan.new
+ f = Nydp::Builtin::GreaterThan.instance
f.invoke vm, pair_list([foo, bar])
- expect(vm.args.pop).to eq Nydp.T
+ expect(vm.args.pop).to eq Nydp::T
end
it "works with builtin greater-than when false" do
- f = Nydp::Builtin::GreaterThan.new
+ f = Nydp::Builtin::GreaterThan.instance
f.invoke vm, pair_list([bar, foo])
- expect(vm.args.pop).to eq Nydp.NIL
+ expect(vm.args.pop).to eq Nydp::NIL
end
it "works with builtin less-than when true" do
- f = Nydp::Builtin::LessThan.new
+ f = Nydp::Builtin::LessThan.instance
f.invoke vm, pair_list([bar, foo])
- expect(vm.args.pop).to eq Nydp.T
+ expect(vm.args.pop).to eq Nydp::T
end
it "works with builtin less-than when false" do
- f = Nydp::Builtin::LessThan.new
+ f = Nydp::Builtin::LessThan.instance
f.invoke vm, pair_list([foo, bar])
- expect(vm.args.pop).to eq Nydp.NIL
+ expect(vm.args.pop).to eq Nydp::NIL
end
end