File tree 1 file changed +6
-6
lines changed 1 file changed +6
-6
lines changed Original file line number Diff line number Diff line change 7
7
8
8
class LispTokenizer (s : String ) extends Iterator [String ] {
9
9
private var i = 0 ;
10
- private def isDelimiter (ch : Char ) = ch <= ' ' || ch == '{ ' || ch == '} '
10
+ private def isDelimiter (ch : Char ) = ch <= ' ' || ch == '( ' || ch == ') '
11
11
def hasNext : Boolean = {
12
12
while (i < s.length() && s.charAt(i) <= ' ' ) i += 1
13
13
i < s.length()
@@ -459,11 +459,11 @@ class LispUser(lisp: Lisp) {
459
459
Console .println(lisp2string(string2lisp(" (lambda (x) (+ (* x x) 1))" )));
460
460
Console .println();
461
461
462
- Console .println(" ( '{ 1 2 3} ) = " + evaluate(" (quote(1 2 3))" ));
463
- Console .println(" (car '{ 1 2 3} ) = " + evaluate(" (car (quote(1 2 3)))" ));
464
- Console .println(" (cdr '{ 1 2 3} ) = " + evaluate(" (cdr (quote(1 2 3)))" ));
465
- Console .println(" (null? '{ 2 3} ) = " + evaluate(" (null? (quote(2 3)))" ));
466
- Console .println(" (null? '{} ) = " + evaluate(" (null? (quote()))" ));
462
+ Console .println(" ( '( 1 2 3) ) = " + evaluate(" (quote(1 2 3))" ));
463
+ Console .println(" (car '( 1 2 3) ) = " + evaluate(" (car (quote(1 2 3)))" ));
464
+ Console .println(" (cdr '( 1 2 3) ) = " + evaluate(" (cdr (quote(1 2 3)))" ));
465
+ Console .println(" (null? '( 2 3) ) = " + evaluate(" (null? (quote(2 3)))" ));
466
+ Console .println(" (null? '() ) = " + evaluate(" (null? (quote()))" ));
467
467
Console .println();
468
468
469
469
Console .println(" faculty(10) = " + evaluate(
You can’t perform that action at this time.
0 commit comments