Lisaac prototype interface

Section Header
+ name := UINTEGER_BIG;
Aucun Auto-Cast pour l'instant...(peut etre
INTEGER_BIG ...)
- comment := "Integer without bits limit! (Just for fun!)";
- default := 0;
Section Inherit
- parent_unsigned:UNSIGNED :=
Section UINTEGER_BIG
+ storage:FAST_ARRAY[UINTEGER];
- last_modulo:UINTEGER;
- make init:UINTEGER :SELF <-
- count:INTEGER <-
- lower:INTEGER <-
- upper:INTEGER <-
- item idx:INTEGER :UINTEGER <-
- copy other:UINTEGER_BIG <-
- force elt:UINTEGER to idx:INTEGER <-
- put elt:UINTEGER to idx:INTEGER <-
- add_last elt:UINTEGER <-
- resize new_size:INTEGER <-
Section INTEGER
- create init:UINTEGER :UINTEGER_BIG <-
Section Public
- object_size:INTEGER <-
Range.
- maximum:UINTEGER_64 <-
Conversion format with test.
- to_uinteger_64:UINTEGER_64 <-
- to_uinteger:UINTEGER <-
- to_uinteger_16:UINTEGER_16 <-
- to_uinteger_8:UINTEGER_8 <-
- to_integer_64:INTEGER_64 <-
- to_integer:INTEGER <-
- to_integer_16:INTEGER_16 <-
- to_integer_8:INTEGER_8 <-
- to_ureal_26_6:UREAL_26_6 <- self;
- to_ulargeint:UINTEGER_BIG <-
- clean <-
binary operator :
- '-' Left 80 other:SELF :SELF <-
- '-#' Left 80 other:INTEGER :SELF <-
- '+' Left 80 other:SELF :SELF <-
- '+#' Left 80 other:INTEGER :SELF <-
- '*' Left 100 other:SELF :SELF <-
- '*#' Left 100 other:INTEGER :SELF <-
- '/' Left 100 other:SELF :SELF <-
- '/#' Left 100 other:INTEGER :SELF <-
- '&' Left 100 other:SELF :SELF <-
Test binary operator :
- '>' Right 60 other:SELF :BOOLEAN <-
- '>#' Right 60 other:INTEGER :BOOLEAN <-
- '==' Right 60 other:SELF :BOOLEAN <-
prefix : Unary operator
- '~' :SELF <-
- '-' :SELF <-
- factorial:SELF <-
conversion
- append_in buffer:STRING <-
Append in the `buffer' the equivalent of `to_string'. No new STRING
creation during the process.