diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2001-09-18 14:10:56 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2001-09-18 14:10:56 +0000 |
commit | ec33d1ee12fb1fdd1be4228da2cb286c379a5a21 (patch) | |
tree | e9f1f5421e4448000304dfc879e06673c7ea59c8 /usr.bin/m4/eval.c | |
parent | 779b7e3be33bf4c3f3cb805e8fa235bd673b3bcd (diff) |
let dumpdef go thru dump_one_def for each def.
Diffstat (limited to 'usr.bin/m4/eval.c')
-rw-r--r-- | usr.bin/m4/eval.c | 23 |
1 files changed, 15 insertions, 8 deletions
diff --git a/usr.bin/m4/eval.c b/usr.bin/m4/eval.c index ee4265f5d2e..32f76ea58c3 100644 --- a/usr.bin/m4/eval.c +++ b/usr.bin/m4/eval.c @@ -1,4 +1,4 @@ -/* $OpenBSD: eval.c,v 1.31 2001/09/18 14:05:14 espie Exp $ */ +/* $OpenBSD: eval.c,v 1.32 2001/09/18 14:10:55 espie Exp $ */ /* $NetBSD: eval.c,v 1.7 1996/11/10 21:21:29 pk Exp $ */ /* @@ -41,7 +41,7 @@ #if 0 static char sccsid[] = "@(#)eval.c 8.2 (Berkeley) 4/27/95"; #else -static char rcsid[] = "$OpenBSD: eval.c,v 1.31 2001/09/18 14:05:14 espie Exp $"; +static char rcsid[] = "$OpenBSD: eval.c,v 1.32 2001/09/18 14:10:55 espie Exp $"; #endif #endif /* not lint */ @@ -82,6 +82,7 @@ static void map __P((char *, const char *, const char *, const char *)); static const char *handledash __P((char *, char *, const char *)); static void expand_builtin __P((const char *[], int, int)); static void expand_macro __P((const char *[], int)); +static void dump_one_def __P((ndptr)); /* @@ -464,8 +465,6 @@ expand_builtin(argv, argc, td) } } -char *dumpfmt = "`%s'\t`%s'\n"; /* format string for dumpdef */ - /* * expand_macro - user-defined macro expansion */ @@ -623,6 +622,16 @@ dopushdef(name, defn) } /* + * dump_one_def - dump the specified definition. + */ +static void +dump_one_def(p) + ndptr p; +{ + fprintf(stderr, "`%s'\t`%s'\n", p->name, p->defn); +} + +/* * dodumpdef - dump the specified definitions in the hash * table to stderr. If nothing is specified, the entire * hash table is dumped. @@ -638,13 +647,11 @@ dodump(argv, argc) if (argc > 2) { for (n = 2; n < argc; n++) if ((p = lookup(argv[n])) != nil) - fprintf(stderr, dumpfmt, p->name, - p->defn); + dump_one_def(p); } else { for (n = 0; n < HASHSIZE; n++) for (p = hashtab[n]; p != nil; p = p->nxtptr) - fprintf(stderr, dumpfmt, p->name, - p->defn); + dump_one_def(p); } } |