evaluator: add simple no-op evaluator and tests

src/Phsyche.package/Phsyche.class/instance/eval..st

@@ -0,0 +1,3 @@
+as yet unclassified
+eval: expression
+	^ self eval: expression in: nil

src/Phsyche.package/Phsyche.class/instance/eval.in..st

@@ -0,0 +1,3 @@
+as yet unclassified
+eval: expression in: anEnvironment
+	^ expression

src/Phsyche.package/Phsyche.class/instance/parseAndEval..st

@@ -0,0 +1,3 @@
+as yet unclassified
+parseAndEval: anExpression
+	^ self eval: (self parse: anExpression)

src/Phsyche.package/PhsycheTest.class/instance/testEvalBoolean.st

@@ -0,0 +1,4 @@
+tests
+testEvalBoolean
+	self assert: (ph parseAndEval: 'true') equals: true.
+	self assert: (ph parseAndEval: 'false') equals: false.

src/Phsyche.package/PhsycheTest.class/instance/testEvalEmptyList.st

@@ -0,0 +1,3 @@
+tests
+testEvalEmptyList
+	self assert: (ph parseAndEval: '()') equals: #()

src/Phsyche.package/PhsycheTest.class/instance/testEvalNumber.st

@@ -0,0 +1,4 @@
+tests
+testEvalNumber
+	self assert: (ph parseAndEval: '12') equals: 12.
+	self assert: (ph parseAndEval: '3.14') equals: 3.14.