Merge pull request #604 from ChrisJefferson/increase-table

Increase initial size of global variables and record names tables
gap-system · Feb 9, 2016 · d2741df · d2741df
2 parents 97fa819 + bdc50cb
commit d2741df
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/gvars.c b/src/gvars.c
@@ -1188,7 +1188,7 @@ static Int InitLibrary (
     SET_LEN_PLIST( FopiesGVars, 0 );
 
     /* make the list of global variables                                   */
-    SizeGVars  = 997;
+    SizeGVars  = 14033;
     TableGVars = NEW_PLIST( T_PLIST, SizeGVars );
     SET_LEN_PLIST( TableGVars, SizeGVars );
 

diff --git a/src/records.c b/src/records.c
@@ -739,7 +739,7 @@ static Int InitLibrary (
     SET_LEN_PLIST( NamesRNam, 0 );
 
     /* make the hash list of record names                                  */
-    SizeRNam = 997;
+    SizeRNam = 14033;
     HashRNam = NEW_PLIST( T_PLIST, SizeRNam );
     MakeBagPublic(HashRNam);
     SET_LEN_PLIST( HashRNam, SizeRNam );