From e78baaa1739cb7f3ccfb716226e061dc1f9b0c19 Mon Sep 17 00:00:00 2001 From: Mark Murray Date: Fri, 14 Nov 2003 08:06:58 +0000 Subject: Small bug fix. This is of strong relevance to the Axiom port which I hope to commit in a week or three. --- devel/noweb/files/patch-c_modules.nw | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 devel/noweb/files/patch-c_modules.nw (limited to 'devel/noweb/files/patch-c_modules.nw') diff --git a/devel/noweb/files/patch-c_modules.nw b/devel/noweb/files/patch-c_modules.nw new file mode 100644 index 000000000000..c46d2d83ca8a --- /dev/null +++ b/devel/noweb/files/patch-c_modules.nw @@ -0,0 +1,21 @@ +--- c/modules.nw.orig Wed Mar 28 14:44:00 2001 ++++ c/modules.nw Mon Nov 10 09:25:05 2003 +@@ -197,11 +197,17 @@ + out as a special case. + This change probably blows the case where the module being expanded is + empty. ++ ++If the lookup fails then the module (or chunk) is an undefined name. ++We complain about it but want to output the original source. ++We just wrap it in the bogus chunk name in the angle brackets ++that it must have had in the input and output it. (Tim Daly Nov 13, 2002) + <>= + newmod = lookup(p->contents); + if (newmod==NULL) { +- errormsg (Error, "undefined chunk name: @<<%s@>>", p->contents); ++ errormsg (Error, "ignoring undefined chunk name: @<<%s@>>", p->contents); + error=Error; ++ printf("@<<%s@>>",p->contents); + } else { + int retcode; + if (*locformat == 0 && partial_distance == 0) { -- cgit v1.2.3