immutable class GROUP < $REFERENCE, $IS_EQ, $STR |
---|
$STR | $IS_EQ | $REFERENCE |
const Num_Bits : CARD := asize ; .. Included as Num_Bits |
---|
aget( .. Included as aget |
---|
aset( .. Included as aset |
---|
binstr : BINSTR .. Included as binstr |
---|
build( |
---|
card : CARD .. Included as card |
---|
create(str : BINSTR) : SAME .. Included as create |
---|
create( .. Included as create |
---|
create( .. Included as create |
---|
group : SAME .. Included as group |
---|
is_eq( .. Included as is_eq |
---|
is_eq(other : $OB) : BOOL .. Included as is_eq |
---|
**** | This is the generic equality predicate. c.f. the class $IS_EQ |
read(index : BIN_CURSOR) : SAME .. Included as read |
---|
real_group : SAME .. Included as real_group |
---|
str( .. Included as str |
---|
str : STR .. Included as str |
---|
write(fyle : BIN_FILE) .. Included as write |
---|
aelt!( .. Included as aelt! |
---|
aelt!( .. Included as aelt! |
---|
aelt!( .. Included as aelt! |
---|
aelt! : T .. Included as aelt! |
---|
aind! : CARD .. Included as aind! |
---|
const asize : CARD := NUM_BITS::Num_Bits ; .. Included as asize |
---|
do_build( .. Included as do_build |
---|
is_legal_aelts_arg( .. Included as is_legal_aelts_arg |
---|