MODULE Test EXPORTS Main;

EXCEPTION Foo;
 
VAR
  x: INTEGER;

BEGIN
    TRY
        INC(x); 
   EXCEPT
      Foo => NULL
   END;

END Test.