Lisaac prototype interface

Section Header
+ name := VIEW_SLOT;
- comment :="Reflexivity view slot.";
Section Public
General information.
- name:STRING_CONSTANT <- `FUCK`;
- is_shared:BOOLEAN <- `FUCK`;
TRUE if '-' style, FALSE else.
- is_data:BOOLEAN <- `FUCK`;
- is_method:BOOLEAN <- ! is_data;
- section:STRING_CONSTANT <- `FUCK`;
Result analysis.
- result:VIEW_OBJECT <-
Return the first result.
[
-? {upper_result = 0};
]
(
`FUCK`
);
- lower_result:INTEGER := 0;
- upper_result:INTEGER <-
- item_result idx:INTEGER :VIEW_OBJECT <-
[
-? {in_range lower_result to upper_result};
]
(
`FUCK`
);
Arguments access.
- lower_argument:INTEGER := 0;
- upper_argument:INTEGER <- `FUCK`;
- item_argument idx:INTEGER :VIEW_OBJECT <-
[
-? {in_range lower_argument to upper_argument};
]
(
`FUCK`
);
Call.
- call_with args:BLOCK :BLOCK <- `FUCK`;
- call:BLOCK <-
(
call_with NULL
);