suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix inspector tracking in syntax objects

Browse Source 
Repair a NULL vs. #f mismatch.
This commit is contained in:
Matthew Flatt 2015-07-20 13:41:04 -06:00
parent 3d87d61039
commit 57ea02616c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/racket/src/syntax.c
View File

@ -4424,7 +4424,7 @@ void scheme_extend_module_context_with_shared(Scheme_Object *mc, /* (vector <sco
SCHEME_VEC_ELS(pes)[1] = (Scheme_Object *)pt;
SCHEME_VEC_ELS(pes)[2] = src_phase;
SCHEME_VEC_ELS(pes)[3] = unmarshal_info;
SCHEME_VEC_ELS(pes)[4] = insp_desc;
SCHEME_VEC_ELS(pes)[4] = (insp_desc ? insp_desc : scheme_false);
if (replace_at) {
SCHEME_BINDING_VAL(SCHEME_CAR(replace_at)) = pes;