% Function INTERACTIVE-STREAM-P
Function INTERACTIVE-STREAM-P
interactive-stream-p
stream => generalized-boolean
stream - ストリーム
generalized-boolean - generalized-boolean
streamが対話式ストリームのときはtrueを、 それ以外のときはfalseを返却します。
(when (> measured limit)
(let ((error (round (* (- measured limit) 100)
limit)))
(unless (if (interactive-stream-p *query-io*)
(yes-or-no-p "The frammis is out of tolerance by ~D%.~@
Is it safe to proceed? " error)
(< error 15)) ;15% is acceptable
(error "The frammis is out of tolerance by ~D%." error))))
なし。
streamがストリームではないときは、
型type-error
のエラーを発生させるべきです。
21.1. ストリームの説明
なし。