RosettaCodeData/Task/Memory-allocation/Ada/memory-allocation-1.ada

6 lines
82 B
Ada
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
declare
X : Integer; -- Allocated on the stack
begin
...
end; -- X is freed