home *** CD-ROM | disk | FTP | other *** search
- #ifndef basictrans_H
- #define basictrans_H
-
- /* C header file for BASICTrans
- * written by DefMod (Jun 20 1995) on Thu Jun 22 12:17:04 1995
- * Jonathan Coxhead, Acorn Computers Ltd
- */
-
- #ifndef types_H
- #include "types.h"
- #endif
-
- #ifndef os_H
- #include "os.h"
- #endif
-
- /**********************************
- * SWI names and SWI reason codes *
- **********************************/
- #undef BASICTrans_HELP
- #define BASICTrans_HELP 0x42C80
- #undef XBASICTrans_HELP
- #define XBASICTrans_HELP 0x62C80
- #undef BASICTrans_Error
- #define BASICTrans_Error 0x42C81
- #undef XBASICTrans_Error
- #define XBASICTrans_Error 0x62C81
- #undef BASICTrans_Message
- #define BASICTrans_Message 0x42C82
- #undef XBASICTrans_Message
- #define XBASICTrans_Message 0x62C82
-
- /*************************
- * Function declarations *
- *************************/
-
- #ifdef __cplusplus
- extern "C" {
- #endif
-
- /* ------------------------------------------------------------------------
- * Function: basictrans_help()
- *
- * Description: Interpret, translate if required, and print HELP messages
- *
- * Input: help_text - value of R0 on entry
- * prog_name - value of R1 on entry
- * lexical_table - value of R2 on entry
- *
- * Output: unclaimed - value of R1 on exit (X version only)
- *
- * Returns: R1 (non-X version only)
- *
- * Other notes: Calls SWI 0x42C80.
- */
-
- extern os_error *xbasictrans_help (char const *help_text,
- char const *prog_name,
- byte const *lexical_table,
- bool *unclaimed);
- extern bool basictrans_help (char const *help_text,
- char const *prog_name,
- byte const *lexical_table);
-
- /* ------------------------------------------------------------------------
- * Function: basictrans_error()
- *
- * Description: Copy translated error string to buffer
- *
- * Input: error_no - value of R0 on entry
- * error_buffer - value of R1 on entry
- *
- * Other notes: Calls SWI 0x42C81.
- */
-
- extern os_error *xbasictrans_error (int error_no,
- os_error *error_buffer);
- __swi (0x42C81) void basictrans_error (int error_no,
- os_error *error_buffer);
-
- /* ------------------------------------------------------------------------
- * Function: basictrans_message()
- *
- * Description: Translate and print miscellaneous message
- *
- * Input: message_no - value of R0 on entry
- * arg0 - value of R1 on entry
- * arg1 - value of R2 on entry
- * arg2 - value of R3 on entry
- *
- * Other notes: Calls SWI 0x42C82.
- */
-
- extern os_error *xbasictrans_message (int message_no,
- int arg0,
- int arg1,
- int arg2);
- __swi (0x42C82) void basictrans_message (int message_no,
- int arg0,
- int arg1,
- int arg2);
-
- #ifdef __cplusplus
- }
- #endif
-
- #endif
-