Welcome to the CHICKEN Scheme pasting service
runtests failure on OpenBSD added by zmyrgel on Thu Sep 15 17:18:27 2011
port->fileno...FAIL [ 7 ] Error: assertion failed: (eq? okay (condition-case (begin (print* (quote port->fileno) "...") (flush-output) (let ((output (port->fileno out))) (printf "FAIL [ ~S ]\n" output))) ((exn i/o file) (printf "OK\n") okay))) Call history: <eval> (memv688 (##core#quote i/o682) kvar686) <eval> (memv688 (##core#quote file683) kvar686) <eval> (printf680 "OK\n") <eval> (list712 (quote713 okay711)) <eval> (eq?715 okay711 (condition-case716 (begin717 (print*718 (quote709 port->fileno) "...") (flush-output...... <eval> ((call-with-current-continuation735 (##core#lambda (k733) (with-exception-handler736 (##core#lambda ... <eval> (call-with-current-continuation735 (##core#lambda (k733) (with-exception-handler736 (##core#lambda (...... <eval> (with-exception-handler736 (##core#lambda (exvar726) (k733 (##core#lambda () (##core#let ((kvar727 (...... <eval> (##sys#call-with-values (##core#lambda () (begin717 (print*718 (quote709 port->fileno) "...") (flush...... <eval> (print*718 (quote709 port->fileno) "...") <eval> (flush-output719) <eval> (port->fileno out) <eval> (printf721 "FAIL [ ~S ]\n" output720) <eval> (k733 (##core#lambda () (##sys#apply ##sys#values args734))) <eval> (##sys#apply ##sys#values args734) <eval> (##sys#error "assertion failed" (##core#quote (eq? okay (condition-case (begin (print* (quote port->...... <--