diff --git a/lang/cem/cemcom/make.allocd b/lang/cem/cemcom/make.allocd
new file mode 100755
index 00000000..1c2469d8
--- /dev/null
+++ b/lang/cem/cemcom/make.allocd
@@ -0,0 +1,9 @@
+sed '
+s:^.*ALLOCDEF.*"\(.*\)".*$:\
+/* allocation definitions of struct \1 */\
+extern char *st_alloc();\
+extern struct \1 *h_\1;\
+#define	new_\1() ((struct \1 *) \\\
+		st_alloc((char **)\&h_\1, sizeof(struct \1)))\
+#define	free_\1(p) st_free(p, h_\1, sizeof(struct \1))\
+:'