%prefix smop_bool_message
%idconst False()
%idconst True()
%method FETCH
___VALUE_FETCH___;
%method STORE
___VALUE_STORE___;
%method Str
if (invocant == SMOP__NATIVE__bool_false) {
return SMOP__ID__FalseParenThesis;
} else {
return SMOP__ID__TrueParenThesis;
}
%method true
ret = SMOP_REFERENCE(interpreter,invocant);
%init {
SMOP__NATIVE__bool_true->RI->MESSAGE = ((SMOP__ResponderInterface*)RI)->MESSAGE;
%}