CVSROOT: /sources/m4
Module name: m4
Changes by: Eric Blake <ericb> 06/12/27 14:14:27
Index: modules/m4.c
===================================================================
RCS file: /sources/m4/m4/modules/m4.c,v
retrieving revision 1.97
retrieving revision 1.98
diff -u -b -r1.97 -r1.98
--- modules/m4.c 23 Dec 2006 00:02:20 -0000 1.97
+++ modules/m4.c 27 Dec 2006 14:14:27 -0000 1.98
@@ -938,7 +938,15 @@
substring extends to the end of the first argument. */
M4BUILTIN_HANDLER (substr)
{
- int start, length, avail;
+ int start = 0;
+ int length;
+ int avail;
+
+ if (argc <= 2)
+ {
+ obstack_grow (obs, M4ARG (1), strlen (M4ARG (1)));
+ return;
+ }
length = avail = strlen (M4ARG (1));
if (!m4_numeric_arg (context, argc, argv, 2, &start))
