<<>> <> <> <> <<>> <> <<>> <> <<>> ViewerErrors: CEDAR DEFINITIONS ~ BEGIN SIGANY: TYPE ~ SIGNAL ANY RETURNS ANY; <> <<>> PreCatchProc: TYPE = PROC [signalOrError: SIGANY] RETURNS [continue: BOOL ¬ TRUE]; <> <> Register: PROC [signalOrError: SIGANY, handle: PreCatchProc]; <> <> Query: PRIVATE PROC [signalOrError: SIGANY] RETURNS [continue: BOOL]; <> END.