public static void startupDescribe() {
    { Object old$Module$000 = Stella.$MODULE$.get();
      Object old$Context$000 = Stella.$CONTEXT$.get();

      try {
        Native.setSpecial(Stella.$MODULE$, Stella.$STELLA_MODULE$);
        Native.setSpecial(Stella.$CONTEXT$, ((Module)(Stella.$MODULE$.get())));
        if (Stella.currentStartupTimePhaseP(2)) {
          _StartupDescribe.helpStartupDescribe1();
        }
        if (Stella.currentStartupTimePhaseP(4)) {
          Stella.$STRING_TO_OBJECT_FUNCTIONS$ = KeyValueList.newKeyValueList();
          Stella.$INTEGER_TO_OBJECT_FUNCTIONS$ = List.list(Stella.NIL);
          Stella.$DEFAULT_DESCRIBE_MODE$ = Stella.KWD_VERBOSE;
          Stella.$SLOTOPTIONSLOTS$.setDefaultValue(null);
          Stella.$CLASSOPTIONSLOTS$.setDefaultValue(null);
          Stella.$CLASSUNSTRINGIFIEDOPTIONS$.setDefaultValue(null);
        }
        if (Stella.currentStartupTimePhaseP(6)) {
          Stella.finalizeClasses();
        }
        if (Stella.currentStartupTimePhaseP(7)) {
          _StartupDescribe.helpStartupDescribe2();
        }
        if (Stella.currentStartupTimePhaseP(8)) {
          Stella.finalizeSlots();
          Stella.cleanupUnfinalizedClasses();
        }
        if (Stella.currentStartupTimePhaseP(9)) {
          Stella_Object.inModule(((StringWrapper)(Stella_Object.copyConsTree(StringWrapper.wrapString("STELLA")))));
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *STRING-TO-OBJECT-FUNCTIONS* (KEY-VALUE-LIST OF TYPE CODE-WRAPPER) (NEW KEY-VALUE-LIST) :DOCUMENTATION \"Table of functions (keyed by type of object returned) that can\nbe called to search for an object identified by a string.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *INTEGER-TO-OBJECT-FUNCTIONS* (LIST OF CODE-WRAPPER) (LIST) :DOCUMENTATION \"List of functions that can be called to search for\nan object identified by an integer.\")");
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.clear();
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_CLASS, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToClass", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_CONTEXT, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToContext", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_METHOD_SLOT, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToFunction", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_SLOT, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToSlot", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_OBJECT, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToSurrogateValue", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$STRING_TO_OBJECT_FUNCTIONS$.insertAt(Stella.SGT_STELLA_DEMON, FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "stringToDemon", new java.lang.Class [] {Native.find_java_class("java.lang.String")})));
          Stella.$INTEGER_TO_OBJECT_FUNCTIONS$.insert(FunctionCodeWrapper.wrapFunctionCode(Native.find_java_method("edu.isi.stella.Stella", "integerToContext", new java.lang.Class [] {java.lang.Integer.TYPE})));
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *DEFAULT-DESCRIBE-MODE* KEYWORD :VERBOSE :PUBLIC? TRUE :DOCUMENTATION \"Specifies the print mode for `describe' when no second\nargument is given.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *PRETTY-PRINT-LIST-CUTOFF* INTEGER 5 :PUBLIC? TRUE :DOCUMENTATION \"Lists longer than the cutoff are truncated during\npretty printing.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFSPECIAL *SLOTOPTIONSLOTS* (CONS OF STORAGE-SLOT) NULL :DOCUMENTATION \"List of slots containing storage-slot options\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFSPECIAL *CLASSOPTIONSLOTS* (CONS OF STORAGE-SLOT) NULL :DOCUMENTATION \"List of slots containing class options\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFSPECIAL *CLASSUNSTRINGIFIEDOPTIONS* PROPERTY-LIST NULL :DOCUMENTATION \"Plist of unstringifed class options\")");
        }

      } finally {
        Stella.$CONTEXT$.set(old$Context$000);
        Stella.$MODULE$.set(old$Module$000);
      }
    }
  }