spec/foreign_hash_spec.rb in nydp-0.1.13.2 vs spec/foreign_hash_spec.rb in nydp-0.1.14

@@ -15,11 +15,11 @@
 
         expect(ahash[:keysym]).      to eq "foobar"
         expect(ahash[:keysym].class).to eq String
         expect(ahash.keys).          to eq [:keysym]
 
-        expect(vm.pop_arg).to eq v
+        expect(vm.args.pop).to eq v
       end
     end
 
     describe "hash get" do
       it "converts ruby value to nydp value" do
@@ -27,30 +27,30 @@
         k              = sym("keysym")
         args           = [ ahash, k ]
 
         Nydp::Builtin::HashGet.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq Nydp::StringAtom.new("avalue")
+        expect(vm.args.pop).to eq Nydp::StringAtom.new("avalue")
       end
 
       it "converts ruby nil to nydp value" do
         k              = sym("keysym")
         args           = [ ahash, k ]
 
         Nydp::Builtin::HashGet.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq Nydp.NIL
+        expect(vm.args.pop).to eq Nydp.NIL
       end
 
       it "converts ruby true to nydp value" do
         ahash[:keysym] = true
         k              = sym("keysym")
         args           = [ ahash, k ]
 
         Nydp::Builtin::HashGet.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq Nydp.T
+        expect(vm.args.pop).to eq Nydp.T
       end
     end
 
     describe "key?" do
       it "returns t when key is present" do
@@ -58,20 +58,20 @@
         k             = sym("simon")
         args          = [ ahash, k ]
 
         Nydp::Builtin::HashKeyPresent.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq Nydp.T
+        expect(vm.args.pop).to eq Nydp.T
       end
 
       it "returns nil when key is absent" do
         k             = sym("simon")
         args          = [ ahash, k ]
 
         Nydp::Builtin::HashKeyPresent.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq Nydp.NIL
+        expect(vm.args.pop).to eq Nydp.NIL
       end
     end
 
     describe "hash keys" do
       it "returns a list of keys" do
@@ -79,10 +79,10 @@
         ahash[:k1] = 84
         args       = [ahash]
 
         Nydp::Builtin::HashKeys.new(ns).invoke vm, pair_list(args)
 
-        expect(vm.pop_arg).to eq pair_list [sym("k0"), sym("k1")]
+        expect(vm.args.pop).to eq pair_list [sym("k0"), sym("k1")]
       end
     end
   end
 end