Changeset 12972

Timestamp:

10/10/10 15:52:04 (12 years ago)

Author:

ehuelsmann

Message:

Preallocate package sizes large enough to hold all the symbols
inserted during the boot process.

File:

• trunk/abcl/src/org/armedbear/lisp/Lisp.java (modified) (3 diffs)

trunk/abcl/src/org/armedbear/lisp/Lisp.java

@@ -55 +55 @@
   // Packages.
   public static final Package PACKAGE_CL =
-    Packages.createPackage("COMMON-LISP", 1024);
+    Packages.createPackage("COMMON-LISP", 2048); // EH 10-10-2010: Actual number = 1014
   public static final Package PACKAGE_CL_USER =
     Packages.createPackage("COMMON-LISP-USER", 1024);
@@ -61 +61 @@
     Packages.createPackage("KEYWORD", 1024);
   public static final Package PACKAGE_SYS =
-    Packages.createPackage("SYSTEM");
+    Packages.createPackage("SYSTEM", 2048); // EH 10-10-2010: Actual number = 1216
   public static final Package PACKAGE_MOP =
-    Packages.createPackage("MOP");
+    Packages.createPackage("MOP", 512); // EH 10-10-2010: Actual number = 277
   public static final Package PACKAGE_TPL =
-    Packages.createPackage("TOP-LEVEL");
+    Packages.createPackage("TOP-LEVEL", 128); // EH 10-10-2010: Actual number = 6
   public static final Package PACKAGE_EXT =
-    Packages.createPackage("EXTENSIONS");
+    Packages.createPackage("EXTENSIONS", 256); // EH 10-10-2010: Actual number = 131
   public static final Package PACKAGE_JVM =
-    Packages.createPackage("JVM");
+    Packages.createPackage("JVM", 2048); // EH 10-10-2010: Actual number = 1518
   public static final Package PACKAGE_LOOP =
-    Packages.createPackage("LOOP");
+    Packages.createPackage("LOOP", 512); // EH 10-10-2010: Actual number = 305
   public static final Package PACKAGE_PROF =
     Packages.createPackage("PROFILER");
@@ -87 +87 @@
     Packages.createPackage("PRECOMPILER");
   public static final Package PACKAGE_SEQUENCE =
-    Packages.createPackage("SEQUENCE");
+    Packages.createPackage("SEQUENCE", 128); // EH 10-10-2010: Actual number 62