2 * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
3 * See the copyright notice in the ACK home directory, in the file "Copyright".
5 /* $Id: mach.h,v 1.10 1994/06/24 13:41:47 ceriel Exp $ */
6 #define ex_ap(x) fprintf(codefile,".extern\t%s\n",x)
7 #define in_ap(x) /* nothing */
9 #define newilb(x) fprintf(codefile,"%s:\n",x)
10 #define newdlb(x) fprintf(codefile,"%s:\n",x)
11 #define newplb(x) fprintf(codefile,".align 1\n%s:\n",x)
12 #define dlbdlb(s1,s2) fprintf(codefile,"%s = %s\n",s1, s2)
13 #define newlbss(l,x) fprintf(codefile,".comm\t%s,%ld\n",l,x);
17 #define ilb_fmt "I%x_%x"
18 #define dlb_fmt "I_%d"
19 #define hol_fmt "hol%d"
21 #define fmt_id(fr,to) sprintf(to,"_%s",fr)
23 #define hol_off "%ld+hol%d"
25 #define con_cst(w) fprintf(codefile,".data4\t%ld\n",w)
26 #define con_ilb(x) fprintf(codefile,".data4\t%s\n",x)
27 #define con_dlb(x) fprintf(codefile,".data4\t%s\n",x)
32 #define modhead ".sect .text\n.sect .rom\n.sect .data\n.sect .bss\n"