larcenists / larceny

Larceny Scheme implementation
Other
202 stars 32 forks source link

open-file-input/output-port should work when file does not exist #749

Closed WillClinger closed 8 years ago

WillClinger commented 8 years ago

Reported on '''comp.lang.scheme''' by Robert Schröder.

% larceny --r7rs
Larceny v0.98 "General Ripper" (Mar  7 2015 01:24:18, precise:Posix:unified)
larceny.heap, built on Sat Mar  7 01:25:38 EST 2015

> (import (larceny r7r6))
> (define opt (file-options no-fail no-truncate))
> (define fp (open-file-input/output-port "test" opt))

Error: unhandled condition:
Compound condition has these components: 
#<record &i/o-file-does-not-exist>
    filename : "test"
#<record &who>
    who : open-file-input/output-port
#<record &message>
    message : "file does not exist"
#<record &irritants>
    irritants : ("test" (no-fail no-truncate))
WillClinger commented 8 years ago

Fixed in changeset fc34a1604ecb3b6ffb5de2a1f4ba418550093ff3