3 lines
114 B
Text
3 lines
114 B
Text
|
(define my-file (file-open-read "my-file.txt"))
|
||
|
|
(if my-file (write (read-all my-file)) (! "Could not open file"))
|