COMMON/common/macros.h
2019-07-07 13:25:47 -04:00

101 lines
2.6 KiB
C

#include "common.h"
#ifndef __MACROS_H
#define __MACROS_H
; common registers
#define R0 0
#define R1 1
#define R2 2
#define R3 3
#define R4 4
#define R5 5
#define R6 6
#define R7 7
#define R8 8
#define R9 9
; system functions
#define S0 0
#define S1 1
#define S2 2
#define S3 3
#define S4 4
#define S5 5
#define S6 6
#define S7 7
#define S8 8
#define S9 9
; user functions
#define U0 15
#define U1 14
#define U2 13
#define U3 12
#define U4 11
#define U5 10
#define U6 9
#define U7 8
#define U8 7
#define U9 6
; shorthand
#define _OFF_M(o) ((o) - * - 3)
#define _BRX_M(o) <_OFF_M(o), >_OFF_M(o)
#define _MRG_M(p, q) ((p) * 16 + (q))
; macros
#define ESC .BYTE _ESC_C
#define RTN .BYTE _RTN_C
#define BRS(o) .BYTE _BRS_C, _BRX_M(o)
#define BRA(o) .BYTE _BRA_C, _BRX_M(o)
#define BRE(o) .BYTE _BRE_C, _BRX_M(o)
#define BRG(o) .BYTE _BRG_C, _BRX_M(o)
#define BRL(o) .BYTE _BRL_C, _BRX_M(o)
#define BRZ(o) .BYTE _BRZ_C, _BRX_M(o)
#define BRP(o) .BYTE _BRP_C, _BRX_M(o)
#define BRN(o) .BYTE _BRN_C, _BRX_M(o)
#define BRO(o) .BYTE _BRO_C, _BRX_M(o)
#define BRU(o) .BYTE _BRU_C, _BRX_M(o)
#define CPR(p, q) .BYTE _CPR_C, _MRG_M(p, q)
#define LDI(p, q) .BYTE _LDI_C, _MRG_M(p, q)
#define SVI(p, q) .BYTE _SVI_C, _MRG_M(p, q)
#define CMR(p, q) .BYTE _CMR_C, _MRG_M(p, q)
#define SET(r, v) .BYTE _SET_C + (r), _SET_V(#v)
#define LDD(r, a) .BYTE _LDD_C + (r), <(a), >(a)
#define SVD(r, a) .BYTE _SVD_C + (r), <(a), >(a)
#define PSH(r) .BYTE _PSH_C + (r)
#define POP(r) .BYTE _POP_C + (r)
#define EXC(r) .BYTE _EXC_C + (r)
#define INR(r) .BYTE _INR_C + (r)
#define DCR(r) .BYTE _DCR_C + (r)
#define TST(r) .BYTE _TST_C + (r)
#define ADD(r, p, q) .BYTE _ADD_C + (r), _MRG_M(p, q)
#define SUB(r, p, q) .BYTE _SUB_C + (r), _MRG_M(p, q)
#define MUL(r, p, q) .BYTE _MUL_C + (r), _MRG_M(p, q)
#define DIV(r, p, q) .BYTE _DIV_C + (r), _MRG_M(p, q)
#define MOD(r, p, q) .BYTE _MOD_C + (r), _MRG_M(p, q)
#define EXT(f) .BYTE _EXT_C + (f)
; header for fixed code or data
#define FIXED(l) .BYTE _SM_FXD : .WORD l, _END_##l - l : * = * - 5 : l .(
; header for relocatable code: l(abel) => starting offset, length of code
#define CODE(l) .BYTE _RLC_CD : .WORD _start - l, _END_##l - l : * = * - 5 : l .(
#define START &_start
; header for relocatable data: l(abel) => length of zeroed data, length of preset data
#define DATA(l) .BYTE _RLC_DT : .WORD _END_##l - _zero, _zero - l : * = * - 5 : l .( : &_data
; define l(abel), v(alue)
#define DEFINE(l, v) &l .BYTE _SET_V(#v)
; reserve c(ount) & provide an alias for _zero
#define RESERVE(c) &ZERO : &_zero : * = * + (c) * 4
; common begin and end
#define BEGIN(l) l .(
#define END(l) .) : _END_##l
#endif /* __MACROS_H */