E2095: $ENDIF 指令が見つかりません (Delphi)

エラーと警告のメッセージ（Delphi）：インデックス への移動

このエラーメッセージは $IFDEF，$IFNDEF，$IFOPT のいずれかの指令の後に対応する $ENDIF 指令がない場合に表示されます。

program Produce;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compiled with optimizations');
(*$Else*)
  Writeln('Compiled without optimizations');
(*Endif*)
end.                                           (*<-- ここでエラーメッセージ*)

{ このコードでは，(*$Endif*) 指令の中に $ 文字を入れ忘れたため，コンパイラが指令をコメントと誤解した }

program Solve;
(*$APPTYPE CONSOLE*)
begin
(*$IfOpt O+*)
  Writeln('Compiled with optimizations');
(*$Else*)
  Writeln('Compiled without optimizations');
(*$Endif*)
end.

{ 有効な $ENDIF 指令を条件指令の後に付けると解決する }