C Libraries Interfacing to Host System
======================================

<Arthur.h>


<kernel.h>
#define __kernel_h
#define __size_t 1
typedef unsigned int size_t;   /* from <stddef.h> */
typedef  struct { } _kernel_swi_regs;
typedef  struct { } _kernel_osfile_block;
typedef  struct { } _kernel_osgbpb_block;
typedef  struct { } _kernel_oserror;
typedef  struct stack_chunk { } _kernel_stack_chunk;
_kernel_stack_chunk *_kernel_current_stack_chunk(void);
void     _kernel_setreturncode(unsigned code);
void     _kernel_exit(int);
void     _kernel_raise_error(_kernel_oserror *);
void     _kernel_exittraphandler(void);
#define  _kernel_HOST_UNDEFINED    -1
#define  _kernel_BBC_MOS1_0         0
#define  _kernel_BBC_MOS1_2         1
#define  _kernel_BBC_ACW            2
#define  _kernel_BBC_MASTER         3
#define  _kernel_BBC_MASTER_ET      4
#define  _kernel_BBC_MASTER_COMPACT 5
#define  _kernel_ARTHUR             6
#define  _kernel_SPRINGBOARD        7
#define  _kernel_A_UNIX             8
int      _kernel_hostos(void);
int      _kernel_fpavailable(void);
#define  _kernel_NONX 0x80000000
_kernel_oserror *_kernel_swi(int no, _kernel_swi_regs *in,
_kernel_oserror *_kernel_swi_c(int no, _kernel_swi_regs *in,
                                      _kernel_swi_regs *out, int *carry);
char     *_kernel_command_string(void);
#define  _kernel_ERROR (-2)
int      _kernel_osbyte(int op, int x, int y);
int      _kernel_osrdch(void);
int      _kernel_oswrch(int ch);
int      _kernel_osbget(unsigned handle);
int      _kernel_osbput(int ch, unsigned handle);
int      _kernel_osgbpb(int op, unsigned handle, _kernel_osgbpb_block *inout);
int      _kernel_osword(int op, int *data);
int      _kernel_osfind(int op, char *name);
int      _kernel_osfile(int op, const char *name, _kernel_osfile_block *inout);
int      _kernel_osargs(int op, unsigned handle, int arg);
int      _kernel_oscli(const char *s);
_kernel_oserror *_kernel_last_oserror(void);
_kernel_oserror *_kernel_getenv(const char *name, char *buffer, unsigned size);
_kernel_oserror *_kernel_setenv(const char *name, const char *value);
int _kernel_system(const char *string, int chain);
unsigned _kernel_alloc(unsigned minwords, void **block);
typedef  void freeproc(void *);
typedef  void * allocproc(unsigned);
void     _kernel_register_allocs(allocproc *malloc, freeproc *free);
typedef  int _kernel_ExtendProc(int /*n*/, void** /*p*/);
_kernel_ExtendProc *_kernel_register_slotextend(_kernel_ExtendProc *proc);
int      _kernel_escape_seen(void);
typedef  union { } _extended_fp_number;
typedef  struct { } _kernel_unwindblock;
int      _kernel_unwind(_kernel_unwindblock *inout, char **language);
char     *_kernel_procname(int pc);
char     *_kernel_language(int pc);
unsigned _kernel_udiv(unsigned divisor, unsigned dividend);
unsigned _kernel_urem(unsigned divisor, unsigned dividend);
unsigned _kernel_udiv10(unsigned dividend);
int      _kernel_sdiv(int divisor, int dividend);
int      _kernel_srem(int divisor, int dividend);
int      _kernel_sdiv10(int dividend);
typedef  enum { NotHandled, Handled } _kernel_HandledOrNot;
typedef  struct { } _kernel_registerset;
typedef  struct { } _kernel_eventregisters;
typedef  void (*PROC) (void);
typedef  _kernel_HandledOrNot (*_kernel_trapproc) (int code, _kernel_registerset *regs);
typedef  _kernel_HandledOrNot (*_kernel_eventproc) (int code, _kernel_registerset *regs);
typedef  struct { } _kernel_languagedescription;
typedef  int _kernel_ccproc(int, int, int);
int      _kernel_call_client(int a1, int a2, int a3, _kernel_ccproc callee);
int      _kernel_client_is_module(void);
int      _kernel_processor_mode(void);
void     _kernel_irqs_on(void);
void     _kernel_irqs_off(void);
int      _kernel_irqs_disabled(void);
void     *_kernel_RMAalloc(size_t size);
void     *_kernel_RMAextend(void *p, size_t size);
void     _kernel_RMAfree(void *p);


<swis.h>