projects
/
testub10.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
scripts: hoffentlich arbeitet bench.sh nun korrekt
[testub10.git]
/
codeb
/
skinner33_00.0
1
struct bar end;
2
3
method foo(bar)
4
while not(0 = bar) do
5
bar := (bar - 1);
6
this.bar := (this.bar * 2);
7
end;
8
return this.bar;
9
end;
10
11
method bar(x)
12
while 1 do
13
x := x - (-1);
14
if not(x = 10) then
15
x := x * 1;
16
else
17
return x;
18
end;
19
end;
20
end;
21
22
method blu(a)
23
while 0 do
24
return 3;
25
end;
26
return 4;
27
end;