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

temporary hack for PR7782

Browse Source 
svn: r1697
This commit is contained in:
Eli Barzilay 2005-12-27 17:36:38 +00:00
parent ba4285a9d5
commit 678477648b
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/swindle/extra.ss
View File

@ -601,6 +601,7 @@
;;> Swindle values in errors, when using `printf' etc. ;;> Swindle values in errors, when using `printf' etc.
(define* (install-swindle-printer) (define* (install-swindle-printer)
(global-port-print-handler write-object) (global-port-print-handler write-object)
(current-print write-object) ; see PR7782
(port-display-handler (current-output-port) display-object) (port-display-handler (current-output-port) display-object)
(port-display-handler (current-error-port) display-object) (port-display-handler (current-error-port) display-object)
(port-write-handler (current-output-port) write-object) (port-write-handler (current-output-port) write-object)