diff options
Diffstat (limited to 'spec/cell_spec.moon')
| -rw-r--r-- | spec/cell_spec.moon | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/spec/cell_spec.moon b/spec/cell_spec.moon index b31ef99..fcf9861 100644 --- a/spec/cell_spec.moon +++ b/spec/cell_spec.moon @@ -1,31 +1,31 @@ -import Cell, RootCell, Const, Scope, globals from require 'core' +import Cell, RootCell, Value, Scope, globals from require 'core' import Registry from require 'core.registry' import Logger from require 'logger' Logger.init 'silent' -hello_world = Cell nil, { (Const.sym 'hello'), (Const.str 'world') } -two_plus_two = Cell nil, { (Const.sym '+'), (Const.num 2), (Const.num 2) } +hello_world = Cell nil, { (Value.sym 'hello'), (Value.str 'world') } +two_plus_two = Cell nil, { (Value.sym '+'), (Value.num 2), (Value.num 2) } describe 'Cell', -> it 'supports quoting', -> with hello_world\quote! assert.is.equal Cell, .__class - assert.is.equal (Const.sym 'hello'), \head! - assert.is.same { Const.str 'world' }, \tail! + assert.is.equal (Value.sym 'hello'), \head! + assert.is.same { Value.str 'world' }, \tail! with two_plus_two\quote! assert.is.equal Cell, .__class - assert.is.equal (Const.sym '+'), \head! - assert.is.same { (Const.num 2), (Const.num 2) }, \tail! + assert.is.equal (Value.sym '+'), \head! + assert.is.same { (Value.num 2), (Value.num 2) }, \tail! describe 'RootCell', -> test 'head is always "do"', -> cell = RootCell\parse {} - assert.is.equal (Const.sym 'do'), cell\head! + assert.is.equal (Value.sym 'do'), cell\head! cell = RootCell nil, { hello_world, two_plus_two } - assert.is.equal (Const.sym 'do'), cell\head! + assert.is.equal (Value.sym 'do'), cell\head! test 'tail is all children', -> cell = RootCell\parse {} |