projects
/
testub10.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
tests für codea: zuweisungenen, variablendefinitionen, schreibender / lesender feldzu...
[testub10.git]
/
ag
/
nax_06.0
1
struct person
2
first_name
3
last_name
4
end;
5
6
method doit(person)
7
person.print_names(person.first_name, person.last_name,);
8
end;
9
10
method print_names(arg1 arg2)
11
if arg1 = arg2 then
12
this.print(arg1);
13
return 1;
14
end;
15
this.print(arg1);
16
this.print(arg2);
17
var a := 0;
18
a := (1 - 0x3).to_f();
19
20
if 1 then
21
print(a);
22
else
23
print(0); /* never reached */
24
end;
25
end;