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

Force scheme_types not to grow after initialization

Browse Source 
svn: r12819
This commit is contained in:
Kevin Tew 2008-12-12 19:36:43 +00:00
parent 51eb2a8257
commit 3fc53848ce
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/type.c
View File

@ -51,7 +51,7 @@ static void init_type_arrays()
REGISTER_SO(scheme_type_hash2s);
maxtype = _scheme_last_type_;
allocmax = maxtype + 10;
allocmax = maxtype + 100;
type_names = MALLOC_N(char *, allocmax);
scheme_type_readers = MALLOC_N_ATOMIC(Scheme_Type_Reader, allocmax);