ack/util/ceg/defaults/storage/C_hol_pnam.c

55 lines
911 B
C

#define CODE_EXPANDER
#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
extern int holno;
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);
}
}