Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2007.08.19;
Скачать: [xml.tar.bz2];

Вниз

Компилятор Опять грешит   Найти похожие ветки 

 
oxffff ©   (2007-07-20 11:15) [0]

Простой код

procedure abc(out a:string);
begin
end;

procedure TForm1.Button1Click(Sender: TObject);
var a:string;
begin
abc(a);
end;

Работа

1.Перед вызовом abc компилятор добавляет полноценную очистку out параметра.
2.Далее в abc он еще добавляет обнуление параметра.

Таким образом эти инструкции лишние.
Поскольку входной параметр финализирон вызывающей процедурой и уже обнулен на входе .

И это для всех финализируемых типов.

А если мы сделает вот так,

AAA=array[0..100] of string;

procedure abc(out a:AAA);
begin
end;

procedure TForm1.Button1Click(Sender: TObject);
var a:AAA;
begin
abc(a);
end;

Это уже более существенные потери


 
oxffff ©   (2007-07-20 11:17) [1]


>
> Таким образом эти инструкции лишние.


Обнуление в вызванной процедуре.


 
oxffff ©   (2007-07-20 12:22) [2]

Написал им
http://qc.codegear.com/wc/qcmain.aspx?d=49334


 
oxffff ©   (2007-07-20 21:52) [3]

Поставили статус Open. Так что будем ждать оптимизации


 
Суслик ©   (2007-07-20 23:28) [4]

небось пьер ле риш открыл...
там это уже было год назад где-то.
по поводу out параметров штук 50 репортов.


 
Суслик ©   (2007-07-20 23:30) [5]

2автар
кинь свои контакты на timokhov@gmail.com



Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2007.08.19;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.039 c
1-1181134690
Arm79
2007-06-06 16:58
2007.08.19
маппинг файлов


15-1184872920
@!!ex
2007-07-19 23:22
2007.08.19
Проблема с сетью.


15-1185094245
ElectriC
2007-07-22 12:50
2007.08.19
ID Tech 5


2-1184781110
Sdubaruhnul
2007-07-18 21:51
2007.08.19
Поиск файлов возвращает артефакты


2-1185023525
NewZ
2007-07-21 17:12
2007.08.19
Как определить что над одним объектом находится другой?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский