diff options
Diffstat (limited to 'gcc/ada/a-finali.ads')
| -rw-r--r-- | gcc/ada/a-finali.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-finali.ads b/gcc/ada/a-finali.ads index 0eb3c0303cf..fa983a4556b 100644 --- a/gcc/ada/a-finali.ads +++ b/gcc/ada/a-finali.ads @@ -63,9 +63,9 @@ private type Controlled is abstract new SFR.Root_Controlled with null record; - function "=" (A, B : Controlled) return Boolean; + overriding function "=" (A, B : Controlled) return Boolean; -- Need to be defined explicitly because we don't want to compare the - -- hidden pointers + -- hidden pointers. type Limited_Controlled is abstract new SFR.Root_Controlled with null record; |