From: ceriel <none@none>
Date: Thu, 8 Sep 1988 10:24:16 +0000 (+0000)
Subject: Added support for new C_insertpart, C_beginpart, C_endpart functions
X-Git-Tag: release-5-5~2858
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=b5f657aba6bc1bb2ccc84d87b803465e2781732a;p=ack.git

Added support for new C_insertpart, C_beginpart, C_endpart functions
---

diff --git a/util/ceg/ce_back/obj_back/back.h b/util/ceg/ce_back/obj_back/back.h
index ad21d9061..011d94e2f 100644
--- a/util/ceg/ce_back/obj_back/back.h
+++ b/util/ceg/ce_back/obj_back/back.h
@@ -2,7 +2,8 @@
  */
 
 extern char *extnd_name(), *extnd_dnam(), *extnd_dlb(), *extnd_ilb(),
-	    *extnd_hol(), *extnd_ext(), *extnd_pro(), *extnd_start();
+	    *extnd_hol(), *extnd_ext(), *extnd_pro(), *extnd_start(),
+	    *extnd_part(), *extnd_cont();
 extern holno, procno;
 
 #include "data.h"
diff --git a/util/ceg/ce_back/obj_back/extnd.c b/util/ceg/ce_back/obj_back/extnd.c
index f570fa0a6..edc9de8ee 100644
--- a/util/ceg/ce_back/obj_back/extnd.c
+++ b/util/ceg/ce_back/obj_back/extnd.c
@@ -76,3 +76,21 @@ int hol;
         index_symbol_table = find_sym( string, STORE_STRING);
 	return( symbol_table[ index_symbol_table].on_foff + string_area);
 }
+
+
+char *extnd_part( d)
+int d;
+{
+	string_lengte = mysprint( "part%x", d);
+        index_symbol_table = find_sym( string, STORE_STRING);
+	return( symbol_table[ index_symbol_table].on_foff + string_area);
+}
+
+
+char *extnd_cont( d)
+int d;
+{
+	string_lengte = mysprint( "cont%x", d);
+        index_symbol_table = find_sym( string, STORE_STRING);
+	return( symbol_table[ index_symbol_table].on_foff + string_area);
+}