From d8927ddd73157ae1da9e9f9cdc802c664eea939e Mon Sep 17 00:00:00 2001 From: Mike Sperber Date: Sat, 4 Dec 2010 17:28:49 +0100 Subject: [PATCH] Unbreak build in FreeBSD. One missing include, and two prototype conflicts. --HG-- extra : rebase_source : 3c1c33cda0628e1351bd6dad5f6e1e03b5acd03a --- src/racket/include/scheme.h | 1 + src/racket/src/schemef.h | 4 ++-- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/src/racket/include/scheme.h b/src/racket/include/scheme.h index 7dffd01922..8a5c384002 100644 --- a/src/racket/include/scheme.h +++ b/src/racket/include/scheme.h @@ -136,6 +136,7 @@ START_XFORM_SUSPEND; #include #include #include +#include #ifdef MZ_XFORM END_XFORM_SUSPEND; diff --git a/src/racket/src/schemef.h b/src/racket/src/schemef.h index 381316f477..6f385fcaab 100644 --- a/src/racket/src/schemef.h +++ b/src/racket/src/schemef.h @@ -573,8 +573,8 @@ MZ_EXTERN Scheme_Object *scheme_make_integer_value(intptr_t i); MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_unsigned(uintptr_t i); MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_long_long(mzlonglong i); MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_unsigned_long_long(umzlonglong i); -MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_long_halves(unsigned long lowhalf, unsigned long hihalf); -MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_unsigned_long_halves(unsigned long lowhalf, unsigned long hihalf); +MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_long_halves(uintptr_t lowhalf, uintptr_t hihalf); +MZ_EXTERN Scheme_Object *scheme_make_integer_value_from_unsigned_long_halves(uintptr_t lowhalf, uintptr_t hihalf); MZ_EXTERN Scheme_Object *scheme_make_double(double d); #ifdef MZ_USE_SINGLE_FLOATS MZ_EXTERN Scheme_Object *scheme_make_float(float f) ;