aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/s-taprop-posix.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-11-30 12:08:56 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2009-11-30 12:08:56 +0100
commitb3afa59bc6e84f3f11f77981a9795de2d8c4095f (patch)
tree43de46f1d86249df6141c9e602fac7c2e2a3847e /gcc/ada/s-taprop-posix.adb
parentc8c4161707cfe88595cd28a4eb652f4f4bb56abe (diff)
downloadgcc-b3afa59bc6e84f3f11f77981a9795de2d8c4095f.zip
gcc-b3afa59bc6e84f3f11f77981a9795de2d8c4095f.tar.gz
gcc-b3afa59bc6e84f3f11f77981a9795de2d8c4095f.tar.bz2
[multiple changes]
2009-11-30 Arnaud Charlet <charlet@adacore.com> * s-taprop-posix.adb: Fix casing. * s-osinte-tru64.adb: Complete previous check-in. 2009-11-30 Robert Dewar <dewar@adacore.com> * gnat_rm.texi: Document pragma Compiler_Unit * s-bitops.adb, s-restri.adb, g-htable.adb, s-restri.ads, a-comlin.ads, a-strhas.ads, s-strhas.adb, s-parame.adb, s-parame.ads, a-clrefi.adb, a-clrefi.ads, a-ioexce.ads: Supply missing Compiler_Unit pragmas. * freeze.adb (Freeze_Entity): Improve message for 8-bit boolean passed to C. From-SVN: r154784
Diffstat (limited to 'gcc/ada/s-taprop-posix.adb')
-rw-r--r--gcc/ada/s-taprop-posix.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/s-taprop-posix.adb b/gcc/ada/s-taprop-posix.adb
index 84c0eee..d05bb1c 100644
--- a/gcc/ada/s-taprop-posix.adb
+++ b/gcc/ada/s-taprop-posix.adb
@@ -246,7 +246,7 @@ package body System.Task_Primitives.Operations is
Res :=
mprotect (Guard_Page_Address, Get_Page_Size,
- prot => (if ON then PROT_ON else PROT_OFF));
+ prot => (if On then PROT_ON else PROT_OFF));
pragma Assert (Res = 0);
end if;
end Stack_Guard;