guile/guile-core/libguile chars.h

[Thien-Thi Nguyen]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Thien-Thi Nguyen <address@hidden>       01/09/25 23:14:15

Modified files:
        guile-core/libguile: chars.h 

Log message:
        (SCM_MAKE_CHAR): Use `scm_t_bits' instead of `intptr_t'.
        Thanks to Golubev I. N.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/chars.h.diff?cvsroot=OldCVS&tr1=1.14&tr2=1.15&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/chars.h
diff -u guile/guile-core/libguile/chars.h:1.14 
guile/guile-core/libguile/chars.h:1.15
--- guile/guile-core/libguile/chars.h:1.14      Fri Sep 21 13:56:39 2001
+++ guile/guile-core/libguile/chars.h   Tue Sep 25 23:14:15 2001
@@ -53,7 +53,7 @@
  */
 #define SCM_CHARP(x) (SCM_ITAG8(x) == scm_tc8_char)
 #define SCM_CHAR(x) ((unsigned int)SCM_ITAG8_DATA(x))
-#define SCM_MAKE_CHAR(x) SCM_MAKE_ITAG8((intptr_t) x, scm_tc8_char)
+#define SCM_MAKE_CHAR(x) SCM_MAKE_ITAG8((scm_t_bits) x, scm_tc8_char)