===================================================================
@@ -7,7 +7,7 @@
-- B o d y --
-- --
-- Copyright (C) 1991-1994, Florida State University --
+-- Copyright (C) 1995-2010, AdaCore --
-- --
-- GNARL is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -32,6 +32,8 @@
-- --
------------------------------------------------------------------------------
+with System.OS_Primitives;
+
package body Ada.Real_Time is
---------
@@ -242,4 +244,6 @@ package body Ada.Real_Time is
return Time_Span (D);
end To_Time_Span;
+begin
+ System.OS_Primitives.Initialize;
end Ada.Real_Time;