diff options
author | Robert Dewar <dewar@adacore.com> | 2008-08-22 17:46:13 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-22 17:46:13 +0200 |
commit | f5e811d59797b6b3e56e69bd48331e1bc15af6ed (patch) | |
tree | f7b79ab8d443a2ed5408ddcbaf88dd89b31c3fd1 | |
parent | 48afdf8c0d636e944fed3ce34c37d4d1dd773e23 (diff) | |
download | gcc-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
-rwxr-xr-x | gcc/ada/s-utf_32.adb | 4 |
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 |