binary-input-port-open
-- r7rs
Type port?
;binary-port?
;textual-port?
;input-port?
;input-port-open?
;output-port?
;output-port-open?
;call-with-port
;close-port
;close-input-port
;Note: These definitions consume an input that is a super-type.
(lambda (value) (and (binary-port? value) (input-port? value) (input-port-open? value)))