elf
/
LispInSmallPieces
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Elf clarified test messages to distinguish interpreter cores.

This commit is contained in:
Elf M. Sternberg 2015-06-17 15:35:16 -07:00
parent b8a19d5c79
commit df6f3f17ae
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/test_chapter1.coffee
View File

@ -8,7 +8,7 @@ lisp = require '../chapter1/interpreter'
the_false_value = (cons "false", "boolean") the_false_value = (cons "false", "boolean")
describe "Core interpreter", -> describe "Core interpreter #1", ->
it "Should handle true statements", -> it "Should handle true statements", ->
expect(lisp read "(begin (if (lt 0 1) #t #f))").to.equal(true) expect(lisp read "(begin (if (lt 0 1) #t #f))").to.equal(true)
it "Should handle false statements", -> it "Should handle false statements", ->

2
test/test_chapter3.coffee
View File

@ -5,7 +5,7 @@ expect = chai.expect
lisp = require '../chapter3/interpreter' lisp = require '../chapter3/interpreter'
{read, readForms} = require '../chapter1/reader' {read, readForms} = require '../chapter1/reader'
describe "Core interpreter", -> describe "Core interpreter #3", ->
it "Should handle if statements", -> it "Should handle if statements", ->
expect(lisp read "(begin (if (lt 0 1) #t #f))").to.equal(true) expect(lisp read "(begin (if (lt 0 1) #t #f))").to.equal(true)
expect(lisp read "(begin (if (lt 1 0) #t #f))").to.equal(false) expect(lisp read "(begin (if (lt 1 0) #t #f))").to.equal(false)