diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/edif/dump_edif.adb | 18 | ||||
-rw-r--r-- | src/edif/edif-disp_edif.adb | 18 | ||||
-rw-r--r-- | src/edif/edif-disp_edif.ads | 18 | ||||
-rw-r--r-- | src/edif/edif-nodes.adb | 19 | ||||
-rw-r--r-- | src/edif/edif-nodes.adb.in | 19 | ||||
-rw-r--r-- | src/edif/edif-nodes.ads | 18 | ||||
-rw-r--r-- | src/edif/edif-nutils.adb | 18 | ||||
-rw-r--r-- | src/edif/edif-nutils.ads | 18 | ||||
-rw-r--r-- | src/edif/edif-parse.adb | 18 | ||||
-rw-r--r-- | src/edif/edif-parse.ads | 18 | ||||
-rw-r--r-- | src/edif/edif-scans.adb | 18 | ||||
-rw-r--r-- | src/edif/edif-scans.ads | 18 | ||||
-rw-r--r-- | src/edif/edif-tokens.ads | 18 | ||||
-rw-r--r-- | src/edif/edif.ads | 18 |
14 files changed, 252 insertions, 2 deletions
diff --git a/src/edif/dump_edif.adb b/src/edif/dump_edif.adb index 129787364..9bac6232f 100644 --- a/src/edif/dump_edif.adb +++ b/src/edif/dump_edif.adb @@ -1,3 +1,21 @@ +-- EDIF main program. +-- Copyright (C) 2019 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. + with Ada.Text_IO; use Ada.Text_IO; with Ada.Command_Line; use Ada.Command_Line; with Types; use Types; diff --git a/src/edif/edif-disp_edif.adb b/src/edif/edif-disp_edif.adb index ab3256916..884023249 100644 --- a/src/edif/edif-disp_edif.adb +++ b/src/edif/edif-disp_edif.adb @@ -1,3 +1,21 @@ +-- EDIF printer. +-- Copyright (C) 2019 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. + with Ada.Text_IO; use Ada.Text_IO; with Types; use Types; with Str_Table; diff --git a/src/edif/edif-disp_edif.ads b/src/edif/edif-disp_edif.ads index 519438852..5a17d539c 100644 --- a/src/edif/edif-disp_edif.ads +++ b/src/edif/edif-disp_edif.ads @@ -1,3 +1,21 @@ +-- EDIF printer. +-- Copyright (C) 2019 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. + with Edif.Nodes; use Edif.Nodes; package Edif.Disp_Edif is diff --git a/src/edif/edif-nodes.adb b/src/edif/edif-nodes.adb index 62d0bc43f..7cd00b9f2 100644 --- a/src/edif/edif-nodes.adb +++ b/src/edif/edif-nodes.adb @@ -1,4 +1,21 @@ --- This is in fact -*- Ada -*- +-- EDIF nodes. This is in fact -*- Ada -*- +-- Copyright (C) 2019 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. + with Ada.Unchecked_Conversion; with Tables; with Edif.Nodes_Meta; use Edif.Nodes_Meta; diff --git a/src/edif/edif-nodes.adb.in b/src/edif/edif-nodes.adb.in index 7c371888e..222d42d6f 100644 --- a/src/edif/edif-nodes.adb.in +++ b/src/edif/edif-nodes.adb.in @@ -1,4 +1,21 @@ --- This is in fact -*- Ada -*- +-- EDIF nodes. This is in fact -*- Ada -*- +-- Copyright (C) 2019 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. + with Ada.Unchecked_Conversion; with Tables; with Edif.Nodes_Meta; use Edif.Nodes_Meta; diff --git a/src/edif/edif-nodes.ads b/src/edif/edif-nodes.ads index 78d413d0f..7dd61f2b1 100644 --- a/src/edif/edif-nodes.ads +++ b/src/edif/edif-nodes.ads @@ -1,3 +1,21 @@ +-- EDIF nodes. +-- Copyright (C) 2019 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. + with Types; use Types; package Edif.Nodes is diff --git a/src/edif/edif-nutils.adb b/src/edif/edif-nutils.adb index c7755dc08..e3ad64363 100644 --- a/src/edif/edif-nutils.adb +++ b/src/edif/edif-nutils.adb @@ -1,3 +1,21 @@ +-- EDIF utils. +-- Copyright (C) 2019 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 body Edif.Nutils is procedure Init_Constr (Constr : out Constr_Type) is begin diff --git a/src/edif/edif-nutils.ads b/src/edif/edif-nutils.ads index a53f46bfc..a01de28f1 100644 --- a/src/edif/edif-nutils.ads +++ b/src/edif/edif-nutils.ads @@ -1,3 +1,21 @@ +-- EDIF utils. +-- Copyright (C) 2019 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. + with Edif.Nodes; use Edif.Nodes; package Edif.Nutils is diff --git a/src/edif/edif-parse.adb b/src/edif/edif-parse.adb index a3169bd63..106f804e3 100644 --- a/src/edif/edif-parse.adb +++ b/src/edif/edif-parse.adb @@ -1,3 +1,21 @@ +-- EDIF parser. +-- Copyright (C) 2019 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. + with Types; use Types; with Std_Names; use Std_Names; with Errorout; use Errorout; diff --git a/src/edif/edif-parse.ads b/src/edif/edif-parse.ads index 929be9b1e..42fc249e1 100644 --- a/src/edif/edif-parse.ads +++ b/src/edif/edif-parse.ads @@ -1,3 +1,21 @@ +-- EDIF parser. +-- Copyright (C) 2019 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. + with Edif.Nodes; use Edif.Nodes; package Edif.Parse is diff --git a/src/edif/edif-scans.adb b/src/edif/edif-scans.adb index e8d8fb199..edbe6ea45 100644 --- a/src/edif/edif-scans.adb +++ b/src/edif/edif-scans.adb @@ -1,3 +1,21 @@ +-- EDIF scanner. +-- Copyright (C) 2019 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. + with Ada.Characters.Latin_1; use Ada.Characters.Latin_1; with Files_Map; use Files_Map; with Name_Table; use Name_Table; diff --git a/src/edif/edif-scans.ads b/src/edif/edif-scans.ads index 8dc9e7546..66468f958 100644 --- a/src/edif/edif-scans.ads +++ b/src/edif/edif-scans.ads @@ -1,3 +1,21 @@ +-- EDIF scanner. +-- Copyright (C) 2019 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. + with Types; use Types; with Edif.Tokens; use Edif.Tokens; diff --git a/src/edif/edif-tokens.ads b/src/edif/edif-tokens.ads index c78ef1cc3..9ee30e5ea 100644 --- a/src/edif/edif-tokens.ads +++ b/src/edif/edif-tokens.ads @@ -1,3 +1,21 @@ +-- EDIF tokens. +-- Copyright (C) 2019 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 Edif.Tokens is pragma Pure (Tokens); diff --git a/src/edif/edif.ads b/src/edif/edif.ads index 889897442..773a92ee5 100644 --- a/src/edif/edif.ads +++ b/src/edif/edif.ads @@ -1,3 +1,21 @@ +-- EDIF base package. +-- Copyright (C) 2019 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 Edif is pragma Pure (Edif); end Edif; |