[pirsddd]

Почему в исходниках Delphi при передаче строки string в процедуру часто используется модификатор const?
Если строка короткая, то понятно.
Длинная строка - указатель на саму строку. Если строка не изменяется, то передавать по ссылке "указатель на саму строку", который занимает всего четыре байта, не вижу смысла.

[Janom]

Сообщение от pirsddd

Почему в исходниках Delphi при передаче строки string в процедуру часто используется модификатор const?
Если строка короткая, то понятно.
Длинная строка - указатель на саму строку. Если строка не изменяется, то передавать по ссылке "указатель на саму строку", который занимает всего четыре байта, не вижу смысла.

Я ничего не понял... давайка дубль два...

[Black Raider]

Почему это только string?
любой параметр может быть передан как const, при этом изменить ее внутри процедуры или функции нельзя. и для компилятора так лучше (по крайней мере в хелпе так описано)

[pirsddd]

В чём разница? Какой код быстрее?

Код:

function SSS1(S: string): Char;
begin
  Result := S[1];
end;

function SSS2(const S: string): Char;
begin
  Result := S[1];
end;

[Janom]

Разница в том что без константы ты параметр можешь менять, а при константе не можешь (внутри процедуры)... И это кстати уже написано выше)

[pirsddd]

Разница в скорости кода:

Код:

var
  s: string;

procedure TForm1.Button1Click(Sender: TObject);
var
  t, i: Integer;
begin
  s := 'fgh';

  t := GetTickCount();
  for i := 0 to 10000000-1 do
    SSS1(s);
  ShowMessage(IntToStr(GetTickCount() - t)); // 1406 миллисекунд

  t := GetTickCount();
  for i := 0 to 10000000-1 do
    SSS2(s);
  ShowMessage(IntToStr(GetTickCount() - t)); // 47 миллисекунд
end;

[NumLock]

pirsddd, глянь во View CPU функцию с const и без и увидишь разницу

[pirsddd]

Как видите, разница в скорости большая - в 30 раз.
Почему?

[Black Raider]

Так подозреваю что в первом случае создастся копия переменной во второй компилятор посчитает что проще передать ссылку на переменную.

ПС, Сугубо мое личное понимание.

[pirsddd]

Я в ассемблере не силён. На сколько я понял из View CPU, скорость кода без const меньше из-за вызова функций LStrAddRef и LStrClr для увеличения и уменьшения кратности ссылок на строку. Но почему такая большая разница - в 30 раз?

[pirsddd]

NumLock, Спасибо за совет!