diff options
Diffstat (limited to 'ortho/debug/ortho_debug-main.adb')
| -rw-r--r-- | ortho/debug/ortho_debug-main.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ortho/debug/ortho_debug-main.adb b/ortho/debug/ortho_debug-main.adb index 714b853..b470dea 100644 --- a/ortho/debug/ortho_debug-main.adb +++ b/ortho/debug/ortho_debug-main.adb @@ -136,6 +136,7 @@ begin if Output /= NULL_Stream then declare Status : int; + pragma Unreferenced (Status); begin Status := fclose (Output); end; |