Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
executable file 13 lines (11 sloc) 427 Bytes
;evaluator functions (define bindings '()) (define init-evaluator (lambda () (begin (set! bindings '((#\A ()) (#\B ()) (#\C ()) (#\D ()) (#\E ()) (#\F ()) (#\G ()) (#\H ()) (#\I ()) (#\J ()) (#\K ()) (#\L ()) (#\M ()) (#\N ()) (#\O ()) (#\P ()) (#\Q ()) (#\R ()) (#\S ()) (#\T ()) (#\U ()) (#\V ()) (#\W ()) (#\X ()) (#\Y ()) (#\Z ()))) (init-parser))))