mirror of
https://git.code.sf.net/p/quake/quakeforge
synced 2024-11-10 23:32:09 +00:00
33 lines
439 B
R
33 lines
439 B
R
|
#include "Boolean.h"
|
||
|
|
|
||
|
|
Boolean trueConstant;
|
||
|
|
Boolean falseConstant;
|
||
|
|
|
||
|
|
@implementation Boolean
|
||
|
|
|
||
|
|
+ (void) initialize
|
||
|
|
{
|
||
|
|
trueConstant = [Boolean new];
|
||
|
|
[trueConstant makeRootCell];
|
||
|
|
falseConstant = [Boolean new];
|
||
|
|
[falseConstant makeRootCell];
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
+ (id) trueConstant
|
||
|
|
{
|
||
|
|
return trueConstant;
|
||
|
|
}
|
||
|
|
|
||
|
|
+ (id) falseConstant
|
||
|
|
{
|
||
|
|
return falseConstant;
|
||
|
|
}
|
||
|
|
|
||
|
|
- (string) printForm
|
||
|
|
{
|
||
|
|
return self == trueConstant ? "#t" : "#f";
|
||
|
|
}
|
||
|
|
|
||
|
|
@end
|