fix marshaling of module language info
Language info needs to be quote-protected in case it contains a hash table or graph structure.
This commit is contained in:
parent
9c7d0b8794
commit
bc6670c8e0
|
@ -1341,7 +1341,7 @@ static Scheme_Object *write_module(Scheme_Object *obj)
|
|||
l = cons(scheme_false, l);
|
||||
|
||||
if (m->lang_info)
|
||||
l = cons(m->lang_info, l);
|
||||
l = cons(scheme_protect_quote(m->lang_info), l);
|
||||
else
|
||||
l = cons(scheme_false, l);
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user