Mark.PAS

Язык:
Русский
English


 { Пример программы для процедур Mark и Release }

var
  P          : Pointer;
  P1, P2, P3 : ^Integer;

begin
 New(P1); { Распределяем память под Integer }
  Mark(P); { Сохраняем состояние кучи }
 New(P2); { Распределяем память под ещё два числа типа Integer }
 New(P3);
  Release(P); { Память, резервированная для P2^ и P3^,
                освобождается, а память для P1^ всё ещё
                может быть использована }

end.
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //