[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Changes to m4/modules/m4.c,v
From: |
Eric Blake |
Subject: |
Changes to m4/modules/m4.c,v |
Date: |
Thu, 31 May 2007 13:26:43 +0000 |
CVSROOT: /sources/m4
Module name: m4
Changes by: Eric Blake <ericb> 07/05/31 13:26:40
Index: modules/m4.c
===================================================================
RCS file: /sources/m4/m4/modules/m4.c,v
retrieving revision 1.109
retrieving revision 1.110
diff -u -b -r1.109 -r1.110
--- modules/m4.c 24 May 2007 20:13:44 -0000 1.109
+++ modules/m4.c 31 May 2007 13:26:39 -0000 1.110
@@ -70,7 +70,7 @@
BUILTIN (decr, false, true, true, 1, 1 ) \
BUILTIN (define, true, true, false, 1, 2 ) \
BUILTIN (defn, false, true, false, 1, -1 ) \
- BUILTIN (divert, false, false, false, 0, 1 ) \
+ BUILTIN (divert, false, false, false, 0, 2 ) \
BUILTIN (divnum, false, false, false, 0, 0 ) \
BUILTIN (dnl, false, false, false, 0, 0 ) \
BUILTIN (dumpdef, false, false, false, 0, -1 ) \
@@ -578,11 +578,16 @@
M4BUILTIN_HANDLER (divert)
{
int i = 0;
+ const char *text;
if (argc >= 2 && !m4_numeric_arg (context, argc, argv, 1, &i))
return;
m4_make_diversion (context, i);
+
+ text = M4ARG (2);
+ m4_shipout_text (context, NULL, text, strlen (text),
+ m4_get_current_line (context));
}
/* Expand to the current diversion number. */