| [b28a12e] | 1 | #include "ram.h"
 | 
|---|
| [39a696b] | 2 | 
 | 
|---|
| [ad89950] | 3 | int8_t                  ac_code;
 | 
|---|
 | 4 | int16_t                 errno;
 | 
|---|
 | 5 | int16_t                 fp_resv[];
 | 
|---|
 | 6 | int8_t                  VerDate[];
 | 
|---|
| [8c8b4e5] | 7 | 
 | 
|---|
 | 8 | volatile        int16_t         timers[NTIMERS];
 | 
|---|
 | 9 | volatile        uint16_t        vi_scrl;
 | 
|---|
 | 10 | volatile        uint16_t        vi_sadr;
 | 
|---|
| [ad89950] | 11 | 
 | 
|---|
 | 12 | int8_t                  end;
 | 
|---|
 | 13 | int8_t                  edata;
 | 
|---|
 | 14 | int8_t                  etext;
 | 
|---|
 | 15 | int32_t                 p_dlen;
 | 
|---|
 | 16 | 
 | 
|---|
 | 17 | int8_t                  *S1IoRec;
 | 
|---|
 | 18 | int8_t                  *S2IoRec;
 | 
|---|
 | 19 | int8_t                  *M1IoRec;
 | 
|---|
 | 20 | int8_t                  *M2IoRec;
 | 
|---|
 | 21 | 
 | 
|---|
 | 22 | void                    (*foot1)(int16_t stat);
 | 
|---|
 | 23 | void                    (*foot2)(int16_t stat);
 | 
|---|
 | 24 | void                    (*pulse1)(void);
 | 
|---|
 | 25 | void                    (*pulse2)(void);
 | 
|---|
 | 26 | 
 | 
|---|
 | 27 | uint32_t                crshrg[16];
 | 
|---|
 | 28 | int16_t                 wzcrsh;
 | 
|---|
 | 29 | uint32_t                crshpc;
 | 
|---|
 | 30 | uint32_t                crshsp;
 | 
|---|
 | 31 | uint32_t                crshus;
 | 
|---|
 | 32 | uint16_t                crshst[16];
 | 
|---|
 | 33 | uint16_t                crshsr;
 | 
|---|
 | 34 | int8_t                  crshvc[4];
 | 
|---|
 | 35 | 
 | 
|---|
 | 36 | int32_t                 uldivr;
 | 
|---|
| [f7c91fc] | 37 | 
 | 
|---|
| [7258c6a] | 38 | void clrvce(int16_t vce)
 | 
|---|
| [f7c91fc] | 39 | {
 | 
|---|
 | 40 | }
 | 
|---|
 | 41 | 
 | 
|---|
| [7258c6a] | 42 | void execins(int16_t vce, int16_t ins, int16_t tag)
 | 
|---|
| [f7c91fc] | 43 | {
 | 
|---|
 | 44 | }
 | 
|---|
 | 45 | 
 | 
|---|
| [7258c6a] | 46 | void execkey(int16_t trg, int16_t pch, int16_t vce, int16_t tag)
 | 
|---|
| [f7c91fc] | 47 | {
 | 
|---|
 | 48 | }
 | 
|---|
 | 49 | 
 | 
|---|
 | 50 | void fpuclr(void)
 | 
|---|
 | 51 | {
 | 
|---|
 | 52 | }
 | 
|---|
 | 53 | 
 | 
|---|
 | 54 | void fpuint(void)
 | 
|---|
 | 55 | {
 | 
|---|
 | 56 | }
 | 
|---|
 | 57 | 
 | 
|---|
| [7258c6a] | 58 | uint16_t fromfpu(uint16_t fputime)
 | 
|---|
| [f7c91fc] | 59 | {
 | 
|---|
| [46d8069] | 60 |     return 0;
 | 
|---|
| [f7c91fc] | 61 | }
 | 
|---|
 | 62 | 
 | 
|---|
 | 63 | void halt(void)
 | 
