Parser Tests.
Array
(
[fun] => mws
[args] => foo
[expected] => K Object
(
[v:private] =>
[k:private] => foo
)
[actual] => K Object
(
[v:private] =>
[k:private] => foo
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo
[expected] => K Object
(
[v:private] => foo
[k:private] =>
)
[actual] => K Object
(
[v:private] => foo
[k:private] =>
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo bar
[expected] => K Object
(
[v:private] => foo
[k:private] => bar
)
[actual] => K Object
(
[v:private] => foo
[k:private] => bar
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo
[expected] => K Object
(
[v:private] => foo
[k:private] =>
)
[actual] => K Object
(
[v:private] => foo
[k:private] =>
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo bar
[expected] => K Object
(
[v:private] => foo
[k:private] => bar
)
[actual] => K Object
(
[v:private] => foo
[k:private] => bar
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo)
[expected] => K Object
(
[v:private] => foo
[k:private] => )
)
[actual] => K Object
(
[v:private] => foo
[k:private] => )
)
[status] => PASSED
)
Array
(
[fun] => msy
[args] => foo()
[expected] => K Object
(
[v:private] => foo
[k:private] => ()
)
[actual] => K Object
(
[v:private] => foo
[k:private] => ()
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => foo
[expected] => foo
[actual] => foo
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => @
[expected] => @
[actual] => @
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => ...
[expected] => ...
[actual] => ...
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => |||
[expected] => |||
[actual] => |||
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => ()
[expected] => nil
[actual] => nil
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo)
[expected] => Array
(
[0] => foo
)
[actual] => Array
(
[0] => foo
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo)
[expected] => Array
(
[0] => fuu
)
[actual] => Array
(
[0] => foo
)
[status] => FAILED
)
Array
(
[fun] => sexp
[args] => (foo bar)
[expected] => Array
(
[0] => foo
[1] => bar
)
[actual] => Array
(
[0] => foo
[1] => bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo (duh) bar)
[expected] => Array
(
[0] => foo
[1] => Array
(
[0] => duh
)
[2] => bar
)
[actual] => Array
(
[0] => foo
[1] => Array
(
[0] => duh
)
[2] => bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo () bar)
[expected] => Array
(
[0] => foo
[1] => nil
[2] => bar
)
[actual] => Array
(
[0] => foo
[1] => nil
[2] => bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo . bar)
[expected] => Array
(
[0] => foo
[1] => bar
)
[actual] => Array
(
[0] => foo
[1] => bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo. bar)
[expected] => Array
(
[0] => foo.
[1] => bar
)
[actual] => Array
(
[0] => foo.
[1] => bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo .bar)
[expected] => Array
(
[0] => foo
[1] => .bar
)
[actual] => Array
(
[0] => foo
[1] => .bar
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => ((()))
[expected] => Array
(
[0] => Array
(
[0] => nil
)
)
[actual] => Array
(
[0] => Array
(
[0] => nil
)
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo . ())
[expected] => Array
(
[0] => foo
[1] => nil
)
[actual] => Array
(
[0] => foo
[1] => nil
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo (foo . ()))
[expected] => Array
(
[0] => foo
[1] => Array
(
[0] => foo
[1] => nil
)
)
[actual] => Array
(
[0] => foo
[1] => Array
(
[0] => foo
[1] => nil
)
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (foo . (foo . ()))
[expected] => Array
(
[0] => foo
[1] => Array
(
[0] => foo
[1] => nil
)
)
[actual] => Array
(
[0] => foo
[1] => Array
(
[0] => foo
[1] => nil
)
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (() . ())
[expected] => Array
(
[0] => nil
[1] => nil
)
[actual] => Array
(
[0] => nil
[1] => nil
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (duh . (foo . bar))
[expected] => Array
(
[0] => duh
[1] => Array
(
[0] => foo
[1] => bar
)
)
[actual] => Array
(
[0] => duh
[1] => Array
(
[0] => foo
[1] => bar
)
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (duh . (foo . ()))
[expected] => Array
(
[0] => duh
[1] => Array
(
[0] => foo
[1] => nil
)
)
[actual] => Array
(
[0] => duh
[1] => Array
(
[0] => foo
[1] => nil
)
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (define (thunk) ())
[expected] => Array
(
[0] => define
[1] => Array
(
[0] => thunk
)
[2] => nil
)
[actual] => Array
(
[0] => define
[1] => Array
(
[0] => thunk
)
[2] => nil
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (define id (x) x)
[expected] => Array
(
[0] => define
[1] => id
[2] => Array
(
[0] => x
)
[3] => x
)
[actual] => Array
(
[0] => define
[1] => id
[2] => Array
(
[0] => x
)
[3] => x
)
[status] => PASSED
)
Array
(
[fun] => sexp
[args] => (define (fact n) (cond ((< n 2) 1) (t (* n (fact (1- n))))))
[expected] => Array
(
[0] => define
[1] => Array
(
[0] => fact
[1] => n
)
[2] => Array
(
[0] => cond
[1] => Array
(
[0] => Array
(
[0] => <
[1] => n
[2] => 2
)
[1] => 1
)
[2] => Array
(
[0] => t
[1] => Array
(
[0] => *
[1] => n
[2] => Array
(
[0] => fact
[1] => Array
(
[0] => 1-
[1] => n
)
)
)
)
)
)
[actual] => Array
(
[0] => define
[1] => Array
(
[0] => fact
[1] => n
)
[2] => Array
(
[0] => cond
[1] => Array
(
[0] => Array
(
[0] => <
[1] => n
[2] => 2
)
[1] => 1
)
[2] => Array
(
[0] => t
[1] => Array
(
[0] => *
[1] => n
[2] => Array
(
[0] => fact
[1] => Array
(
[0] => 1-
[1] => n
)
)
)
)
)
)
[status] => PASSED
)
Parser Tests End.