Condition

ConditionPasses

Attributes

FailureText Target

Fields

instance Condition tag;
      operation: nilOperation;
         target: nilObject;
    failureText: nilObject;
   reverseSense: false;
end instance;

 
Define Class Condition;
    inherits from Object;
    
    field operation:        OperationNumber;                
        // boolean-returning operation number to call on target
    field target:           Object, weak, getter, setter;   
        // object on which to call operation
    field failureText:      Text, getter, setter;           
        // text to use if condition fails
    field reverseSense:     Boolean;                        
        // if set, reverse sense of boolean operation success
    
    operation ConditionPasses(): Boolean;
    attribute Target: Object, safe;
    attribute FailureText: Text;
end class;