52 lines
870 B
C
52 lines
870 B
C
|
#include <em.h>
|
||
|
|
#include "mach.h"
|
||
|
|
#include "back.h"
|
||
|
|
|
||
|
|
#if EM_WSIZE == 1
|
||
|
|
#define conEM_WSIZE con1
|
||
|
|
#define romEM_WSIZE rom1
|
||
|
|
#define CAST_WSIZE ONE_BYTE
|
||
|
|
#endif
|
||
|
|
#if EM_WSIZE == 2
|
||
|
|
#define conEM_WSIZE con2
|
||
|
|
#define romEM_WSIZE rom2
|
||
|
|
#define CAST_WSIZE TWO_BYTES
|
||
|
|
#endif
|
||
|
|
#if EM_WSIZE == 4
|
||
|
|
#define conEM_WSIZE con4
|
||
|
|
#define romEM_WSIZE rom4
|
||
|
|
#define CAST_WSIZE FOUR_BYTES
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#if EM_PSIZE == 1
|
||
|
|
#define relocEM_PSIZE reloc1
|
||
|
|
#endif
|
||
|
|
#if EM_PSIZE == 2
|
||
|
|
#define relocEM_PSIZE reloc2
|
||
|
|
#endif
|
||
|
|
#if EM_PSIZE == 4
|
||
|
|
#define relocEM_PSIZE reloc4
|
||
|
|
#endif
|
||
|
|
|
||
|
|
C_hol_pnam( n, s, i)
|
||
|
|
arith n;
|
||
|
|
char *s;
|
||
|
|
int i;
|
||
|
|
{
|
||
|
|
if ( i == 0) {
|
||
|
|
switchseg( SEGBSS);
|
||
|
|
align_word();
|
||
|
|
symbol_definition( extnd_hol( ++holno));
|
||
|
|
|
||
|
|
bss( n);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
switchseg( SEGCON);
|
||
|
|
align_word();
|
||
|
|
symbol_definition( extnd_hol( ++holno));
|
||
|
|
|
||
|
|
for ( i = 0; i < n/EM_PSIZE; i++)
|
||
|
|
relocEM_PSIZE( extnd_name( s), 0, ABSOLUTE);
|
||
|
|
}
|
||
|
|
}
|