diff options
Diffstat (limited to 'gcc/ada/freeze.adb')
| -rw-r--r-- | gcc/ada/freeze.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index cd106fc..a65f0b1 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -3031,6 +3031,8 @@ package body Freeze is -- the corresponding body, and therefore are not checked on an -- imported subprogram for which the body is not available. + -- Could consider generating a wrapper to take care of this??? + if Is_Subprogram (E) and then Is_Imported (E) and then Present (Contract (E)) |