All pastes #190642 Raw Edit

subprocedure

public text v1 · immutable
·published 2006-10-04 05:55 UTC
rendered paste body
procedure initStack is
...
begin

   if selection = 1 then
      declare
         procedure processCharStack (max: in integer) is
         begin
            ...;
         end processCharStack;
      begin
         processCharStack(stackSize);
      end;
   end if;
end initStack;