aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/const_copy.elna
blob: 59821494dd3229a7ff2a7f5ce66007e2e536d34a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
proc f()
var
  x: const Int := 5
  y: Int
begin
  y := x;
  assert(y = 5)
return

begin
  f()
end.