blob: 30a382f3723e171ca611a5307cc100603f5efc38 [file] [log] [blame]
Nico Huber83693c82016-10-08 22:17:55 +02001--
2-- Copyright (C) 2015-2016 secunet Security Networks AG
3--
4-- This program is free software; you can redistribute it and/or modify
5-- it under the terms of the GNU General Public License as published by
Nico Huber125a29e2016-10-18 00:23:54 +02006-- the Free Software Foundation; either version 2 of the License, or
7-- (at your option) any later version.
Nico Huber83693c82016-10-08 22:17:55 +02008--
9-- This program is distributed in the hope that it will be useful,
10-- but WITHOUT ANY WARRANTY; without even the implied warranty of
11-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12-- GNU General Public License for more details.
13--
14
15private package HW.GFX.GMA.Connectors is
16
Nico Huber0923b792017-06-09 15:28:41 +020017 pragma Warnings (GNATprove, Off, "subprogram ""Initialize"" has no effect",
18 Reason => "Only effects some platforms");
19 procedure Initialize;
20 pragma Warnings (GNATprove, On, "subprogram ""Initialize"" has no effect");
21
Nico Huber83693c82016-10-08 22:17:55 +020022 pragma Warnings (GNATprove, Off, "unused variable ""P*""",
23 Reason => "Needed for a common interface");
24 procedure Pre_On
Nico Huber6e327c92016-12-21 14:45:45 +010025 (Pipe : in Pipe_Index;
26 Port_Cfg : in Port_Config;
Nico Huber83693c82016-10-08 22:17:55 +020027 PLL_Hint : in Word32;
Nico Huber83693c82016-10-08 22:17:55 +020028 Success : out Boolean);
29
30 procedure Post_On
31 (Port_Cfg : in Port_Config;
32 PLL_Hint : in Word32;
33 Success : out Boolean);
34 pragma Warnings (GNATprove, On, "unused variable ""P*""");
35
36 procedure Pre_Off (Port_Cfg : Port_Config);
37 procedure Post_Off (Port_Cfg : Port_Config);
38
39 procedure Pre_All_Off;
40 procedure Post_All_Off;
41
42end HW.GFX.GMA.Connectors;