|---|
 | 64 | {
 | 
|---|
 | 65 | }
 | 
|---|
 | 66 | 
 | 
|---|
| [6a37d5b] | 67 | void GLCplot(int16_t x, int16_t y, int16_t val)
 | 
|---|
| [f7c91fc] | 68 | {
 | 
|---|
 | 69 | }
 | 
|---|
 | 70 | 
 | 
|---|
 | 71 | void hdvini(void)
 | 
|---|
 | 72 | {
 | 
|---|
 | 73 | }
 | 
|---|
 | 74 | 
 | 
|---|
 | 75 | void jumpto(void *addr)
 | 
|---|
 | 76 | {
 | 
|---|
 | 77 | }
 | 
|---|
 | 78 | 
 | 
|---|
| [7258c6a] | 79 | void longjmp(struct JMP_BUF *env, int16_t val)
 | 
|---|
| [f7c91fc] | 80 | {
 | 
|---|
 | 81 | }
 | 
|---|
 | 82 | 
 | 
|---|
 | 83 | void Lo_RAM(void)
 | 
|---|
 | 84 | {
 | 
|---|
 | 85 | }
 | 
|---|
 | 86 | 
 | 
|---|
| [6a37d5b] | 87 | void objclr(int16_t obj)
 | 
|---|
| [f7c91fc] | 88 | {
 | 
|---|
 | 89 | }
 | 
|---|
 | 90 | 
 | 
|---|
| [6a37d5b] | 91 | void objoff(int16_t obj, int16_t line, int16_t num)
 | 
|---|
| [f7c91fc] | 92 | {
 | 
|---|
 | 93 | }
 | 
|---|
 | 94 | 
 | 
|---|
| [6a37d5b] | 95 | void objon(int16_t obj, int16_t line, int16_t num)
 | 
|---|
| [f7c91fc] | 96 | {
 | 
|---|
 | 97 | }
 | 
|---|
 | 98 | 
 | 
|---|
 | 99 | void panic(void)
 | 
|---|
 | 100 | {
 | 
|---|
 | 101 | }
 | 
|---|
 | 102 | 
 | 
|---|
| [6a37d5b] | 103 | void procpfl(int16_t trig)
 | 
|---|
| [f7c91fc] | 104 | {
 | 
|---|
 | 105 | }
 | 
|---|
 | 106 | 
 | 
|---|
| [8973acd] | 107 | void _ptcl12(uint8_t *fat, int16_t cl, int16_t val)
 | 
|---|
| [f7c91fc] | 108 | {
 | 
|---|
 | 109 | }
 | 
|---|
 | 110 | 
 | 
|---|
| [7258c6a] | 111 | int32_t rand24(void)
 | 
|---|
| [f7c91fc] | 112 | {
 | 
|---|
| [46d8069] | 113 |     return 0;
 | 
|---|
| [f7c91fc] | 114 | }
 | 
|---|
 | 115 | 
 | 
|---|
 | 116 | void rjumpto(void *addr)
 | 
|---|
 | 117 | {
 | 
|---|
 | 118 | }
 | 
|---|
 | 119 | 
 | 
|---|
| [7258c6a] | 120 | void se_disp(struct s_entry *ep, int16_t sd, struct gdsel *gdstb[], int16_t cf)
 | 
|---|
| [f7c91fc] | 121 | {
 | 
|---|
 | 122 | }
 | 
|---|
 | 123 | 
 | 
|---|
| [7258c6a] | 124 | struct s_entry *se_exec(struct s_entry *ep, int16_t sd)
 | 
|---|
| [f7c91fc] | 125 | {
 | 
|---|
| [46d8069] | 126 |     return 0;
 | 
|---|
| [f7c91fc] | 127 | }
 | 
|---|
 | 128 | 
 | 
|---|
| [6a37d5b] | 129 | int16_t setipl(int16_t arg)
 | 
|---|
| [f7c91fc] | 130 | {
 | 
|---|
 | 131 |     return 0;
 | 
|---|
 | 132 | }
 | 
