diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-06-20 08:34:25 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-06-20 08:34:25 +0200 |
commit | 13ef82dcb5306295b6226b618ec6d93a1f6aa9ae (patch) | |
tree | 07fb6e04b6abfe92e2f1e8d6952ab20ad57356e2 /src | |
parent | 45bec6292a41661320e209ac343362599df9feef (diff) | |
download | ghdl-13ef82dcb5306295b6226b618ec6d93a1f6aa9ae.tar.gz ghdl-13ef82dcb5306295b6226b618ec6d93a1f6aa9ae.tar.bz2 ghdl-13ef82dcb5306295b6226b618ec6d93a1f6aa9ae.zip |
synth-expr: clarify error message.
Diffstat (limited to 'src')
-rw-r--r-- | src/synth/synth-expr.adb | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index 60cd7cc71..498c2e6f0 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -1217,9 +1217,14 @@ package body Synth.Expr is Clk := Build_Monadic (Build_Context, Id_Not, Clk); Edge := Build_Edge (Build_Context, Clk); return Create_Value_Net (Edge, No_Bound); + elsif Get_Implicit_Definition (Imp) /= Iir_Predefined_None then + Error_Msg_Synth + (+Expr, "predefined function call to %i is not handled", + +Imp); + else + Error_Msg_Synth + (+Expr, "user function call to %i is not handled", +Imp); end if; - Error_Msg_Synth - (+Expr, "user function call to %i is not handled", +Imp); end; when Iir_Kind_Aggregate => return Synth_Aggregate (Syn_Inst, Expr, Expr_Type); |