IPB
ЛогинПароль:

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

 
 Ответить  Открыть новую тему 
> передача массива в процедуру через указатель
сообщение
Сообщение #1


Человек
*****

Группа: Пользователи
Сообщений: 1 050
Пол: Мужской
Реальное имя: Станислав

Репутация: -  3  +


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


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

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



--------------------
Спасибо!
Удачи!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Ты не сможешь сконструировать указатель "на лету", потому что в процедуру у тебя передается Var-параметр, то есть - это должна быть переменная...

var
a: Arr;
pa: PT;
begin
pa := @a;
pr(pa); { <--- так должно сработать }
end.



Добавлено через 3 мин.
P.S. В чем заключается "оптимизированность" такого варианта по сравнению, скажем, с передачей:
procedure pr(var ar: Arr);

можно узнать?
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Человек
*****

Группа: Пользователи
Сообщений: 1 050
Пол: Мужской
Реальное имя: Станислав

Репутация: -  3  +


Цитата(volvo @ 11.01.2008 19:55) *
Ты не сможешь сконструировать указатель "на лету", потому что в процедуру у тебя передается Var-параметр, то есть - это должна быть переменная...
спасибо... а как можна передавать еще? const?
Цитата(volvo @ 11.01.2008 19:55) *
.. В чем заключается "оптимизированность" такого варианта ...
насколько я понимаю, при передаче такой передаче происходит копирование всего массива, а при передаче указателя мы продолжаем работать с тем же массивом и с теме же ячейками памяти, или не так?


--------------------
Спасибо!
Удачи!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Профи
****

Группа: Пользователи
Сообщений: 865
Пол: Мужской
Реальное имя: Вячеслав

Репутация: -  20  +


procedure pr(var ar: Arr);
А так не тот же массив передастся? Ведь исользуется как VAR-параметр, т.е. сам массив
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Человек
*****

Группа: Пользователи
Сообщений: 1 050
Пол: Мужской
Реальное имя: Станислав

Репутация: -  3  +


Цитата(Client @ 11.01.2008 20:46) *
procedure pr(var ar: Arr);
А так не тот же массив передастся? Ведь исользуется как VAR-параметр, т.е. сам массив
да имеено так он передается, а так
 procedure pr(var ar:PT)
недолжен(?). PT это ж указатель... и передаваться будет указатель, который может быть намного меньше массива...



--------------------
Спасибо!
Удачи!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






Цитата
А так не тот же массив передастся? Ведь исользуется как VAR-параметр, т.е. сам массив
no1.gif Сам массив (по значению) передается так:
procedure pr(ar: Arr);
При передаче через
procedure pr(var ar: Arr);
{ или }
procedure pr(const ar: Arr);
передается ссылка на массив, то есть, сам массив в стек не копируется...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Человек
*****

Группа: Пользователи
Сообщений: 1 050
Пол: Мужской
Реальное имя: Станислав

Репутация: -  3  +


volvo, спасибо..
зы то есть оптимизация нулевая?


--------------------
Спасибо!
Удачи!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Профи
****

Группа: Пользователи
Сообщений: 865
Пол: Мужской
Реальное имя: Вячеслав

Репутация: -  20  +


Знаю, что не в тему, но хочется полностью разобраться
Цитата
Сам массив (по значению) передается так:

Чуть не так сказал...Да передается ссылка на массив
procedure pr(var ar: Arr);
если мы изменим в процедуре, то он измениться и основной программе (массив)
procedure pr(const ar: Arr);
а здесь? ведь передается тоже ссылка на массив, но он не изменится в основной при изменении в процедуре?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Гость






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

Сообщение отредактировано: volvo -
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 23.11.2020 23:46
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name