|---|
 | 133 | 
 | 
|---|
| [7258c6a] | 134 | int16_t setjmp(struct JMP_BUF *env)
 | 
|---|
| [f7c91fc] | 135 | {
 | 
|---|
| [46d8069] | 136 |     return 0;
 | 
|---|
| [f7c91fc] | 137 | }
 | 
|---|
 | 138 | 
 | 
|---|
 | 139 | void setsio(void)
 | 
|---|
 | 140 | {
 | 
|---|
 | 141 | }
 | 
|---|
 | 142 | 
 | 
|---|
| [7258c6a] | 143 | uint16_t setsr(uint16_t sr)
 | 
|---|
| [f7c91fc] | 144 | {
 | 
|---|
| [46d8069] | 145 |     return 0;
 | 
|---|
| [f7c91fc] | 146 | }
 | 
|---|
 | 147 | 
 | 
|---|
 | 148 | void sjumpto(void *addr, void *stack)
 | 
|---|
 | 149 | {
 | 
|---|
 | 150 | }
 | 
|---|
 | 151 | 
 | 
|---|
 | 152 | void sreset(void)
 | 
|---|
 | 153 | {
 | 
|---|
 | 154 | }
 | 
|---|
 | 155 | 
 | 
|---|
| [7258c6a] | 156 | uint16_t tofpu(uint16_t time)
 | 
|---|
| [f7c91fc] | 157 | {
 | 
|---|
| [46d8069] | 158 |     return 0;
 | 
|---|
| [f7c91fc] | 159 | }
 | 
|---|
 | 160 | 
 | 
|---|
| [7258c6a] | 161 | int32_t trap13(int16_t fun, ...)
 | 
|---|
| [f7c91fc] | 162 | {
 | 
|---|
 | 163 |     return 0;
 | 
|---|
 | 164 | }
 | 
|---|
 | 165 | 
 | 
|---|
| [7258c6a] | 166 | int32_t trap14(int16_t fun, ...)
 | 
|---|
| [f7c91fc] | 167 | {
 | 
|---|
 | 168 |     return 0;
 | 
|---|
 | 169 | }
 | 
|---|
 | 170 | 
 | 
|---|
 | 171 | void trap15(void)
 | 
|---|
 | 172 | {
 | 
|---|
 | 173 | }
 | 
|---|
 | 174 | 
 | 
|---|
 | 175 | void tsetup(void)
 | 
|---|
 | 176 | {
 | 
|---|
 | 177 | }
 | 
|---|
 | 178 | 
 | 
|---|
| [8c8b4e5] | 179 | void tsplot4(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t row, int16_t col, int8_t *str, int16_t pitch)
 | 
|---|
| [f7c91fc] | 180 | {
 | 
|---|
 | 181 | }
 | 
|---|
 | 182 | 
 | 
|---|
| [7258c6a] | 183 | int32_t uldiv(int32_t divid, int32_t divis)
 | 
|---|
| [f7c91fc] | 184 | {
 | 
|---|
| [f4fbee9] | 185 |     return 0;
 | 
|---|
| [f7c91fc] | 186 | }
 | 
|---|
 | 187 | 
 | 
|---|
| [6a37d5b] | 188 | void vbank(int16_t b)
 | 
|---|
| [f7c91fc] | 189 | {
 | 
|---|
 | 190 | }
 | 
|---|
 | 191 | 
 | 
|---|
| [8c8b4e5] | 192 | void vclrav(volatile uint16_t *obase, int16_t row, int16_t col, uint16_t attr, int16_t len)
 | 
|---|
| [f7c91fc] | 193 | {
 | 
|---|
 | 194 | }
 | 
|---|
 | 195 | 
 | 
|---|
| [8c8b4e5] | 196 | void vcputs(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t bg, int16_t row, int16_t col, int8_t *str)
 | 
|---|
| [f7c91fc] | 197 | {
 | 
|---|
 | 198 | }
 | 
|---|
 | 199 | 
 | 
