"Шаровая" оперативка, Или программное увеличение оперативной памяти, Fpc Опции

[Bokul]

Заинтересовал? Вот они - чудо компиляторы...

Запускаем код и радуемся результатам:

type
    ar=array[1..65456] of byte;
    ar2=array[1..327600] of byte;
var p:^ar;
    p2:^ar2;
begin
   writeln('Free memory before allocation: ',GetHeapStatus.TotalFree);
   new(p);
   writeln('Free memory after allocation: ',GetHeapStatus.TotalFree);
   dispose(p);
   writeln('Free memory after dispose: ',GetHeapStatus.TotalFree);
   new(p2);
   writeln('Again allocation: ',GetHeapStatus.TotalFree);
   dispose(p2);
   writeln('Again dispose: ',GetHeapStatus.TotalFree);
   readln;
end.

Системный блок раскручивать необязательно - все изменения проходят на программном уровне.
P.S. Не знаю как энергия, но память из ниоткуда можно получить.. Fpc is the best
P.P.S.
Причина, наверно, кроется вот в чем:

Т.е. тип cardinal, возвращаемый методом TotalFree, не имеет постоянного размера, и меняется в зависимости от присваиваемого значение. Имхо.
Так вот, вопрос: как в Fpc измерять разницу свободной памяти до и после размещения в ней данных, без всяких таких казусов?

Сообщение отредактировано: Bokul - 27.12.2006 6:39

[Bokul]

2. It is not clear what "free memory" means: does it include swap memory, does it include disk cache memory (the disk cache can grow and shrink on modern OS’es), does it include memory allocated to other applications but which can be swapped out, etc.

Ага, при тестировании той проги при количестве полигонов больше миллиона комп начинал жутко тормозить, а индикатор обращения к винту не утихал - размер кеша доходил до 2 гиг.

Итак, что будем считать всей памятью?

Задам вопрос по-другому: как проверит при запуске программы доступно ли для ее работы, например, гигабайт памяти?