On Mon 14 Mar 2011 21:51, Andy Wingo <[email protected]> writes:

> Hi Wolfgang,
>
> On Wed 09 Mar 2011 11:53, Wolfgang J Moeller <[email protected]> writes:
>
>> I observe a segfault when done loading a particular compiled file.
>> No such error in interpreted mode.
>
> The example can be quite short:

Or shorter (in terms of code):

    (call-with-prompt
     'p1
     (lambda ()
       (display ((abort-to-prompt
                  'p1
                  (lambda (c1)
                    (call-with-prompt
                     'p2
                     (lambda ()
                       (abort-to-prompt
                        'p2
                        (lambda (c2)
                          (c1 (lambda (x) (c2 x))))))
                     (lambda (c2 fc2)
                       (fc2 c2)))))
                 'foo)))
     (lambda (c1 fc1)
       (fc1 c1)))

Andy
-- 
http://wingolog.org/

Reply via email to