From 4a19973db38a653cae407d38e3ec7ea047c56e03 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Thu, 14 Jun 2001 17:39:30 +0000 Subject: [PATCH] Include when we have it. (scm_bits_t): Changed to be a unsigned type. Use uintptr_t when available. Else use "unsigned long". (scm_signed_bits_t): New. --- libguile/tags.h | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/libguile/tags.h b/libguile/tags.h index 3de11fec8..4f43dea26 100644 --- a/libguile/tags.h +++ b/libguile/tags.h @@ -52,11 +52,21 @@ ** It is here that tag bits are assigned for various purposes. **/ +#ifdef HAVE_STDINT_H +#include +#endif + /* In the beginning was the Word: */ -typedef long scm_bits_t; +#ifdef HAVE_UINTPTR_T +typedef uintptr_t scm_bits_t; +typedef intptr_t scm_signed_bits_t; +#else +typedef unsigned long scm_bits_t; +typedef signed long scm_signed_bits_t; +#endif /* But as external interface, we use SCM, which may, according to the desired * level of type checking, be defined in several ways: