error symbol typo

svn: r17198
This commit is contained in:
Eli Barzilay 2009-12-05 05:54:22 +00:00
parent 6ab2e7edad
commit 3caf087c97

View File

@ -241,7 +241,7 @@
(let ([r (get in read-sym src #|mod|# line col pos
(lambda (spec)
(lambda ()
(error self-sym "cannot find reader for `#lang ~a ~a'"
(error read-sym "cannot find reader for `#lang ~a ~a'"
self-sym
spec))))])
(let ([r (convert r)])