gma: Justify some use-visibility warnings
These `use type` statements were required for older compilers
(<= GCC 6.2) but are warned about by newer versions, sigh.
Change-Id: I50d6ea19b5a9e0c7d839f6a9781b6179156ce162
Signed-off-by: Nico Huber <nico.h@gmx.de>
Reviewed-on: https://review.coreboot.org/18690
Reviewed-by: Paul Menzel <paulepanter@users.sourceforge.net>
Reviewed-by: Patrick Georgi <pgeorgi@google.com>
diff --git a/common/hw-gfx-gma-transcoder.adb b/common/hw-gfx-gma-transcoder.adb
index 27edf31..91ef6b6 100644
--- a/common/hw-gfx-gma-transcoder.adb
+++ b/common/hw-gfx-gma-transcoder.adb
@@ -150,7 +150,10 @@
function Encode (LSW, MSW : Pos16) return Word32
is
+ pragma Warnings (GNAT, Off, """Integer_16"" is already use-visible *",
+ Reason => "Needed for older compiler versions");
use type HW.Pos16;
+ pragma Warnings (GNAT, On, """Integer_16"" is already use-visible *");
begin
return Shift_Left (Word32 (MSW - 1), 16) or Word32 (LSW - 1);
end Encode;