|---|
| [8c8b4e5] | 200 | void vcputsv(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t bg, int16_t row, int16_t col, int8_t *str, int16_t pitch)
 | 
|---|
| [f7c91fc] | 201 | {
 | 
|---|
 | 202 | }
 | 
|---|
 | 203 | 
 | 
|---|
 | 204 | void vfwait(void)
 | 
|---|
 | 205 | {
 | 
|---|
 | 206 | }
 | 
|---|
 | 207 | 
 | 
|---|
 | 208 | void VIint(void)
 | 
|---|
 | 209 | {
 | 
|---|
 | 210 | }
 | 
|---|
 | 211 | 
 | 
|---|
| [8c8b4e5] | 212 | void vputa(volatile uint16_t *obase, int16_t row, int16_t col, uint16_t attr)
 | 
|---|
| [f7c91fc] | 213 | {
 | 
|---|
 | 214 | }
 | 
|---|
 | 215 | 
 | 
|---|
| [8c8b4e5] | 216 | void vputc(volatile uint16_t *obase, int16_t row, int16_t col, int16_t c, uint16_t attr)
 | 
|---|
| [f7c91fc] | 217 | {
 | 
|---|
 | 218 | }
 | 
|---|
 | 219 | 
 | 
|---|
| [8c8b4e5] | 220 | void vputcv(volatile uint16_t *obase, int16_t row, int16_t col, int16_t c, uint16_t attr, int16_t cols)
 | 
|---|
| [f7c91fc] | 221 | {
 | 
|---|
 | 222 | }
 | 
|---|
 | 223 | 
 | 
|---|
| [7258c6a] | 224 | void vputp(struct octent *octad, int16_t xloc, int16_t yloc, int16_t val)
 | 
|---|
| [f7c91fc] | 225 | {
 | 
|---|
 | 226 | }
 | 
|---|
 | 227 | 
 | 
|---|
| [8c8b4e5] | 228 | void vsetav(volatile uint16_t *obase, int16_t row, int16_t col, uint16_t attr, int16_t len)
 | 
|---|
| [f7c91fc] | 229 | {
 | 
|---|
 | 230 | }
 | 
|---|
 | 231 | 
 | 
|---|
| [8c8b4e5] | 232 | void vsetcv(volatile uint16_t *obase, int16_t row, int16_t col, uint16_t fgbg, int16_t len)
 | 
|---|
| [f7c91fc] | 233 | {
 | 
|---|
 | 234 | }
 | 
|---|
 | 235 | 
 | 
|---|
| [8c8b4e5] | 236 | void vsplot4(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t row, int16_t col, int8_t *str, int16_t pitch, int16_t ht, int16_t cgtab[][256])
 | 
|---|
| [f7c91fc] | 237 | {
 | 
|---|
 | 238 | }
 | 
|---|
 | 239 | 
 | 
|---|
| [8c8b4e5] | 240 | void vvputsv(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t bg, int16_t row, int16_t col, int8_t *str, int16_t pitch, int16_t ht, int16_t cgtab[][256])
 | 
|---|
| [f7c91fc] | 241 | {
 | 
|---|
 | 242 | }
 | 
|---|
 | 243 | 
 | 
|---|
| [7258c6a] | 244 | void vwputp(struct octent *octad, int16_t xloc, int16_t yloc, int16_t val)
 | 
|---|
| [f7c91fc] | 245 | {
 | 
|---|
 | 246 | }
 | 
|---|
 | 247 | 
 | 
|---|
| [8c8b4e5] | 248 | void vwputs(volatile uint16_t *obase, int16_t nw, int16_t fg, int16_t bg, int16_t row, int16_t col, int8_t *str)
 | 
|---|
| [f7c91fc] | 249 | {
 | 
|---|
 | 250 | }
 | 
|---|
 | 251 | 
 | 
|---|
 | 252 | void xtrap15(void)
 | 
|---|
 | 253 | {
 | 
|---|
 | 254 | }
 | 
|---|