public static void startupClTranslate() {
    { 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)) {
          _StartupClTranslate.helpStartupClTranslate1();
        }
        if (Stella.currentStartupTimePhaseP(4)) {
          Stella.$CL_TRUE_STRING_WRAPPER$ = VerbatimStringWrapper.newVerbatimStringWrapper("CL:T");
          Stella.$CL_FALSE_STRING_WRAPPER$ = VerbatimStringWrapper.newVerbatimStringWrapper("CL:NIL");
          Stella.$NEEDEXPLICITRETURNp$.setDefaultValue(new Boolean(false));
        }
        if (Stella.currentStartupTimePhaseP(6)) {
          Stella.finalizeClasses();
        }
        if (Stella.currentStartupTimePhaseP(7)) {
          _StartupClTranslate.helpStartupClTranslate2();
          Stella.defineFunctionObject("CL-TRANSLATE-OPERATOR-TREE", "(DEFUN (CL-TRANSLATE-OPERATOR-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateOperatorTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("YIELD-FORMAT-ARGUMENTS", "(DEFUN (YIELD-FORMAT-ARGUMENTS CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "yieldFormatArguments", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("YIELD-PRINT-TREE", "(DEFUN (YIELD-PRINT-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "yieldPrintTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-PRINT-STREAM-TREE", "(DEFUN (CL-TRANSLATE-PRINT-STREAM-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslatePrintStreamTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-CALL-FUNCTION-CODE-TREE", "(DEFUN (CL-TRANSLATE-CALL-FUNCTION-CODE-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateCallFunctionCodeTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-INLINE-CALL-TREE", "(DEFUN (CL-TRANSLATE-INLINE-CALL-TREE OBJECT) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateInlineCallTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-VERBATIM-BODY-SYMBOLS", "(DEFUN (CL-TRANSLATE-VERBATIM-BODY-SYMBOLS OBJECT) ((BODY OBJECT) (PARAMETERS (LIST OF SYMBOL))))", Native.find_java_method("edu.isi.stella.Stella_Object", "clTranslateVerbatimBodySymbols", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.List")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-THE-CODE-TREE", "(DEFUN (CL-TRANSLATE-THE-CODE-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateTheCodeTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-VERBATIM-TREE", "(DEFUN (CL-TRANSLATE-VERBATIM-TREE OBJECT) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateVerbatimTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-INLINE-TREE", "(DEFUN (CL-TRANSLATE-INLINE-TREE CONS) ((TREE CONS)))", Native.find_java_method("edu.isi.stella.Cons", "clTranslateInlineTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("GENERATE-CL-TYPE-DECLARATIONS?", "(DEFUN (GENERATE-CL-TYPE-DECLARATIONS? BOOLEAN) ())", Native.find_java_method("edu.isi.stella.Stella", "generateClTypeDeclarationsP", new java.lang.Class [] {}), null);
          Stella.defineFunctionObject("LOOKUP-CL-TYPE-FROM-STELLA-TYPE", "(DEFUN (LOOKUP-CL-TYPE-FROM-STELLA-TYPE OBJECT) ((TYPE TYPE-SPEC)))", Native.find_java_method("edu.isi.stella.StandardObject", "lookupClTypeFromStellaType", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.StandardObject")}), null);
          Stella.defineFunctionObject("CL-YIELD-TYPED-EXPRESSION-TREE", "(DEFUN (CL-YIELD-TYPED-EXPRESSION-TREE OBJECT) ((TREE OBJECT) (TYPE TYPE-SPEC)))", Native.find_java_method("edu.isi.stella.Stella_Object", "clYieldTypedExpressionTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.StandardObject")}), null);
          Stella.defineFunctionObject("CL-YIELD-METHOD-PARAMETER-TYPE-DECLARATION-TREES", "(DEFUN (CL-YIELD-METHOD-PARAMETER-TYPE-DECLARATION-TREES CONS) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clYieldMethodParameterTypeDeclarationTrees", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-YIELD-LET-VARIABLE-TYPE-DECLARATION-TREES", "(DEFUN (CL-YIELD-LET-VARIABLE-TYPE-DECLARATION-TREES CONS) ((BINDINGSTREE (CONS OF CONS))))", Native.find_java_method("edu.isi.stella.Cons", "clYieldLetVariableTypeDeclarationTrees", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons")}), null);
          Stella.defineFunctionObject("CL-YIELD-GLOBAL-VARIABLE-TYPE-DECLARATION-TREE", "(DEFUN (CL-YIELD-GLOBAL-VARIABLE-TYPE-DECLARATION-TREE CONS) ((GLOBAL GLOBAL-VARIABLE)))", Native.find_java_method("edu.isi.stella.GlobalVariable", "clYieldGlobalVariableTypeDeclarationTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.GlobalVariable")}), null);
          Stella.defineFunctionObject("CL-YIELD-METHOD-ARGLIST-TYPE-DECLARATIONS", "(DEFUN (CL-YIELD-METHOD-ARGLIST-TYPE-DECLARATIONS CONS) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clYieldMethodArglistTypeDeclarations", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-YIELD-METHOD-RETURN-TYPE-DECLARATION", "(DEFUN (CL-YIELD-METHOD-RETURN-TYPE-DECLARATION OBJECT) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clYieldMethodReturnTypeDeclaration", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-YIELD-METHOD-TYPE-DECLARATION-TREE", "(DEFUN (CL-YIELD-METHOD-TYPE-DECLARATION-TREE CONS) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clYieldMethodTypeDeclarationTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-YIELD-DECLARE-TREE", "(DEFUN (CL-YIELD-DECLARE-TREE CONS) ((DECLARATIONS (CONS OF CONS)) (INCLUDE-TYPE-CHECKS? BOOLEAN)))", Native.find_java_method("edu.isi.stella.Cons", "clYieldDeclareTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Cons"), java.lang.Boolean.TYPE}), null);
          Stella.defineFunctionObject("CL-CONDITIONALIZE-TYPE-DECLARATION-TREE", "(DEFUN (CL-CONDITIONALIZE-TYPE-DECLARATION-TREE OBJECT) ((DECLARATION OBJECT)))", Native.find_java_method("edu.isi.stella.Stella_Object", "clConditionalizeTypeDeclarationTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-UNIT", "(DEFUN (CL-TRANSLATE-UNIT OBJECT) ((UNIT TRANSLATION-UNIT)))", Native.find_java_method("edu.isi.stella.TranslationUnit", "clTranslateUnit", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.TranslationUnit")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-METHOD-PARAMETERS", "(DEFUN (CL-TRANSLATE-METHOD-PARAMETERS CONS) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clTranslateMethodParameters", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-METHOD-DEFINITION-OPERATOR", "(DEFUN (CL-METHOD-DEFINITION-OPERATOR SYMBOL) ((METHOD METHOD-SLOT)))", Native.find_java_method("edu.isi.stella.MethodSlot", "clMethodDefinitionOperator", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.MethodSlot")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-DEFINE-METHOD-UNIT", "(DEFUN (CL-TRANSLATE-DEFINE-METHOD-UNIT CONS) ((UNIT TRANSLATION-UNIT)))", Native.find_java_method("edu.isi.stella.TranslationUnit", "clTranslateDefineMethodUnit", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.TranslationUnit")}), null);
          Stella.defineFunctionObject("YIELD-CLOS-SLOT-TYPE-TREE", "(DEFUN (YIELD-CLOS-SLOT-TYPE-TREE CONS) ((SLOT STORAGE-SLOT)))", Native.find_java_method("edu.isi.stella.StorageSlot", "yieldClosSlotTypeTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.StorageSlot")}), null);
          Stella.defineFunctionObject("YIELD-CLOS-SLOT-TREE", "(DEFUN (YIELD-CLOS-SLOT-TREE CONS) ((SLOT STORAGE-SLOT)))", Native.find_java_method("edu.isi.stella.StorageSlot", "yieldClosSlotTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.StorageSlot")}), null);
          Stella.defineFunctionObject("YIELD-CLOS-CLASS-TREE", "(DEFUN (YIELD-CLOS-CLASS-TREE CONS) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldClosClassTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("COMPUTE-CL-STRUCT-SLOTS", "(DEFUN (COMPUTE-CL-STRUCT-SLOTS (LIST OF STORAGE-SLOT)) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "computeClStructSlots", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("CL-STRUCT-SLOTS", "(DEFUN (CL-STRUCT-SLOTS (LIST OF STORAGE-SLOT)) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "clStructSlots", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("CL-STRUCT-SLOT-OFFSET", "(DEFUN (CL-STRUCT-SLOT-OFFSET INTEGER) ((SLOTNAME SYMBOL) (CLASSTYPE TYPE)))", Native.find_java_method("edu.isi.stella.Symbol", "clStructSlotOffset", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Symbol"), Native.find_java_class("edu.isi.stella.Surrogate")}), null);
          Stella.defineFunctionObject("YIELD-STRUCT-SLOT-TREE", "(DEFUN (YIELD-STRUCT-SLOT-TREE CONS) ((SLOT STORAGE-SLOT)))", Native.find_java_method("edu.isi.stella.StorageSlot", "yieldStructSlotTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.StorageSlot")}), null);
          Stella.defineFunctionObject("YIELD-STRUCT-SLOT-TREES", "(DEFUN (YIELD-STRUCT-SLOT-TREES CONS) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldStructSlotTrees", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("YIELD-STRUCT-TREE", "(DEFUN (YIELD-STRUCT-TREE CONS) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldStructTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("YIELD-VECTOR-STRUCT-NAME", "(DEFUN (YIELD-VECTOR-STRUCT-NAME OBJECT) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldVectorStructName", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("YIELD-VECTOR-STRUCT-TREE", "(DEFUN (YIELD-VECTOR-STRUCT-TREE CONS) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldVectorStructTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("YIELD-CONDITION-TREE", "(DEFUN (YIELD-CONDITION-TREE CONS) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "yieldConditionTree", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("CL-ALWAYS-TRANSLATE-TO-CLOS-CLASS?", "(DEFUN (CL-ALWAYS-TRANSLATE-TO-CLOS-CLASS? BOOLEAN) ((CLASS CLASS)))", Native.find_java_method("edu.isi.stella.Stella_Class", "clAlwaysTranslateToClosClassP", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Class")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-DEFINE-NATIVE-CLASS-UNIT", "(DEFUN (CL-TRANSLATE-DEFINE-NATIVE-CLASS-UNIT CONS) ((UNIT TRANSLATION-UNIT)))", Native.find_java_method("edu.isi.stella.TranslationUnit", "clTranslateDefineNativeClassUnit", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.TranslationUnit")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-DEFINE-GLOBAL-VARIABLE-UNIT", "(DEFUN (CL-TRANSLATE-DEFINE-GLOBAL-VARIABLE-UNIT CONS) ((UNIT TRANSLATION-UNIT)))", Native.find_java_method("edu.isi.stella.TranslationUnit", "clTranslateDefineGlobalVariableUnit", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.TranslationUnit")}), null);
          Stella.defineFunctionObject("CL-TRANSLATE-DEFPRINT-UNIT", "(DEFUN (CL-TRANSLATE-DEFPRINT-UNIT CONS) ((UNIT TRANSLATION-UNIT)))", Native.find_java_method("edu.isi.stella.TranslationUnit", "clTranslateDefprintUnit", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.TranslationUnit")}), null);
          Stella.defineFunctionObject("STARTUP-CL-TRANSLATE", "(DEFUN STARTUP-CL-TRANSLATE () :PUBLIC? TRUE)", Native.find_java_method("edu.isi.stella._StartupClTranslate", "startupClTranslate", new java.lang.Class [] {}), null);
          { MethodSlot function = Symbol.lookupFunction(Stella.SYM_STELLA_STARTUP_CL_TRANSLATE);

            KeyValueList.setDynamicSlotValue(function.dynamicSlots, Stella.SYM_STELLA_METHOD_STARTUP_CLASSNAME, StringWrapper.wrapString("_StartupClTranslate"), Stella.NULL_STRING_WRAPPER);
          }
        }
        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 *CL-TRUE-STRING-WRAPPER* VERBATIM-STRING-WRAPPER (NEW VERBATIM-STRING-WRAPPER :WRAPPER-VALUE \"CL:T\"))");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *CL-FALSE-STRING-WRAPPER* VERBATIM-STRING-WRAPPER (NEW VERBATIM-STRING-WRAPPER :WRAPPER-VALUE \"CL:NIL\"))");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *CL-OPERATOR-TABLE* KEY-VALUE-LIST NULL :DOCUMENTATION \"Mapping from STELLA operators to Common-Lisp operators.\")");
          Stella.$CL_OPERATOR_TABLE$ = ((KeyValueList)(AbstractDictionary.dictionary(Stella.SGT_STELLA_KEY_VALUE_LIST, Cons.cons(Stella.SYM_STELLA_i, Cons.cons(Stella.internCommonLispSymbol("+"), Cons.cons(Stella.SYM_STELLA__, Cons.cons(Stella.internCommonLispSymbol("-"), Cons.cons(Stella.SYM_STELLA_$, Cons.cons(Stella.internCommonLispSymbol("*"), Cons.cons(Stella.SYM_STELLA_s, Cons.cons(Stella.internCommonLispSymbol("/"), Cons.cons(Stella.SYM_STELLA_EQp, Cons.cons(Stella.internCommonLispSymbol("EQL"), Cons.cons(Stella.SYM_STELLA_l, Cons.cons(Stella.internCommonLispSymbol("<"), Cons.cons(Stella.SYM_STELLA_le, Cons.cons(Stella.internCommonLispSymbol("<="), Cons.cons(Stella.SYM_STELLA_ge, Cons.cons(Stella.internCommonLispSymbol(">="), Cons.cons(Stella.SYM_STELLA_g, Cons.cons(Stella.internCommonLispSymbol(">"), Cons.cons(Stella.SYM_STELLA_e, Cons.cons(Stella.internCommonLispSymbol("="), Cons.cons(Stella.SYM_STELLA_xe, Cons.cons(Stella.internCommonLispSymbol("/="), Stella.NIL)))))))))))))))))))))))));
          { boolean usestructsP = false;
            boolean usevectorstructsP = false;
            boolean useclconsesP = false;

            if (usestructsP) {
              Stella.setStellaFeature(Cons.cons(Stella.KWD_USE_COMMON_LISP_STRUCTS, Stella.NIL));
            }
            if (usevectorstructsP) {
              Stella.setStellaFeature(Cons.cons(Stella.KWD_USE_COMMON_LISP_VECTOR_STRUCTS, Stella.NIL));
            }
            if (useclconsesP) {
              Stella.setStellaFeature(Cons.cons(Stella.KWD_USE_COMMON_LISP_CONSES, Stella.NIL));
            }
          }
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFSPECIAL *NEEDEXPLICITRETURN?* BOOLEAN FALSE)");
        }

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