diff options
Diffstat (limited to 'gcc/ada/osint.adb')
| -rw-r--r-- | gcc/ada/osint.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/osint.adb b/gcc/ada/osint.adb index 3ae76cf..e935c2b 100644 --- a/gcc/ada/osint.adb +++ b/gcc/ada/osint.adb @@ -1072,7 +1072,7 @@ package body Osint is function File_Hash (F : File_Name_Type) return File_Hash_Num is begin - return File_Hash_Num (Int (F) rem File_Hash_Num'Range_Length); + return File_Hash_Num (Int (F) mod File_Hash_Num'Range_Length); end File_Hash; ----------------- |