public static Cons yieldNativeSlotReaderTree(StorageSlot slot, Stella_Class renamed_Class) {
    { Symbol readername = StorageSlot.yieldNativeSlotReaderName(slot);
      Stella_Object typetree = StorageSlot.yieldSlotTypeTree(slot);
      boolean slotvisibleP = Surrogate.subtypeOfP(renamed_Class.classType, slot.slotOwner);

      return (Cons.list$(Cons.cons(Stella.SYM_STELLA_DEFMETHOD, Cons.cons(Cons.cons(readername, Cons.cons(typetree, Stella.NIL)), Cons.cons(Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_SELF, Cons.cons(Stella_Class.classSymbol(renamed_Class), Cons.cons(Stella.NIL, Stella.NIL)))), Stella.NIL), Cons.cons(Stella.KWD_AUXILIARYp, Cons.cons(Stella.SYM_STELLA_TRUE, Cons.cons(((slotvisibleP ? Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_RETURN, Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_SLOT_VALUE, Cons.cons(Stella.SYM_STELLA_SELF, Cons.cons(slot.slotName, Cons.cons(Cons.list$(Cons.cons(Stella.KWD_CONTEXT_SENSITIVEp, Cons.cons(Stella.SYM_STELLA_FALSE, Cons.cons(Stella.NIL, Stella.NIL)))), Stella.NIL))))), Cons.cons(Stella.NIL, Stella.NIL)))), Stella.NIL) : Cons.list$(Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_ERROR, Cons.cons(StringWrapper.wrapString("Slot '"), Cons.cons(StringWrapper.wrapString(slot.slotName.symbolName), Cons.cons(Cons.list$(Cons.cons(StringWrapper.wrapString("' does not exist on "), Cons.cons(Stella.SYM_STELLA_SELF, Cons.cons(Stella.NIL, Stella.NIL)))), Stella.NIL))))), Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_RETURN, Cons.cons(Stella.SYM_STELLA_NULL, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.cons(Stella.NIL, Stella.NIL)))))).concatenate(Stella.NIL, Stella.NIL), Stella.NIL))))))));
    }
  }