public static Stella_Object accessStellaHashTableSlotValue(
StellaHashTable self, Symbol slotname, Stella_Object value, boolean setvalueP) {
if (slotname == Stella.SYM_STELLA_SIZE) {
if (setvalueP) {
self.size = ((IntegerWrapper) (value)).wrapperValue;
} else {
value = IntegerWrapper.wrapInteger(self.size);
}
} else if (slotname == Stella.SYM_STELLA_INITIAL_SIZE) {
if (setvalueP) {
self.initialSize = ((IntegerWrapper) (value)).wrapperValue;
} else {
value = IntegerWrapper.wrapInteger(self.initialSize);
}
} else if (slotname == Stella.SYM_STELLA_FREE_ELEMENTS) {
if (setvalueP) {
self.freeElements = ((IntegerWrapper) (value)).wrapperValue;
} else {
value = IntegerWrapper.wrapInteger(self.freeElements);
}
} else if (slotname == Stella.SYM_STELLA_EQUAL_TESTp) {
if (setvalueP) {
self.equalTestP = BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.equalTestP ? 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);
}
public static Stella_Object accessVizInfoSlotValue(
VizInfo self, Symbol slotname, Stella_Object value, boolean setvalueP) {
if (slotname == OntosaurusUtil.SYM_STELLA_STREAM) {
if (setvalueP) {
self.stream = ((OutputStream) (value));
} else {
value = self.stream;
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_ALLOWED_OBJECTS) {
if (setvalueP) {
self.allowedObjects = ((HashSet) (value));
} else {
value = self.allowedObjects;
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_SHOW_RELATIONSp) {
if (setvalueP) {
self.showRelationsP =
BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.showRelationsP ? Stella.TRUE_WRAPPER : Stella.FALSE_WRAPPER);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_SHOW_ATTRIBUTESp) {
if (setvalueP) {
self.showAttributesP =
BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.showAttributesP ? Stella.TRUE_WRAPPER : Stella.FALSE_WRAPPER);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_SHOW_RULESp) {
if (setvalueP) {
self.showRulesP = BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.showRulesP ? Stella.TRUE_WRAPPER : Stella.FALSE_WRAPPER);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_ADD_TOPp) {
if (setvalueP) {
self.addTopP = BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.addTopP ? Stella.TRUE_WRAPPER : Stella.FALSE_WRAPPER);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_NODE_COLOR) {
if (setvalueP) {
self.nodeColor = ((StringWrapper) (value)).wrapperValue;
} else {
value = StringWrapper.wrapString(self.nodeColor);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_RELATION_COLOR) {
if (setvalueP) {
self.relationColor = ((StringWrapper) (value)).wrapperValue;
} else {
value = StringWrapper.wrapString(self.relationColor);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_RELATION_STYLE) {
if (setvalueP) {
self.relationStyle = ((StringWrapper) (value)).wrapperValue;
} else {
value = StringWrapper.wrapString(self.relationStyle);
}
} else if (slotname == OntosaurusUtil.SYM_ONTOSAURUS_FONT_SIZE) {
if (setvalueP) {
self.fontSize = ((IntegerWrapper) (value)).wrapperValue;
} else {
value = IntegerWrapper.wrapInteger(self.fontSize);
}
} else {
{
OutputStringStream stream000 = OutputStringStream.newOutputStringStream();
stream000.nativeStream.print("`" + slotname + "' is not a valid case option");
throw ((StellaException)
(StellaException.newStellaException(stream000.theStringReader()).fillInStackTrace()));
}
}
return (value);
}
public static Stella_Object accessPartialMatchFrameSlotValue(
PartialMatchFrame self, Symbol slotname, Stella_Object value, boolean setvalueP) {
if (slotname == Logic.SYM_LOGIC_KIND) {
if (setvalueP) {
self.kind = ((Keyword) (value));
} else {
value = self.kind;
}
} else if (slotname == Logic.SYM_LOGIC_CONTROL_FRAME) {
if (setvalueP) {
self.controlFrame = ((ControlFrame) (value));
} else {
value = self.controlFrame;
}
} else if (slotname == Logic.SYM_LOGIC_PARENT) {
if (setvalueP) {
self.parent = ((PartialMatchFrame) (value));
} else {
value = self.parent;
}
} else if (slotname == Logic.SYM_LOGIC_CHILD) {
if (setvalueP) {
self.child = ((PartialMatchFrame) (value));
} else {
value = self.child;
}
} else if (slotname == Logic.SYM_LOGIC_POSITIVE_SCORE) {
if (setvalueP) {
self.positiveScore = ((FloatWrapper) (value)).wrapperValue;
} else {
value = FloatWrapper.wrapFloat(self.positiveScore);
}
} else if (slotname == Logic.SYM_LOGIC_NEGATIVE_SCORE) {
if (setvalueP) {
self.negativeScore = ((FloatWrapper) (value)).wrapperValue;
} else {
value = FloatWrapper.wrapFloat(self.negativeScore);
}
} else if (slotname == Logic.SYM_LOGIC_DYNAMIC_CUTOFF) {
if (setvalueP) {
self.dynamicCutoff = ((FloatWrapper) (value)).wrapperValue;
} else {
value = FloatWrapper.wrapFloat(self.dynamicCutoff);
}
} else if (slotname == Logic.SYM_LOGIC_ARGUMENT_SCORES) {
if (setvalueP) {
self.argumentScores = ((Cons) (value));
} else {
value = self.argumentScores;
}
} else if (slotname == Logic.SYM_LOGIC_ARGUMENT_WEIGHTS) {
if (setvalueP) {
self.argumentWeights = ((Cons) (value));
} else {
value = self.argumentWeights;
}
} else if (slotname == Logic.SYM_LOGIC_UNBOUND_VARS) {
if (setvalueP) {
self.unboundVars = ((Cons) (value));
} else {
value = self.unboundVars;
}
} else if (slotname == Logic.SYM_LOGIC_SUCCESSp) {
if (setvalueP) {
self.successP = BooleanWrapper.coerceWrappedBooleanToBoolean(((BooleanWrapper) (value)));
} else {
value = (self.successP ? 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);
}