#include <em.h>
#include <system.h>
-#define codefile _codefile
-#define cur_seg _cur_seg
-#define saved _saved
-#define labeltje _labeltje
-#define name _name
-#define output_back _output_back
+#define codefile B_codefile
+#define cur_seg B_cur_seg
+#define saved B_saved
+#define labeltje B_labeltje
+#define name B_name
+#define output_back B_output_back
+
+/* Macros to change interface names */
+
+#define common B_common
+#define con1 B_con1
+#define con2 B_con2
+#define con4 B_con4
+#define rom1 B_rom1
+#define rom2 B_rom2
+#define rom4 B_rom4
+#define text1 B_txt1
+#define text2 B_txt2
+#define text4 B_txt4
+#define close_back B_close_back
+#define open_back B_open_back
+#define end_back B_end_back
+#define init_back B_init_back
+#define extnd_pro B_ex_pro
+#define extnd_start B_ex_start
+#define extnd_name B_ex_name
+#define extnd_dnam B_ex_dnam
+#define extnd_dlb B_ex_dlb
+#define extnd_ilb B_ex_ilb
+#define extnd_hol B_ex_hol
+#define extnd_part B_ex_part
+#define extnd_cont B_ex_cont
+#define gen1 B_gen1
+#define gen2 B_gen2
+#define gen4 B_gen4
+#define save_label B_save_label
+#define dump_label B_dump_label
+#define align_word B_align_word
+#define reloc1 B_rlc1
+#define reloc2 B_rlc2
+#define reloc4 B_rlc4
+#define set_global_visible B_stglobvis
+#define set_local_visible B_stlocvis
+#define symbol_definition B_symdef
+#define switchseg B_switchseg
extern File *codefile;
-#include "mach.h"
-#include "const.h"
-#include "back.h"
+#include "header.h"
/* This file contains low-level routines for generating assembly code. */
-int cur_seg = -1, saved = FALSE;
+int cur_seg = -1, saved = 0;
char name[256], labeltje[256];
File *codefile;
char *l;
{
sprint( labeltje, "%s", l);
- saved = TRUE;
+ saved = 1;
}
align_word();
symbol_definition( labeltje);
}
- saved = FALSE;
+ saved = 0;
}
char *extnd_dlb( g)
arith g;
{
- sprint( name, DLB_FMT, (arith)g);
+ sprint( name, DLB_FMT, (long)g);
return( name);
}
char *extnd_ilb( l, prcno)
arith l;
{
- sprint( name, ILB_FMT, prcno, (arith) l);
+ sprint( name, ILB_FMT, prcno, (long) l);
return( name);
}
char *extnd_part( d)
int d;
{
- sprint( name, "part%x", (arith) d);
+ sprint( name, "part%x", d);
return( name);
}
char *extnd_cont( d)
int d;
{
- sprint( name, "cont%x", (arith) d);
+ sprint( name, "cont%x", d);
return( name);
}