guile/guile-core/libguile ChangeLog regex-posix.c

[Gary Houston]

CVSROOT:        /cvs
Module name:    guile
Branch:         branch_release-1-6
Changes by:     Gary Houston <address@hidden>   01/07/22 05:50:04

Modified files:
        guile-core/libguile: ChangeLog regex-posix.c 

Log message:
        * regex-posix.c (s_scm_regexp_exec): use scm_long2num not
        SCM_MAKINUM to convert regoff_t value to SCM.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/ChangeLog.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.1465.2.6&tr2=1.1465.2.7&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/regex-posix.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.53.2.1&tr2=1.53.2.2&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1473 
guile/guile-core/libguile/ChangeLog:1.1474
--- guile/guile-core/libguile/ChangeLog:1.1473  Sat Jul 21 14:11:16 2001
+++ guile/guile-core/libguile/ChangeLog Sun Jul 22 05:49:02 2001
@@ -1,3 +1,8 @@
+2001-07-22  Gary Houston  <address@hidden>
+
+       * regex-posix.c (s_scm_regexp_exec): use scm_long2num not
+       SCM_MAKINUM to convert regoff_t value to SCM.
+
 2001-07-21  Gary Houston  <address@hidden>
 
        * scmsigs.c: include sys/time.h for itimer stuff.
Index: guile/guile-core/libguile/regex-posix.c
diff -u guile/guile-core/libguile/regex-posix.c:1.54 
guile/guile-core/libguile/regex-posix.c:1.55
--- guile/guile-core/libguile/regex-posix.c:1.54        Mon Jul  9 00:36:47 2001
+++ guile/guile-core/libguile/regex-posix.c     Sun Jul 22 05:49:02 2001
@@ -278,8 +278,8 @@
          SCM_VELTS(mvec)[i+1] = scm_cons (SCM_MAKINUM (-1), SCM_MAKINUM (-1));
        else
          SCM_VELTS(mvec)[i+1]
-           = scm_cons(SCM_MAKINUM(matches[i].rm_so + offset),
-                      SCM_MAKINUM(matches[i].rm_eo + offset));
+           = scm_cons (scm_long2num (matches[i].rm_so + offset),
+                       scm_long2num (matches[i].rm_eo + offset));
     }
   scm_must_free ((char *) matches);
   SCM_ALLOW_INTS;