Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-23 20:15:05 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Define current-output-port without extra lambda lvl

Browse source
This commit is contained in:
Justin Ethier 2015-06-10 21:29:29 -04:00
parent 7905d9b181
commit a1898f20ab
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scheme/base.sld
View file

@ -282,7 +282,7 @@
converter)
(else
(error "bad parameter syntax"))))))
(define (current-output-port)
(define current-output-port
(make-parameter 'TODO-Cyc-stdout)) ;; TODO: need to expose stdout as a port obj
(define (error msg . args)
(raise (cons msg args)))