4 * [Generated from report, 25 September 1996]
7 #if !defined(__CC_NORCROFT) || !defined(__arm)
8 #error You must use the Norcroft ARM Compiler for Sapphire programs
11 #pragma include_only_once
12 #pragma force_top_level
21 /*----- Overview ----------------------------------------------------------*
30 /* --- report_register --- *
32 * On entry: R0 == pointer to routine to use
33 * R1 == R12 to pass to the routine
34 * R2 == stack pointer to set when it gets control
38 * Use: Registers a resume point so that the application can recover
39 * from errors. Error messages are reported using errorBox.
42 extern routine report_register;
44 /* --- report_catchAll --- *
48 * On exit: R13 modified
50 * Use: Sets up an exception handler to catch errors and other SEH
51 * exceptions. Errors are reported in the usual way, and the
52 * user is given the option to close the application. Other
53 * exceptions are reported as errors.
56 extern routine report_catchAll;
58 /* --- report_error --- *
60 * On entry: R0 == pointer to error
64 * Use: Prompts the user about quitting the application in response
65 * to a really bad error. If the user decides to quit, we
66 * quit. Otherwise we return.
69 extern routine report_error;
71 /*----- That's all, folks -------------------------------------------------*/