diff options
Diffstat (limited to 'rgx.c')
-rwxr-xr-x[-rw-r--r--] | rgx.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -31,7 +31,7 @@ #endif static char rcsid[] = - "$Id: rgx.c,v 1.19 2008/01/31 03:32:33 jaffer Exp $"; + "$Id: rgx.c,v 1.20 2013/03/14 04:42:23 jaffer Exp $"; #ifdef HAVE_ALLOCA # include <alloca.h> @@ -586,7 +586,7 @@ SCM lstringedit(prog, editspec, args) count = CAR(CDR(args)); ASRTER(INUMP(count)||(count==BOOL_T), count, ARG4, s_stringedit); } else - count = MAKINUM(1); + count = MAKINUM(1L); /* process the editspec - break it into a list of dotted pairs * of integers for substrings to be inserted and |