<> <> <> <> DIRECTORY ViewerPrivate USING [Severity], Rope USING [ROPE], UserProfile USING [Boolean]; ImplErrorsImpl: CEDAR MONITOR IMPORTS UserProfile EXPORTS ViewerPrivate = BEGIN Severity: TYPE ~ ViewerPrivate.Severity; Error: PUBLIC SIGNAL [severity: Severity _ fatal, msg: Rope.ROPE _ NIL] = CODE; UserErrorQuery: PUBLIC ENTRY PROC RETURNS [continue: BOOL _ FALSE] = TRUSTED { <> ENABLE UNWIND => NULL; IF UserProfile.Boolean["Viewers.WorldSwapDebug", FALSE] THEN RETURN [FALSE]; }; END.