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

begin
  f()
end.