MODULE TExceptUnhandled; (* M4: an unhandled language exception is a termination event (abort, rc 134), preserving the old trap contract. *) FROM SYSTEM IMPORT THROW; BEGIN THROW(1) END TExceptUnhandled.