I'll admit that I am quite new to these scheme48 packages, but the
following behavior that seems buggy to me. (It certainly isn't
referentially transparent).
The file "/PacketCluster/R/IOWA.DAT" contains variable length records
separated by a control-c. I am using scsh 0.3
> (define foo (open-input-file "/PacketCluster/R/IOWA.DAT"))
> ((record-reader (ascii->char 3)) foo)
Error: Bad argument
#{Extensible-input-port}
#{Procedure 50}
#{Procedure 7972}
1> ,reset
> record-reader
'#{Procedure 7980}
> ,in field-reader-package
field-reader-package> (define foo (open-input-file "/PacketCluster/R/IOWA.DAT"))
field-reader-package> ((record-reader (ascii->char 3)) foo)
"051338SYS 0000DB501338 05DEC94 INVALID DATA FIELD OF SKDJFLKJSDFLKJDKFJJF "
field-reader-package> record-reader
'#{Procedure 7980}
|