INTERFACE A;

EXCEPTION A; B; C;

PROCEDURE Foo (i : INTEGER) RAISES {A};

END A.