Одному мне кажется, что варнинг Delphi о том, что результат

Question

Одному мне кажется, что варнинг Delphi о том, что результат

функции может быть неопределён - в данном случае ошибочен? Что скажет на это Лазарь?
function Test: Boolean;
var
bFound: Boolean;
begin
bFound := (Now > 0);
if bFound then
Result := True;
if not bFound then
Result := False;
end;
Пример синтетический, вырезан из контекста программы, где словил этот варнинг

#lazarus #programming #russian

0

21.02.2024

12 ответов

33 просмотра

Александр (Rouse_) Багель

она не умеет в такие конструкции, поэтому в данном случае должно быть if then ELSE

0

3 месяца назад

Handatros

Александр (Rouse_) Багель
она не умеет в такие конструкции, поэтому в данном...

Оно так ещё и быстрее работает

0

3 месяца назад

Alex Egorov Автор вопроса

Александр (Rouse_) Багель
она не умеет в такие конструкции, поэтому в данном...

В логике рабочей функции это сложно сделать, приходится для подавления варнинга вставлять в начало Result := False;

0

3 месяца назад

Serg

Handatros
Оно так ещё и быстрее работает

самый быстрый код тот, что не написан: Result:=Now>0;

0

3 месяца назад

Boris Usievich

Alex Egorov
В логике рабочей функции это сложно сделать, прихо...

угу, у меня тоже такое бывает

0

3 месяца назад

Thadeous

У любой грамотной функции должен быть Result по умолчанию, который определяется в первой же строке. Причина: в процессе работы функции всякое может случится, при этом результат уже будет определен как "по умолчанию".

0

3 месяца назад

Alex Egorov Автор вопроса

Thadeous
У любой грамотной функции должен быть Result по ум...

На такие предосторожности компилер будет ещё более надоедлив )

0

3 месяца назад

Serg

fpc именно в этом фрагменте ничего подозрительного не видит Но может в исходном что-то похоже, но не совсем так? Где-то Exit по пути, еще какая-то напасть? В синтетическом фрагменте точно есть предупреждение?

0

3 месяца назад

Alex Egorov Автор вопроса

Serg
fpc именно в этом фрагменте ничего подозрительного...

Да

0

3 месяца назад

Thadeous

Alex Egorov
На такие предосторожности компилер будет ещё более...

не верно. варнинг исчезнет, если в том примере в начале добавить Result := False или True.

0

3 месяца назад