Значение по умолчанию для var-параметра

[and]

Попытался обновиться на транковый FPC 2.7.1 (r26374). И столкнулся с ошибкой компиляции

Код: Выделить всё

Error: Default values can only be specified for value, const and constref parameters

С одной стороны, это соответствует документации:

Note that default values are not supported for variable parameters.

С другой стороны, раньше проходило, в т.ч. и на более старой (полуторагодичной давности) ревизии 2.7.1. Свидетельство чему есть и в самОм Lazarus'е:

Код: Выделить всё

    function GetCharMix(const LinePos, Indent: Integer;
                        var IndentCharsFromLinePos: Integer = 0): String;


(Модуль synbeautifier.pas, класс TSynBeautifier).
Сейчас этот модуль не компилируется, если не убрать "=0".
 
Собственно, вопрос: это баг внесли или исправили? Соответственно, репортить на bugs.freepascal.org или править код, где это использовалось?
В User_Changes_Trunk и на багтрекере ничего про такое изменение поведения не нашёл.

[sign]

Править.

Сами себе задайте вопрос, зачем нужно var, в каких случаях.

[and]

Сами себе задайте вопрос, зачем нужно var, в каких случаях.

Оно как бы понятно и без вопроса... но:
1) Это значение может быть и не нужно вызывающей стороне. Отсутствие default'а вынуждает всё равно описывать переменную под этот параметр. (Пример - вызов Val, когда нас не интересует позиция ошибочного символа).
2) default было удобно использовать в качестве инициализирующего значения. Например, в описании типа для обработчика события. Сейчас инициализацию придётся вставлять в метод, вызывающий этот обработчик.

Править.

Интересно, а почему исправили synbeautifier.pas или хотя бы не отрепортили? Неужели никто не собирал Lazarus после этих изменений?! 8-o
 
Кстати, кто-нибудь в курсе, с какой (хотя бы примерно) ревизии FPC началось такое поведение?

[sign]

Сами себе задайте вопрос, зачем нужно var, в каких случаях.

Оно как бы понятно и без вопроса... но:
1) Это значение может быть и не нужно вызывающей стороне. Отсутствие default'а вынуждает всё равно описывать переменную под этот параметр. (Пример - вызов Val, когда нас не интересует позиция ошибочного символа).

Волшебное средство - overload.
А если это стандартная функция?

И её перекрываем

FPC 2.7.1

Код: Выделить всё

Function ParamStr(Param : Integer) : Ansistring; inline;
Function ParamStr(var Q: String) : Ansistring;

implementation

Function ParamStr(Param : Integer) : Ansistring;
begin
  Result := ObjPas.ParamStr(Param);
end;

Function ParamStr(var Q: String) : Ansistring;
begin
  // Фигачим нужное
end;



2) default было удобно использовать в качестве инициализирующего значения. Например, в описании типа для обработчика события. Сейчас инициализацию придётся вставлять в метод, вызывающий этот обработчик.[/quote]

[and]

Волшебное средство - overload

Бритва Оккама возражает ;-)
К тому же по второму пункту перегрузка никак не поможет. Или предложите, как перегрузить процедурный тип? (Что-нибудь a-la TCloseQueryEvent).