summaryrefslogtreecommitdiff
path: root/gcc/ada/s-taprop-dummy.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-taprop-dummy.adb')
-rw-r--r--gcc/ada/s-taprop-dummy.adb11
1 files changed, 5 insertions, 6 deletions
diff --git a/gcc/ada/s-taprop-dummy.adb b/gcc/ada/s-taprop-dummy.adb
index a64a61cd9dd..20f8404e0fc 100644
--- a/gcc/ada/s-taprop-dummy.adb
+++ b/gcc/ada/s-taprop-dummy.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2008, Free Software Foundation, Inc. --
-- --
-- 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- --
@@ -33,15 +33,14 @@
-- This is a no tasking version of this package
--- This package contains all the GNULL primitives that interface directly
--- with the underlying OS.
+-- This package contains all the GNULL primitives that interface directly with
+-- the underlying OS.
pragma Polling (Off);
--- Turn off polling, we do not want ATC polling to take place during
--- tasking operations. It causes infinite loops and other problems.
+-- Turn off polling, we do not want ATC polling to take place during tasking
+-- operations. It causes infinite loops and other problems.
with System.Error_Reporting;
--- used for Shutdown
package body System.Task_Primitives.Operations is