repositories
/
cc1516.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
nieuwe presentatie jow
[cc1516.git]
/
examples
/
StmtEx.spl
1
var x = True;
2
var y = 3;
3
var z = 3 + y;
4
Int a = facR(4);
5
//Int b = test(3);
6
var f = beep();
7
var n = True;
8
var l = 1:2:[];
9
10
facR(n) :: Int -> Int {
11
test(3);
12
if (True) {
13
return 3;
14
} else {
15
return 4;
16
}
17
return 5;
18
}
19
20
test(e) :: Int -> Bool {
21
var i = 0;
22
i = 1;
23
l.tl = 4:[];
24
l.tl.hd = 3;
25
//l= 1:3:[]
26
facR(z);
27
while (e < 3) {
28
return True;
29
}
30
}
31
32
beep() {
33
boop();
34
}
35
36
boop() {
37
beep();
38
}