synth: do not consider all ieee packages as predefined.

In particular, the vhdl 2008 fixed point packages are considered as
regular packages.

Fix #1417

1 files changed, 24 insertions, 7 deletions

diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb
index a18f2b6cf..683b86ddd 100644
--- a/src/synth/synth-expr.adb
+++ b/src/synth/synth-expr.adb
@@ -1715,16 +1715,33 @@ package body Synth.Expr is
       end case;
    end Synth_Type_Conversion;
 
-   procedure Error_Ieee_Operator (Imp : Node; Loc : Node) is
+   procedure Error_Ieee_Operator (Imp : Node; Loc : Node)
+   is
+      use Std_Names;
+      Parent : constant Iir := Get_Parent (Imp);
    begin
-      if Get_Kind (Get_Parent (Imp)) = Iir_Kind_Package_Declaration
+      if Get_Kind (Parent) = Iir_Kind_Package_Declaration
         and then (Get_Identifier
-                    (Get_Library
-                       (Get_Design_File (Get_Design_Unit (Get_Parent (Imp)))))
-                    = Std_Names.Name_Ieee)
+                    (Get_Library (Get_Design_File (Get_Design_Unit (Parent))))
+                    = Name_Ieee)
       then
-         Error_Msg_Synth (+Loc, "unhandled predefined IEEE operator %i", +Imp);
-         Error_Msg_Synth (+Imp, " declared here");
+         case Get_Identifier (Parent) is
+            when Name_Std_Logic_1164
+               | Name_Std_Logic_Arith
+               | Name_Std_Logic_Signed
+               | Name_Std_Logic_Unsigned
+               | Name_Std_Logic_Misc
+               | Name_Numeric_Std
+               | Name_Numeric_Bit
+               | Name_Math_Real =>
+               Error_Msg_Synth
+                 (+Loc, "unhandled predefined IEEE operator %i", +Imp);
+               Error_Msg_Synth
+                 (+Imp, " declared here");
+            when others =>
+               --  ieee 2008 packages are handled like regular packages.
+               null;
+         end case;
       end if;
    end Error_Ieee_Operator;