Increase initial size of global variables and record names tables

gap-system · Feb 9, 2016 · bdc50cb · bdc50cb
1 parent 97fa819
commit bdc50cb
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 );