diff --git a/ada/extensions/src/libadalang-expr_eval.adb b/ada/extensions/src/libadalang-expr_eval.adb index 438f5bac9..d4bea2b6f 100644 --- a/ada/extensions/src/libadalang-expr_eval.adb +++ b/ada/extensions/src/libadalang-expr_eval.adb @@ -191,8 +191,8 @@ package body Libadalang.Expr_Eval is end if; when others => - raise Property_Error with "Cannot transform decl " & - D.Kind'Image; + raise Property_Error + with "Cannot eval decl " & D.Kind'Image; end case; end Eval_Decl;