suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

proper error message

Browse Source 
svn: r11003
This commit is contained in:
Eli Barzilay 2008-07-31 09:24:17 +00:00
parent 9fc26a84c9
commit 7ef5249fa5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/scribblings/main/private/make-search.ss
View File

@ -122,7 +122,7 @@
(error "internal error: unexpected tooltip"))] (error "internal error: unexpected tooltip"))]
[else body])]) [else body])])
(values (compact-url href) (compact-body body)))] (values (compact-url href) (compact-body body)))]
[else (error "something bad happened")]))) [else (error "unexpected value rendered: ~e" e)])))
(define (lib->name lib) (define (lib->name lib)
(quote-string (let loop ([lib lib]) (quote-string (let loop ([lib lib])
(match lib (match lib