From 56ab70f21fdc64dfc143787f66c0384090c8eb27 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
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 <em.h>
+#include <out.h>
+
+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;
+}