Can't read input from stdin on scripting.

[tani]

;; test.lisp
(format (standard-output) "~A" (read))

Current behavior

$ iris test.lisp # or $iris test.lisp
#<END-OF-STREAM >

Expectation

$ iris test.lisp # or $iris < test.lisp
10
10