From 3fa8d9eb8b700044d149bdf12da6cb023568b8c0 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 5 May 2019 08:00:35 +0200 Subject: vhdl: move ieee packages to vhdl children. --- src/vhdl/vhdl-ieee-std_logic_1164.ads | 47 +++++++++++++++++++++++++++++++++++ 1 file changed, 47 insertions(+) create mode 100644 src/vhdl/vhdl-ieee-std_logic_1164.ads (limited to 'src/vhdl/vhdl-ieee-std_logic_1164.ads') diff --git a/src/vhdl/vhdl-ieee-std_logic_1164.ads b/src/vhdl/vhdl-ieee-std_logic_1164.ads new file mode 100644 index 000000000..f5c92b5f1 --- /dev/null +++ b/src/vhdl/vhdl-ieee-std_logic_1164.ads @@ -0,0 +1,47 @@ +-- Nodes recognizer for ieee.std_logic_1164. +-- Copyright (C) 2002, 2003, 2004, 2005 Tristan Gingold +-- +-- GHDL is free software; you can redistribute it and/or modify it under +-- the terms of the GNU General Public License as published by the Free +-- Software Foundation; either version 2, or (at your option) any later +-- version. +-- +-- GHDL is distributed in the hope that it will be useful, but WITHOUT ANY +-- WARRANTY; without even the implied warranty of MERCHANTABILITY or +-- FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +-- for more details. +-- +-- You should have received a copy of the GNU General Public License +-- along with GHDL; see the file COPYING. If not, write to the Free +-- Software Foundation, 59 Temple Place - Suite 330, Boston, MA +-- 02111-1307, USA. + +package Vhdl.Ieee.Std_Logic_1164 is + -- Nodes corresponding to declarations in the package. + Std_Logic_1164_Pkg : Iir_Package_Declaration := Null_Iir; + Std_Ulogic_Type : Iir_Enumeration_Type_Definition := Null_Iir; + Std_Ulogic_Vector_Type : Iir_Array_Type_Definition := Null_Iir; + Std_Ulogic_0 : Iir_Enumeration_Literal := Null_Iir; + Std_Ulogic_1 : Iir_Enumeration_Literal := Null_Iir; + Std_Logic_Type : Iir_Enumeration_Subtype_Definition := Null_Iir; + Std_Logic_Vector_Type : Iir_Array_Type_Definition := Null_Iir; + Resolved : Iir_Function_Declaration := Null_Iir; + Rising_Edge : Iir_Function_Declaration := Null_Iir; + Falling_Edge : Iir_Function_Declaration := Null_Iir; + + -- Position of literals (D represents '-' ie dont-care). + Std_Logic_U_Pos : constant := 0; + Std_Logic_X_Pos : constant := 1; + Std_Logic_0_Pos : constant := 2; + Std_Logic_1_Pos : constant := 3; + Std_Logic_Z_Pos : constant := 4; + Std_Logic_L_Pos : constant := 5; + Std_Logic_H_Pos : constant := 6; + Std_Logic_W_Pos : constant := 7; + Std_Logic_D_Pos : constant := 8; + + -- Extract declarations from PKG. + -- PKG is the package declaration for ieee.std_logic_1164 package. + -- Fills the node aboves. + procedure Extract_Declarations (Pkg : Iir_Package_Declaration); +end Vhdl.Ieee.Std_Logic_1164; -- cgit v1.2.3