34 lines
533 B
Plaintext
34 lines
533 B
Plaintext
PROTO INT add(a,b)
|
|
|
|
FUNC INT add(a,b) {
|
|
INT z
|
|
z := a+b
|
|
RETURN z
|
|
}
|
|
|
|
FUNC VOID affiche(x){
|
|
PRINT x
|
|
}
|
|
|
|
FUNC INT main(x,y) {
|
|
INT a,b,c,minh
|
|
x := 5
|
|
minh := x * y
|
|
b:=3
|
|
affiche(b)
|
|
c:=add(x,b)
|
|
PRINT "coucou, tu peux réparer le visitPrint dans LLVM stp","il manque virgule au milieu", c*5+b, x
|
|
PRINT "test",a
|
|
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) |