28 lines
448 B
Plaintext
28 lines
448 B
Plaintext
PROTO INT add()
|
|
|
|
FUNC INT add() {
|
|
INT z
|
|
z := 1
|
|
RETURN z
|
|
}
|
|
|
|
FUNC INT main(x,y) {
|
|
INT a,b,c,minh
|
|
x := 5
|
|
minh := x * y
|
|
b:=3
|
|
c:=add()
|
|
PRINT "coucou, tu peux réparer le visitPrint dans LLVM stp","il manque virgule au milieu", c*5+b
|
|
WHILE b - 1
|
|
DO{
|
|
b := b - 1
|
|
c := c + 1
|
|
}
|
|
DONE
|
|
IF c -1
|
|
THEN READ a ELSE READ b
|
|
FI
|
|
b:=c+1
|
|
RETURN 4 + 6 * 5 + 2 }
|
|
|
|
PROTO INT type(x,y) |