diff --git a/racket/src/racket/src/error.c b/racket/src/racket/src/error.c index 4ac60c6b64..7be51d110f 100644 --- a/racket/src/racket/src/error.c +++ b/racket/src/racket/src/error.c @@ -2226,7 +2226,7 @@ static Scheme_Object *unquoted_printing_string(int argc, Scheme_Object **argv) Scheme_Object *o; if (!SCHEME_CHAR_STRINGP(argv[0])) - scheme_wrong_contract("unquoted-printing-string", "string", 0, argc, argv); + scheme_wrong_contract("unquoted-printing-string", "string?", 0, argc, argv); o = scheme_alloc_small_object(); o->type = scheme_unquoted_printing_string_type; diff --git a/racket/src/racket/src/schminc.h b/racket/src/racket/src/schminc.h index bae97a0b38..7f3fbf39c4 100644 --- a/racket/src/racket/src/schminc.h +++ b/racket/src/racket/src/schminc.h @@ -12,7 +12,7 @@ finally, set EXPECTED_PRIM_COUNT to the right value and USE_COMPILED_STARTUP to 1 and `make' again. */ -#define USE_COMPILED_STARTUP 0 +#define USE_COMPILED_STARTUP 1 #define EXPECTED_PRIM_COUNT 1159 #define EXPECTED_UNSAFE_COUNT 141