public static Cons yieldDefineStellaMethodObject(MethodSlot method, MethodSlot codemethod, MethodSlot wrappermethod) {
    { Stella_Object name = StringWrapper.wrapString(Native.stringify(method.slotName));

      if (method.methodFunctionP) {
        if (MethodSlot.defineFunctionObjectEagerlyP(method)) {
          name = Stella.SYM_STELLA_NULL;
        }
        else if (!Stella_Object.eqlToStringP(name, method.slotName.symbolName)) {
          name = StringWrapper.wrapString(" " + ((StringWrapper)(name)).wrapperValue);
        }
        return (Cons.list$(Cons.cons(Stella.SYM_STELLA_DEFINE_FUNCTION_OBJECT, Cons.cons(name, Cons.cons(Cons.cons(Stella.yieldStringConstantTree(method.methodStringifiedSource), Cons.cons(((codemethod != null) ? ((StandardObject)(Cons.list$(Cons.cons(Stella.SYM_STELLA_THE_CODE, Cons.cons(Stella.KWD_FUNCTION, Cons.cons(codemethod.slotName, Cons.cons(Stella.NIL, Stella.NIL))))))) : ((StandardObject)(Stella.SYM_STELLA_NULL))), Cons.cons(((wrappermethod != null) ? ((StandardObject)(Cons.list$(Cons.cons(Stella.SYM_STELLA_THE_CODE, Cons.cons(Stella.KWD_FUNCTION, Cons.cons(wrappermethod.slotName, Cons.cons(Cons.cons(wrappermethod, Stella.NIL), Stella.NIL))))))) : ((StandardObject)(Stella.SYM_STELLA_NULL))), Stella.NIL))), Stella.NIL)))));
      }
      else {
        return (Cons.list$(Cons.cons(Stella.SYM_STELLA_DEFINE_METHOD_OBJECT, Cons.cons(Stella.yieldStringConstantTree(method.methodStringifiedSource), Cons.cons(Cons.cons(((codemethod != null) ? ((StandardObject)(Cons.list$(Cons.cons(Stella.SYM_STELLA_THE_CODE, Cons.cons(Stella.KWD_METHOD, Cons.cons(codemethod.slotOwner, Cons.cons(Cons.cons(codemethod.slotName, Stella.NIL), Stella.NIL))))))) : ((StandardObject)(Stella.SYM_STELLA_NULL))), Cons.cons(Stella.SYM_STELLA_NULL, Stella.NIL)), Stella.NIL)))));
      }
    }
  }