blob: 03de44543ab22149d7c688ec5cec0e141d1398cd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
/* gencode.h - code generation for bcc */
/* Copyright (C) 1992 Bruce Evans */
#ifdef MC6809
# define CANABXCUTOFF 7 /* favour ABX over MUL before this */
#endif
#define EXPRLEVEL 126 /* level for symbols in exptree, > real levs */
#define OFFKLUDGELEVEL 127 /* level for expr sym with offset from name */
#define OPERANDSEPARATOR ',' /* char separating operands */
#define OPSEPARATOR '\t' /* char separating op string and operand */
EXTERN uoffset_T arg1size; /* size of 1st arg to function */
/* zero after allocation of 1st arg */
EXTERN store_pt callee1mask; /* calleemask with doubleregs masked if nec */
EXTERN uoffset_T dataoffset; /* amount of initialized data so far */
#ifdef DEBUG
EXTERN bool_t debugon; /* nonzero to print debugging messages */
/* depends on zero init */
#endif
#ifdef FRAMEPOINTER
EXTERN store_pt framelist; /* bit pattern for frame and saved regs */
EXTERN store_pt frame1list; /* framelist with doubleregs masked if nec */
EXTERN offset_T framep; /* hardware relative frame ptr */
#endif
EXTERN uoffset_T func1saveregsize; /* choice of next two values */
EXTERN uoffset_T funcdsaveregsize; /* funcsaveregsize adjusted for doubles */
EXTERN uoffset_T funcsaveregsize; /* tot size of framelist/calleemask regs */
#ifdef I80386
EXTERN bool_t i386_32; /* nonzero to generate 386 32 bit code */
/* depends on zero init */
#endif
#ifdef DYNAMIC_LONG_ORDER
EXTERN bool_t long_big_endian; /* nonzero if high long word is first */
/* depends on zero init */
#endif
EXTERN offset_T lowsp; /* low water sp (collects locals in switch) */
#ifdef POSINDEPENDENT
EXTERN bool_t posindependent; /* nonzero to generate pos-independent code */
/* depends on zero init */
#endif
EXTERN bool_t printf_fp; /* nonzero if *printf called with FP arg */
EXTERN bool_t regarg; /* nonzero to show unloaded register arg */
/* depends on zero init */
EXTERN store_t reguse; /* registers in use */
EXTERN bool_t scanf_fp; /* nonzero if *scanf called with ptr-to-FP */
EXTERN offset_T softsp; /* software sp (leads sp during declares) */
EXTERN offset_T sp; /* hardware relative stack ptr */
/* depends on zero init */
#ifdef FRAMEPOINTER
EXTERN bool_t stackarg; /* nonzero to show function has arg on stack */
#endif
EXTERN struct switchstruct *switchnow; /* currently active switch */
/* depends on NULL init */
/* variables to be initialised to nonzero */
extern store_pt allindregs; /* mask (in) for index registers */
extern store_pt allregs; /* mask (in) for registers */
extern bool_t arg1inreg; /* nonzero to pass 1st arg in reg */
extern store_pt calleemask; /* mask (in) for regs to be saved by callee */
extern bool_t callersaves; /* nonzero to make caller save regs */
extern char *callstring; /* opcode string for call */
extern store_pt doubleargregs; /* mask (in) for regs for 1st arg if double */
extern store_pt doubleregs; /* mask (in) for regs to temp contain double */
extern store_pt doublreturnregs; /* mask (in) for regs for returning double */
extern offset_T jcclonger; /* amount jcc long jumps are longer */
extern offset_T jmplonger; /* amount long jumps is longer */
extern char *jumpstring; /* opcode string for jump */
extern char *regpulllist; /* reg names and sizes (0 store_t bit first) */
extern char *regpushlist; /* reg names and sizes (0 store_t bit last) */
extern store_pt regregs; /* mask (in) for regs which can be reg vars */
/* register names */
extern char *acclostr;
extern char *accumstr;
extern char *badregstr;
#ifdef I8088
extern char *dreg1str;
extern char *dreg1bstr;
extern char *dreg2str;
#endif
extern char *ireg0str;
extern char *ireg1str;
extern char *ireg2str;
extern char *localregstr;
#ifdef I8088
extern char *stackregstr;
#endif
/* register sizes */
extern uoffset_T accregsize;
#ifdef FRAMEPOINTER
extern uoffset_T frameregsize;
#endif
extern uoffset_T maxregsize;
extern uoffset_T opregsize;
extern uoffset_T pshregsize;
extern uoffset_T returnadrsize;
|
