suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

doc repairs and r6rs repairs

Browse Source 
svn: r8754

original commit: f39b12a55585ff049dd7761f1b70dca0552c3086
This commit is contained in:
Matthew Flatt 2008-02-21 14:49:58 +00:00
parent 1cc6ff191b
commit 8c0cd81337
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scribble/run.ss
View File

@ -92,6 +92,6 @@
(when (current-info-output-file) (when (current-info-output-file)
(let ([s (send renderer serialize-info r-info)]) (let ([s (send renderer serialize-info r-info)])
(with-output-to-file (current-info-output-file) (with-output-to-file (current-info-output-file)
#:exists 'truncate/replace
(lambda () (lambda ()
(write s)))))))))))) (write s))
'truncate/replace))))))))))

4
collects/scribble/struct.ss
View File

@ -191,7 +191,7 @@
(with-handlers ([exn:fail:contract? (with-handlers ([exn:fail:contract?
(lambda (exn) (lambda (exn)
(error 'serialize-delayed-element (error 'serialize-delayed-element
"serialization failed (wrong resolve info?); ~a" "serialization failed (wrong resolve info? delayed element never rendered?); ~a"
(exn-message exn)))]) (exn-message exn)))])
(vector (vector
(make-element #f (delayed-element-content d ri)))))) (make-element #f (delayed-element-content d ri))))))
@ -234,7 +234,7 @@
(with-handlers ([exn:fail:contract? (with-handlers ([exn:fail:contract?
(lambda (exn) (lambda (exn)
(error 'serialize-part-relative-element (error 'serialize-part-relative-element
"serialization failed (wrong resolve info?); ~a" "serialization failed (wrong resolve info? part-relative element never rendered?); ~a"
(exn-message exn)))]) (exn-message exn)))])
(vector (vector
(make-element #f (part-relative-element-content d ri)))))) (make-element #f (part-relative-element-content d ri))))))