scripts: add onetest_gesamt for arm64
[testub10.git] / parser / zzbsm17_00.0
1 struct f1 end; /* Felddefinition */
2
3 method foo ( p1 p2 ) /* Methodendefinition, Parameterdefinition */
4
5     p1 := 1; /* Zuweisung */
6
7     var v1 := 1; /* Variablendefinition */
8
9     1; /* Ausdrucksanweisung */
10     not 1; /* Dito */
11
12     if p1 < p2 then /* If-Anweisung ohne Else-Zweig */
13         v1 := 2;
14     end;
15
16     if p1 < p2 then /* If-Anweisung mit Else-Zweig */
17         var v2 := 2;
18     else
19         v1 := p1;
20     end;
21
22     while (((((1 or 1 or 1 or 1 or 1 or 1))))) do (((((1))))).f1; end; /* While-Anweisung, lesender Feldzugriff */
23
24     var v2 := 5; /* Hier wieder erlaubt, war nur in if reserviert */
25     v2 := v1; /* lesender/schreibender Variablen/Feldzugriff */
26     f1 := f1; /* Dito */
27
28     v2(-500, 500, ); /* What a call */
29     v2(-500, 500, ).f1(-500,500); /* What another call */
30
31     return p1; /* Parameter sind in der ganzen Methode sichtbar */
32 end;
33