projects
/
testub10.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
scripts: add onetest_gesamt for arm64
[testub10.git]
/
gesamt
/
codeb_skinner33_04.0
1
2
struct a b end;
3
4
method foo(n)
5
if 0 then
6
return 0;
7
end;
8
a := b;
9
if not(not(a = b)) then
10
return n - (a*b);
11
end;
12
return 0x9999;
13
end;
14
15
method bar(n)
16
var x := not(5 < (n*2));
17
if x then
18
return n - (2*n);
19
else
20
x := 3 * (4 * n);
21
return x;
22
end;
23
end;
24
25
method bla(n)
26
if not(not(2 * ( 5 * (n or n)))) then
27
return 1;
28
else
29
return 0;
30
end;
31
end;
32
33
method blubb(n)
34
if not((n*n) < 20) then
35
return 20;
36
else
37
if not(not(n)) then
38
return 10;
39
else
40
return 5;
41
end;
42
end;
43
end;
44
45
struct q r s t end;
46
47
method miau(n m)
48
r := 5 * ((n-m) * 3);
49
s := 7 * (q * 5);
50
t := 40000000 * (4 * q);
51
return 0;
52
end;