>>>>> "RT" == RT Happe <rthappe@mathematik.uni-freiburg.de> writes:
RT> The module created below derives its view of the world from
RT> scheme, but nonetheless it holds that (current-output-port) is no
RT> output-port?
RT> Scsh 0.5.3
RT> ,config
RT> (define-structure test-pkg (export (test :syntax))
RT> (open scheme)
RT> (begin
RT> (define-syntax test
RT> (syntax-rules ()
RT> ((test out)
RT> (output-port? out))))))
The problem is that OUTPUT-PORT? is redefined in scsh to cover scsh's
extended notion of ports. However, you only open SCHEME, not SCSH, so
you get a version of OUTPUT-PORT? which doesn't cover scsh's idea of
output ports.
For this to work right, you need to put SCSH *before* SCHEME in the
OPEN clause.
This works correctly in 0.6, but I have no idea why yet.
--
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
|