blob: 72854e854a0be603c429968e5dc654268fab411c [file] [log] [blame]
Tim Wawrzynczak605660b2022-06-08 12:48:19 -06001--
2-- Copyright (C) 2022 Google, LLC
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
6-- the Free Software Foundation; either version 2 of the License, or
7-- (at your option) any later version.
8--
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
15with HW.GFX.GMA.Config_Helpers;
16
17private package HW.GFX.GMA.Power_And_Clocks is
18
19 pragma Warnings (Off, "subprogram ""*"" has no effect",
20 Reason => "Not yet implemented.");
21 procedure Pre_All_Off;
22 procedure Post_All_Off;
23
24 procedure Initialize;
25
26 pragma Warnings (Off, """Configs"" is not modified, could be IN",
27 Reason => "Not yet implemented.");
28 procedure Limit_Dotclocks
29 (Configs : in out Pipe_Configs;
30 CDClk_Switch : out Boolean)
31 with
32 Post => Config_Helpers.Stable_FB (Configs'Old, Configs);
33 procedure Update_CDClk (Configs : in out Pipe_Configs)
34 with
35 Post => Config_Helpers.Stable_FB (Configs'Old, Configs);
36 pragma Warnings (On, """Configs"" is not modified, could be IN");
37 procedure Enable_CDClk is null;
38
39 procedure Power_Set_To (Configs : Pipe_Configs);
40 procedure Power_Up (Old_Configs, New_Configs : Pipe_Configs);
41 procedure Power_Down (Old_Configs, Tmp_Configs, New_Configs : Pipe_Configs);
42 pragma Warnings (On, "subprogram ""*"" has no effect");
43
44end HW.GFX.GMA.Power_And_Clocks;