guile-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

guile/guile-core/libguile version.c ChangeLog


From: Gary Houston
Subject: guile/guile-core/libguile version.c ChangeLog
Date: Sun, 14 Oct 2001 17:30:02 -0400

CVSROOT:        /cvs
Module name:    guile
Branch:         branch_release-1-6
Changes by:     Gary Houston <address@hidden>   01/10/14 17:30:02

Modified files:
        guile-core/libguile: version.c ChangeLog 

Log message:
        * version.c (scm_version): use sprintf instead of snprintf,
        for portability.  thanks to Bill Schottstaedt.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/version.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.20.2.3&tr2=1.20.2.4&r1=text&r2=text
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.39&tr2=1.1465.2.40&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1533 
guile/guile-core/libguile/ChangeLog:1.1534
--- guile/guile-core/libguile/ChangeLog:1.1533  Sun Oct 14 12:05:04 2001
+++ guile/guile-core/libguile/ChangeLog Sun Oct 14 17:28:23 2001
@@ -1,3 +1,8 @@
+2001-10-14  Gary Houston  <address@hidden>
+
+       * version.c (scm_version): use sprintf instead of snprintf,
+       for portability.  thanks to Bill Schottstaedt.
+
 2001-10-14  Mikael Djurfeldt  <address@hidden>
 
        * read.c (scm_lreadr): When user-defined hash procedure returns
Index: guile/guile-core/libguile/version.c
diff -u guile/guile-core/libguile/version.c:1.23 
guile/guile-core/libguile/version.c:1.24
--- guile/guile-core/libguile/version.c:1.23    Thu Sep 20 12:47:01 2001
+++ guile/guile-core/libguile/version.c Sun Oct 14 17:28:23 2001
@@ -106,9 +106,13 @@
 #define FUNC_NAME s_scm_version
 {
 
-  char version_str[64];
+  char version_str[3 * 4 + 3];
 
-  snprintf(version_str, sizeof(version_str), "%d.%d.%d",
+#if SCM_GUILE_MAJOR_VERSION > 9999 || SCM_GUILE_MINOR_VERSION > 9999 \
+  || SCM_GUILE_MICRO_VERSION > 9999
+# error version string may overflow buffer
+#endif
+  sprintf (version_str, "%d.%d.%d",
            SCM_GUILE_MAJOR_VERSION,
            SCM_GUILE_MINOR_VERSION,
            SCM_GUILE_MICRO_VERSION);



reply via email to

[Prev in Thread] Current Thread [Next in Thread]