svn: r5361
This commit is contained in:
Eli Barzilay 2007-01-16 04:34:13 +00:00
parent 3dae5ee445
commit d570c1c0bd

View File

@ -93,7 +93,7 @@
[(bytes? inp) (open-input-bytes inp)]
[(path? inp) (open-input-file inp)]
[else (error 'read-code "bad input: ~e" inp)])])
(port-count-lines! current-input-port)
(port-count-lines! (current-input-port))
((sandbox-reader))))
(define (evaluate-program language teachpacks input-program uncovered!)