FILE-POSITION must return NIL on broadcast streams

This commit is contained in:
jjgarcia 2004-12-20 13:03:14 +00:00
parent a819d7c354
commit dd1921df4e

View file

@ -1837,7 +1837,7 @@ BEGIN:
case smm_broadcast:
strm = strm->stream.object0;
if (endp(strm))
return MAKE_FIXNUM(0);
return Cnil;
strm = CAR(strm);
goto BEGIN;