From 0e40cfcdc8695ad2783fb33e6d6e0ee660f8c3b9 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 19 Feb 2012 06:25:01 -0700 Subject: [PATCH] declare `char' fields used as signed With some compilers or platforms, `char' means an unsigned value, so we have to be explicit with `signed char'. --- src/racket/src/future.h | 2 +- src/racket/src/schpriv.h | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/racket/src/future.h b/src/racket/src/future.h index 214969c3f9..cf6cb9b9ff 100644 --- a/src/racket/src/future.h +++ b/src/racket/src/future.h @@ -184,7 +184,7 @@ typedef struct future_t { void *retval_p; /* use only with conservative GC */ MZ_MARK_STACK_TYPE retval_m; int retval_i; - char no_retval; + signed char no_retval; char retval_is_rs_plus_two; /* => special result handling for on-demand JIT */ Scheme_Object **multiple_array; diff --git a/src/racket/src/schpriv.h b/src/racket/src/schpriv.h index 50623c94a7..0a56b4ebae 100644 --- a/src/racket/src/schpriv.h +++ b/src/racket/src/schpriv.h @@ -2956,7 +2956,7 @@ typedef struct Scheme_Module_Registry { struct Scheme_Env { Scheme_Object so; /* scheme_namespace_type */ - char disallow_unbound, rename_set_ready; + signed char disallow_unbound, rename_set_ready; struct Scheme_Module *module; /* NULL => top-level */