diff --git a/common/hw-gfx-gma.ads b/common/hw-gfx-gma.ads
index 114f87e..87b464a 100644
--- a/common/hw-gfx-gma.ads
+++ b/common/hw-gfx-gma.ads
@@ -63,6 +63,7 @@
    procedure Initialize
      (MMIO_Base   : in     Word64 := 0;
       Write_Delay : in     Word64 := 0;
+      Clean_State : in     Boolean := False;
       Success     :    out Boolean)
    with
       Global =>