передача массива в процедуру через указатель Опции

[compiler]

Добрый день!
В целях оптимизации моей программы я решил передавать процедурам не матрицу, а указатель на нее... Но у меня это никак не получается...

type
        Arr=array[0..1, 0..1] of integer;
        PT = ^Arr;
procedure pr(var ar:PT);
begin
       ar^[1, 1]:=0;
end;
var     a: Arr;
begin
        pr(a);        {<---? Как вызвать pr(a^)  или pr(@a) или ...?}
end.

как ни странно, поиском ничего не нашел... может плохо искал?

заранее благодарен.

[volvo]

а здесь?

Не путай константную ссылку и просто ссылку... Здесь компилятор запрещает менять значения ar напрямую (обойти этот запрет можно, но это уже другая тема), и при попытке изменения выдает ошибку, т.е., значения ar доступны как бы "read-only"...

Сообщение отредактировано: volvo - 11.01.2008 22:11