blob: 3f2c8c0daed56d3315c4af49170101e147231652 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
procedure main()
if not(&features == "large integers") then
stop("large integers not supported")
i := 100000 + 10000
write(i)
i +:= 2 ^ 30
write(i)
i +:= i
write(i)
i := 100000 * 10000
write(i)
i +:= 2 ^ 30
write(i)
i *:= i
write(i)
i := -100000 - 10000
write(i)
i +:= -(2 ^ 30)
write(i)
i -:= 2 ^ 30
write(i)
end
|