public static Stella_Object accessXmlExpressionIteratorSlotValue(XmlExpressionIterator self, Symbol slotname, Stella_Object value, boolean setvalueP) {
    if (slotname == Stella.SYM_STELLA_REGION_TAG) {
      if (setvalueP) {
        self.regionTag = ((Cons)(value));
      }
      else {
        value = self.regionTag;
      }
    }
    else if (slotname == Stella.SYM_STELLA_REGION_MATCH_FUNCTION) {
      if (setvalueP) {
        self.regionMatchFunction = ((FunctionCodeWrapper)(value)).wrapperValue;
      }
      else {
        value = FunctionCodeWrapper.wrapFunctionCode(self.regionMatchFunction);
      }
    }
    else if (slotname == Stella.SYM_STELLA_DOCTYPE) {
      if (setvalueP) {
        self.doctype = ((XmlDoctype)(value));
      }
      else {
        value = self.doctype;
      }
    }
    else if (slotname == Stella.SYM_STELLA_DOCTYPE_ITERATORp) {
      if (setvalueP) {
        self.doctypeIteratorP = BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper)(value)));
      }
      else {
        value = (self.doctypeIteratorP ? Stella.TRUE_WRAPPER : Stella.FALSE_WRAPPER);
      }
    }
    else {
      { OutputStringStream stream000 = OutputStringStream.newOutputStringStream();

        stream000.nativeStream.print("`" + slotname + "' is not a valid case option");
        throw ((StellaException)(StellaException.newStellaException(stream000.theStringReader()).fillInStackTrace()));
      }
    }
    return (value);
  }