[Larceny-users] Request: string-port? predicate

[KenD]

I would like to implement a function which returns the "contents" of a port as a string.

It would be useful to test an output-port to see if get-output-string can be applied.

[larceny in -r7rs bahaves:]

> (import (primitives string-output-port?))

> string-output-port?
Error: unhandled condition:
...
    message : "?: undefined global variable: string-output-port? \n"

> (import (primitives string-port?))

> string-port?

Error: unhandled condition:
...
    message : "?: undefined global variable: string-port? \n"

It would also be useful to know the byte-length of a file, and deal with directory and file entries..

Thanks much,
-KenD