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); | 
