Explorar o código

* Replaced Illegal Expression error with Internal Error for
"getaddsub_for_incdec" since it should never logically reach this point

J. Gareth "Curious Kit" Moreton hai 2 meses
pai
achega
b49d2f689f
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      compiler/ninl.pas

+ 2 - 1
compiler/ninl.pas

@@ -5044,7 +5044,8 @@ implementation
              hpp := tcallparanode(tcallparanode(left).right).left;
              tcallparanode(tcallparanode(left).right).left := nil;
              if assigned(tcallparanode(tcallparanode(left).right).right) then
-               CGMessage(parser_e_illegal_expression);
+               { A syntax error should have already been raised }
+               InternalError(2025050601);
            end
          else
            begin