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 (let ([r (get in read-sym src #|mod|# line col pos
(lambda (spec) (lambda (spec)
(lambda () (lambda ()
(error self-sym "cannot find reader for `#lang ~a ~a'" (error read-sym "cannot find reader for `#lang ~a ~a'"
self-sym self-sym
spec))))]) spec))))])
(let ([r (convert r)]) (let ([r (convert r)])