with-handler compiler bug

[sasagawa888]

Compiler can not compile with-handler. lack

[sasagawa888]

Improving compiler. It works with following simple test case.

(defun foo (x)
   (catch 'exit
      (with-handler 
          (lambda (c) (throw 'exit c))
                 (bar x))))

(defun bar (x)
    (car x))

Easy-ISLisp Ver2.64
> (load "tests/bug.o")
T
> (foo 1)
<instance>
> (foo '(1 2))
1
> 

But compiled prolog.o invoke segmentation fault.

[sasagawa888]

Fixed it. Now compiled prolog.o works well.