aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/block_local_variable.elna
blob: 8d52b1c13a4d653cf3e3b7b6d385e0d55da4e8b6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
program()
var
  total: Int := 0

begin
  if total = 0 then
  var
    inner: Int := 7
  begin
    total := total + inner
  end;
  assert(total = 7)
end.