diff --git a/src/racket/include/mzwin.def b/src/racket/include/mzwin.def index 4c40d29944..9dde09cf63 100644 --- a/src/racket/include/mzwin.def +++ b/src/racket/include/mzwin.def @@ -134,6 +134,7 @@ EXPORTS scheme_uchar_titles scheme_uchar_folds scheme_uchar_combining_classes + scheme_on_demand_jit_code scheme_eval scheme_eval_multi scheme_eval_with_prompt diff --git a/src/racket/include/mzwin3m.def b/src/racket/include/mzwin3m.def index 25e99ccfc7..b38a0c7c83 100644 --- a/src/racket/include/mzwin3m.def +++ b/src/racket/include/mzwin3m.def @@ -134,6 +134,7 @@ EXPORTS scheme_uchar_titles scheme_uchar_folds scheme_uchar_combining_classes + scheme_on_demand_jit_code scheme_eval scheme_eval_multi scheme_eval_with_prompt diff --git a/src/racket/include/racket.exp b/src/racket/include/racket.exp index d24017f152..e1a80b149b 100644 --- a/src/racket/include/racket.exp +++ b/src/racket/include/racket.exp @@ -132,6 +132,7 @@ scheme_uchar_downs scheme_uchar_titles scheme_uchar_folds scheme_uchar_combining_classes +scheme_on_demand_jit_code scheme_eval scheme_eval_multi scheme_eval_with_prompt diff --git a/src/racket/include/racket3m.exp b/src/racket/include/racket3m.exp index 1f0d86d2da..b32ba6cb22 100644 --- a/src/racket/include/racket3m.exp +++ b/src/racket/include/racket3m.exp @@ -132,6 +132,7 @@ scheme_uchar_downs scheme_uchar_titles scheme_uchar_folds scheme_uchar_combining_classes +scheme_on_demand_jit_code scheme_eval scheme_eval_multi scheme_eval_with_prompt diff --git a/src/racket/src/future.h b/src/racket/src/future.h index f9f592fca9..abeee7e2a7 100644 --- a/src/racket/src/future.h +++ b/src/racket/src/future.h @@ -172,7 +172,6 @@ extern Scheme_Object *scheme_rtcall_make_fsemaphore(const char *who, int src_typ #endif -extern void *scheme_on_demand_jit_code; extern void scheme_on_demand_generate_lambda(Scheme_Native_Closure *nc, int argc, Scheme_Object **argv); void scheme_future_block_until_gc(); diff --git a/src/racket/src/jit.h b/src/racket/src/jit.h index d9cf812cd5..d73e5c936b 100644 --- a/src/racket/src/jit.h +++ b/src/racket/src/jit.h @@ -262,7 +262,6 @@ struct scheme_jit_common_record { }; extern struct scheme_jit_common_record scheme_jit_common; -extern void *scheme_on_demand_jit_code; #define sjc scheme_jit_common diff --git a/src/racket/src/schemef.h b/src/racket/src/schemef.h index ceb1dde411..e4fa097b8a 100644 --- a/src/racket/src/schemef.h +++ b/src/racket/src/schemef.h @@ -269,6 +269,8 @@ MZ_EXTERN int scheme_uchar_titles[]; MZ_EXTERN int scheme_uchar_folds[]; MZ_EXTERN unsigned char scheme_uchar_combining_classes[]; +MZ_EXTERN void *scheme_on_demand_jit_code; + /*========================================================================*/ /* evaluation */ /*========================================================================*/ diff --git a/src/racket/src/schemex.h b/src/racket/src/schemex.h index 721e13bad0..99081b1191 100644 --- a/src/racket/src/schemex.h +++ b/src/racket/src/schemex.h @@ -18,7 +18,7 @@ declaring scheme_extension_table */ /* The scheme_extension_table "parser" is picky; don't leave a space - between a function name and its opening parameter parenthesis. */ + between a function name and it's opening parameter parenthesis. */ /* After this START tag, all comments should start & end on same line */ @@ -217,6 +217,7 @@ int *scheme_uchar_downs; int *scheme_uchar_titles; int *scheme_uchar_folds; unsigned char *scheme_uchar_combining_classes; +void *scheme_on_demand_jit_code; /*========================================================================*/ /* evaluation */ /*========================================================================*/ diff --git a/src/racket/src/schemex.inc b/src/racket/src/schemex.inc index 73e1a52379..911b38ea61 100644 --- a/src/racket/src/schemex.inc +++ b/src/racket/src/schemex.inc @@ -140,6 +140,7 @@ scheme_extension_table->scheme_uchar_titles = scheme_uchar_titles; scheme_extension_table->scheme_uchar_folds = scheme_uchar_folds; scheme_extension_table->scheme_uchar_combining_classes = scheme_uchar_combining_classes; + scheme_extension_table->scheme_on_demand_jit_code = scheme_on_demand_jit_code; scheme_extension_table->scheme_eval = scheme_eval; scheme_extension_table->scheme_eval_multi = scheme_eval_multi; scheme_extension_table->scheme_eval_with_prompt = scheme_eval_with_prompt; diff --git a/src/racket/src/schemexm.h b/src/racket/src/schemexm.h index adac620c93..e1c74e981b 100644 --- a/src/racket/src/schemexm.h +++ b/src/racket/src/schemexm.h @@ -140,6 +140,7 @@ #define scheme_uchar_titles (scheme_extension_table->scheme_uchar_titles) #define scheme_uchar_folds (scheme_extension_table->scheme_uchar_folds) #define scheme_uchar_combining_classes (scheme_extension_table->scheme_uchar_combining_classes) +#define scheme_on_demand_jit_code (scheme_extension_table->scheme_on_demand_jit_code) #define scheme_eval (scheme_extension_table->scheme_eval) #define scheme_eval_multi (scheme_extension_table->scheme_eval_multi) #define scheme_eval_with_prompt (scheme_extension_table->scheme_eval_with_prompt)