mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-28 14:35:07 +02:00
10 lines
282 B
Scheme
10 lines
282 B
Scheme
(import (scheme base)
|
|
(scheme file)
|
|
(scheme write))
|
|
|
|
; TODO: I think this compiles OK (test), but interpreter does not like it:
|
|
;cyclone>
|
|
(call-with-output-file "test.txt" (lambda (port) (write 'ok port)))
|
|
;Error: Unable to evaluate: ((procedure () ...) <port>)
|
|
|
|
|