[src/trunk]: src/usr.bin/m4 Add disabled support for saving and restoring the...

[christos <christos%NetBSD.org@localhost>]

details:   https://anonhg.NetBSD.org/src/rev/e6564d02abf7
branches:  trunk
changeset: 342963:e6564d02abf7
user:      christos <christos%NetBSD.org@localhost>
date:      Sat Jan 16 17:00:07 2016 +0000

description:
Add disabled support for saving and restoring the symbol table.

diffstat:

 usr.bin/m4/look.c |  39 +++++++++++++++++++++++++++++++++++++--
 1 files changed, 37 insertions(+), 2 deletions(-)

diffs (57 lines):

diff -r a77b380ed42c -r e6564d02abf7 usr.bin/m4/look.c
--- a/usr.bin/m4/look.c Sat Jan 16 16:59:18 2016 +0000
+++ b/usr.bin/m4/look.c Sat Jan 16 17:00:07 2016 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: look.c,v 1.12 2012/03/20 20:34:58 matt Exp $   */
+/*     $NetBSD: look.c,v 1.13 2016/01/16 17:00:07 christos Exp $       */
 /*     $OpenBSD: look.c,v 1.21 2009/10/14 17:23:17 sthen Exp $ */
 
 /*
@@ -42,7 +42,7 @@
 #include "nbtool_config.h"
 #endif
 #include <sys/cdefs.h>
-__RCSID("$NetBSD: look.c,v 1.12 2012/03/20 20:34:58 matt Exp $");
+__RCSID("$NetBSD: look.c,v 1.13 2016/01/16 17:00:07 christos Exp $");
 #include <stdio.h>
 #include <stdlib.h>
 #include <stdint.h>
@@ -278,3 +278,38 @@
                return p;
 }
 
+#ifdef REAL_FREEZE
+static void
+recurse(FILE *f, ndptr n, struct macro_definition *d)
+{
+       if (d->next != NULL)
+               recurse(f, n, d->next);
+
+       // skip built-ins, because it is cheaper to do so
+       // and initialize them manually
+       if (d->type & (NOARGS|NEEDARGS))
+               return;
+       fprintf(f, "%c%zu,%zu\n%s%s\n",
+           (d->type & (NOARGS|NEEDARGS)) ? 'F' : 'T',
+           strlen(n->name), strlen(d->defn),
+           n->name, d->defn);
+}
+
+static void
+dump_entry(FILE *f, ndptr n)
+{
+       if (n->d == NULL)
+               return;
+       recurse(f, n, n->d);
+}
+
+void
+dump_state(FILE *f)
+{
+       ndptr n;
+       unsigned int i;
+       for (n = ohash_first(&macros, &i); n != NULL; 
+           n = ohash_next(&macros, &i))
+               dump_entry(f, n);
+}
+#endif