Use (Width|Height)_Type for modeline sizes
Saves us a lot of conversions and explicit contracts.
Change-Id: I32c06ca87b18c25e3c519fa608c4b9b36dbc0449
Signed-off-by: Nico Huber <nico.h@gmx.de>
Reviewed-on: https://review.coreboot.org/26849
Reviewed-by: Arthur Heymans <arthur@aheymans.xyz>
diff --git a/common/hw-gfx-gma-transcoder.adb b/common/hw-gfx-gma-transcoder.adb
index daa5deb..1e4952d 100644
--- a/common/hw-gfx-gma-transcoder.adb
+++ b/common/hw-gfx-gma-transcoder.adb
@@ -138,12 +138,7 @@
----------------------------------------------------------------------------
- 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 *");
+ function Encode (LSW, MSW : Pos32) return Word32 is
begin
return Shift_Left (Word32 (MSW - 1), 16) or Word32 (LSW - 1);
end Encode;