aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2008-08-22 17:46:13 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2008-08-22 17:46:13 +0200
commitf5e811d59797b6b3e56e69bd48331e1bc15af6ed (patch)
treef7b79ab8d443a2ed5408ddcbaf88dd89b31c3fd1 /gcc/ada
parent48afdf8c0d636e944fed3ce34c37d4d1dd773e23 (diff)
downloadgcc-f5e811d59797b6b3e56e69bd48331e1bc15af6ed.zip
gcc-f5e811d59797b6b3e56e69bd48331e1bc15af6ed.tar.gz
gcc-f5e811d59797b6b3e56e69bd48331e1bc15af6ed.tar.bz2
s-utf_32.adb (Get_Category): Fix obvious typo
2008-08-22 Robert Dewar <dewar@adacore.com> * s-utf_32.adb (Get_Category): Fix obvious typo From-SVN: r139489
Diffstat (limited to 'gcc/ada')
-rwxr-xr-xgcc/ada/s-utf_32.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-utf_32.adb b/gcc/ada/s-utf_32.adb
index 25716e5..d57c730 100755
--- a/gcc/ada/s-utf_32.adb
+++ b/gcc/ada/s-utf_32.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 2005-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 2005-2008, Free Software Foundation, Inc. --
-- --
-- GNAT 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- --
@@ -5103,7 +5103,7 @@ package body System.UTF_32 is
begin
-- Deal with FFFE/FFFF cases
- if U mod 2#1_0000# >= 16#FFFE# then
+ if U mod 16#1_0000# >= 16#FFFE# then
return Fe;
-- Otherwise search table