summaryrefslogtreecommitdiff
path: root/libguile/gen-scmconfig.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-07-22 20:56:55 +0200
committerAndy Wingo <wingo@pobox.com>2010-07-26 15:00:49 +0200
commit4ca48269976e17b2530728cce7df63843a6ce2b0 (patch)
tree2f72584484bf9f40062dafa4123a962fe17e4eb7 /libguile/gen-scmconfig.c
parent77b139121d0344d8a89f4d8b85739a3447bac196 (diff)
downloadguile-4ca48269976e17b2530728cce7df63843a6ce2b0.tar.gz
remove SCM_HAVE_T_INT64, SCM_HAVE_T_UINT64
* libguile/__scm.h: * libguile/numbers.h: * libguile/random.c: * libguile/srfi-4.c: * libguile/srfi-4.h: * libguile/numbers.c: * test-suite/standalone/test-conversion.c: * libguile/gen-scmconfig.c: As we require 64-bit integers in configure.ac, remove conditional definition of 64-bit types.
Diffstat (limited to 'libguile/gen-scmconfig.c')
-rw-r--r--libguile/gen-scmconfig.c30
1 files changed, 5 insertions, 25 deletions
diff --git a/libguile/gen-scmconfig.c b/libguile/gen-scmconfig.c
index 851578f46..79a7d370e 100644
--- a/libguile/gen-scmconfig.c
+++ b/libguile/gen-scmconfig.c
@@ -78,9 +78,7 @@
type.
- we now use SCM_SIZEOF_FOO != 0 rather than SCM_HAVE_FOO for any
- cases where the size might actually vary. For types where the
- size is fixed, we use SCM_HAVE_FOO, i.e. you can see us define or
- not define SCM_HAVE_T_INT64 below when appropriate.
+ cases where the size might actually vary.
Rationales (not finished):
@@ -290,28 +288,10 @@ main (int argc, char *argv[])
return 1;
pf ("\n");
- pf ("/* 64-bit integer -- if available SCM_HAVE_T_INT64 will be 1 and\n"
- " scm_t_int64 will be a suitable type, otherwise SCM_HAVE_T_INT64\n"
- " will be 0. */\n");
- if (SCM_I_GSC_T_INT64)
- {
- pf ("#define SCM_HAVE_T_INT64 1 /* 0 or 1 */\n");
- pf ("typedef %s scm_t_int64;\n", SCM_I_GSC_T_INT64);
- }
- else
- pf ("#define SCM_HAVE_T_INT64 0 /* 0 or 1 */\n");
-
- pf ("\n");
- pf ("/* 64-bit unsigned integer -- if available SCM_HAVE_T_UINT64 will\n"
- " be 1 and scm_t_uint64 will be a suitable type, otherwise\n"
- " SCM_HAVE_T_UINT64 will be 0. */\n");
- if (SCM_I_GSC_T_UINT64)
- {
- pf ("#define SCM_HAVE_T_UINT64 1 /* 0 or 1 */\n");
- pf ("typedef %s scm_t_uint64;\n", SCM_I_GSC_T_UINT64);
- }
- else
- pf ("#define SCM_HAVE_T_UINT64 0 /* 0 or 1 */\n");
+ pf ("#define SCM_HAVE_T_INT64 1 /* 0 or 1 */\n");
+ pf ("typedef %s scm_t_int64;\n", SCM_I_GSC_T_INT64);
+ pf ("#define SCM_HAVE_T_UINT64 1 /* 0 or 1 */\n");
+ pf ("typedef %s scm_t_uint64;\n", SCM_I_GSC_T_UINT64);
pf ("\n");
pf ("/* scm_t_ptrdiff_t and size, always defined -- defined to long if\n"