24 lines
268 B
Text
24 lines
268 B
Text
Section Header
|
|
|
|
+ name := SAMPLE;
|
|
|
|
Section Inherit
|
|
|
|
- parent : OBJECT := OBJECT;
|
|
|
|
Section Private
|
|
|
|
+ variable : INTEGER <- 0;
|
|
|
|
Section Public
|
|
|
|
- some_method <- (
|
|
variable := 1;
|
|
);
|
|
|
|
- main <- (
|
|
+ sample : SAMPLE;
|
|
|
|
sample := SAMPLE.clone;
|
|
sample.some_method;
|
|
);
|