guile/guile-core/srfi srfi-4.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/11/11 20:14:17

Modified files:
        guile-core/srfi: srfi-4.c 

Log message:
        Use HAVE_LONG_LONG instead of HAVE_LONG_LONGS and test
        it with `#ifdef' instead of `#if'.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/srfi/srfi-4.c.diff?cvsroot=OldCVS&tr1=1.2&tr2=1.3&r1=text&r2=text

Patches:
Index: guile/guile-core/srfi/srfi-4.c
diff -u guile/guile-core/srfi/srfi-4.c:1.2 guile/guile-core/srfi/srfi-4.c:1.3
--- guile/guile-core/srfi/srfi-4.c:1.2  Thu Jun 28 12:39:00 2001
+++ guile/guile-core/srfi/srfi-4.c      Sun Nov 11 20:14:17 2001
@@ -56,7 +56,7 @@
 typedef signed short int_s16;
 typedef unsigned int int_u32;
 typedef signed int int_s32;
-#if HAVE_LONG_LONGS
+#ifdef HAVE_LONG_LONG
 #if SIZEOF_LONG == 8
 typedef unsigned long int_u64;
 typedef signed long int_s64;
@@ -64,7 +64,7 @@
 typedef unsigned long long int_u64;
 typedef signed long long int_s64;
 #endif /* SIZEOF_LONG */
-#endif /* HAVE_LONG_LONGS */
+#endif /* HAVE_LONG_LONG */
 typedef float float_f32;
 typedef double float_f64;
 
@@ -245,7 +245,7 @@
        break;
       }
 
-#if HAVE_LONG_LONGS
+#ifdef HAVE_LONG_LONG
     case SCM_UVEC_U64:
       {
        int_u64 * p = (int_u64 *) SCM_UVEC_BASE (uvec);
@@ -1427,7 +1427,7 @@
 #undef FUNC_NAME
 
 
-#if HAVE_LONG_LONGS
+#ifdef HAVE_LONG_LONG
 
 /* ================================================================ */
 /* U64 procedures.                                                   */
@@ -1770,7 +1770,7 @@
 }
 #undef FUNC_NAME
 
-#endif /* HAVE_LONG_LONGS */
+#endif /* HAVE_LONG_LONG */
 
 
 /* ================================================================ */