aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/const_initialization.elna
blob: 56a66977dec44259fc28b75953fc7942b07e50d0 (plain)
1
2
3
4
5
6
7
8
9
10
11
proc f()
var
  x: const Int := 5
begin
  assert(x = 5)
return

program()
begin
  f()
end.