Back to index

plt-scheme  4.2.1
schminc.h
Go to the documentation of this file.
00001 /* 
00002    The cstartup.inc file is not, as distributed, compatible with
00003    omissions from or additions to the set of built-in identifiers.
00004    The reason is that the cstartup.inc file is a .zo version of the
00005    startup.inc files, and the .zo format changes when the set of
00006    built-in names changes (because indices assigned to the built-in
00007    names shift).
00008 
00009    If you make a version with omissions or additions and then run
00010    `make startup' to recreate the cstartup.inc file, set
00011    EXPECTED_PRIM_COUNT to the new value, and then USE_COMPILED_STARTUP
00012    can be set to 1 again. */
00013 
00014 #define USE_COMPILED_STARTUP 1
00015 
00016 #define EXPECTED_PRIM_COUNT 957
00017 
00018 #ifdef MZSCHEME_SOMETHING_OMITTED
00019 # undef USE_COMPILED_STARTUP
00020 # define USE_COMPILED_STARTUP 0
00021 #endif
00022 
00023 #if defined(__MWERKS__) && !defined(powerc)
00024 #define MZCOMPILED_STRING_FAR far
00025 #else
00026 #define MZCOMPILED_STRING_FAR 
00027 #endif
00028 
00029 #if USE_COMPILED_STARTUP
00030 extern Scheme_Object *scheme_eval_compiled_sized_string(const char *str, int len, Scheme_Env *env);
00031 #endif