RosettaCodeData/Task/Memory-allocation/Ada/memory-allocation-1.ada
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

5 lines
82 B
Ada

declare
X : Integer; -- Allocated on the stack
begin
...
end; -- X is freed