From 56ab70f21fdc64dfc143787f66c0384090c8eb27 Mon Sep 17 00:00:00 2001 From: ceriel Date: Thu, 19 Dec 1991 09:30:53 +0000 Subject: [PATCH] Added dbsym.c --- util/ceg/ce_back/obj_back/dbsym.c | 43 +++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 util/ceg/ce_back/obj_back/dbsym.c diff --git a/util/ceg/ce_back/obj_back/dbsym.c b/util/ceg/ce_back/obj_back/dbsym.c new file mode 100644 index 000000000..6c3244878 --- /dev/null +++ b/util/ceg/ce_back/obj_back/dbsym.c @@ -0,0 +1,43 @@ +#include "header.h" +#include "back.h" +#include +#include + +B_symbstr(s, len, type, add, val, added) +char *s, *val; +arith added; +{ + int i = find_sym(val, STORE_STRING); + register struct outname *p; + + if (! s) s = ""; + p = &symbol_table[find_sym(s, FORCE_DEF)]; + p->on_type = S_CRS | (type << 8); + p->on_desc = add; + p->on_valu = i; +} + +B_symbcst(s, len, type, add, val) +char *s; +arith val; +{ + register struct outname *p; + + if (! s) s = ""; + p = &symbol_table[find_sym(s, FORCE_DEF)]; + p->on_type = S_ABS | (type << 8); + p->on_desc = add; + p->on_valu = val; +} + +B_symd(s, len, type, add) +char *s; +{ + register struct outname *p; + + if (! s) s = ""; + p = &symbol_table[find_sym(s, FORCE_DEF)]; + p->on_type = S_MIN | (type << 8); + p->on_desc = add; + p->on_valu = text-text_area; +} -- 2.34.1