immutable class SIGN_POSITIONS < $ENUMS{SIGN_POSITIONS}
****

________This_is_an_enumeration_class_which_describes_the_different
___positions_in_which_a_plus/minus_sign_may_be_placed_when_formatting
___a_monetary_quantity.

________There_should_be_associated_message_files_with_entries_containing
___words_indicating_the_following_semantics_given_in_English_below

________Parentheses_-_the_fact_that_a_quantity_is_negative_is_indicated_by
______________________enclosing_it_and_the_monetary_symbol_in_parentheses.
________Preceding_-_the_sign_appears_in_front_of_the_value
________Following_-_the_sign_appears_after_the_value
________After_-_the_sign_appears_after_the_currency_symbol
________Before_-_the_sign_appears_in_front_of_the_currency_symbol.


Ancestors
$ENUMS{_} $NIL $IS_NIL $IS_EQ
$HASH $BINARY $TEXT $STR
$ANCHORED_FMT $FMT



Public


Readable Attributes
attr enum : CARD ; .. Included as enum
**** Used also for transforming an enum to a cardinal value.

Constants
const cardinality : CARD := val_count ; .. Included as cardinality
**** the default value!
const offset : CARD := 1 ; .. Included as offset
****
________This_is_the_offset_from_the_index_of_first_element_of_the_Names_array
___(ie_zero)_to_the_first_enumeration_value_numeric_code.

Features
After_SY : SAME
Before_SY : SAME
Following : SAME
Parentheses : SAME
Preceding : SAME
binstr : BINSTR .. Included as binstr
build( .. Included as build
build( loc_cursor : STR_CURSOR ) : SAME .. Included as build
card : CARD .. Included as card
create( .. Included as create
create( .. Included as create
create( str : STR ) : SAME .. Included as create
****
________This_is_the_creation_routine_from_a_string_which_is_any_of_the
___abbreviations_listed_in_the_Name_table.____If_the_name_table_has_not_been
___read_in_this_is_done_first.
fmt( format : ANCHORED_DESCR ) : STR .. Included as fmt
fmt( format : ANCHORED_DESCR, lib : LIBCHARS ) : STR .. Included as fmt
hash : CARD .. Included as hash
is_enum( str : STR ) : CONVERSION_RESULTS .. Included as is_enum
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
is_nil : BOOL .. Included as is_nil
nil : SAME .. Included as nil
read( .. Included as read
str( lib : LIBCHARS ) : STR .. Included as str
****
________This_routine_provides_a_string_representation_of_self_in_the_given
___character_repertoire_and_encoding_-_including_a_nil_value.
str : STR .. Included as str
****
________This_routine_provides_a_string_representation_of_self_in_the_default
___character_repertoire_and_encoding_-_including_a_nil_value.
write( .. Included as write

Iters
elt! : SAME .. Included as elt!


Private

const Max_Val : CARD := val_count ; .. Included as Max_Val
shared Names : ARRAY{STR} ; .. Included as Names
**** for external representation!
shared Names : ARRAY{STR} ; .. Included as Names
**** for external representation!
check_names( loc_lib : LIBCHARS ) .. Included as check_names
attr enum : CARD ; .. Included as enum
**** Used also for transforming an enum to a cardinal value.
equals(first_lcase,second : STR) : BOOL .. Included as equals
**** This routine tests for string equality up to the length of first! The test is case independent.
shared lib : LIBCHARS ; .. Included as lib
shared lib : LIBCHARS ; .. Included as lib
lookup(str : STR) : CARD .. Included as lookup
scan!(str : STR) : CARD .. Included as scan!
const val_count : CARD := 5 ;

The Sather Home Page