diff options
Diffstat (limited to 'gcc/ada/binde.adb')
| -rw-r--r-- | gcc/ada/binde.adb | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/ada/binde.adb b/gcc/ada/binde.adb index aab6e63..9318fd7 100644 --- a/gcc/ada/binde.adb +++ b/gcc/ada/binde.adb @@ -1160,7 +1160,10 @@ package body Binde is function Debug_Flag_Old return Boolean is begin - return Debug_Flag_P; + -- If the user specified both flags, we want to use the older algorithm, + -- rather than some confusing mix of the two. + + return Debug_Flag_P and not Debug_Flag_O; end Debug_Flag_Old; ---------------------- |