[slang-users] EXIT_BLOCK not executed on Error

[Jörg Sommer <joerg@xxxxxxxxxxxx>]

Hi,

I expect this code prints ‘foo’ and the error message, but it prints only
the error message.

% cat /tmp/test.sl
define test()
{
#ifexists push_spot
    push_spot();
    EXIT_BLOCK
    {
        pop_spot();
    }
    () = eob();
#else
    EXIT_BLOCK
    {
        message("foo");
    }
#endif
    throw NotImplementedError;
}
test();
% slsh /tmp/test.sl
Not Implemented
/tmp/test.sl:16:test:Not Implemented

I expect
% slsh /tmp/test.sl
foo
Not Implemented
/tmp/test.sl:16:test:Not Implemented

Is this a bug?

Bye, Jörg.
-- 
Der Wille und nicht die Gabe macht den Geber.