$ cat eli.scm
(let () (define x 1) x)
(print (handle-exceptions exn 'error x))

(print (let () (list (define x 1))))
(print x)

$ csi -s eli.scm
error
(#<unspecified>)
1

$ csc eli.scm && ./eli
error
(1)
1