diff options
Diffstat (limited to 'ortho/mcode/ortho_code-opts.adb')
-rw-r--r-- | ortho/mcode/ortho_code-opts.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-opts.adb b/ortho/mcode/ortho_code-opts.adb index 75fedd0..83071b4 100644 --- a/ortho/mcode/ortho_code-opts.adb +++ b/ortho/mcode/ortho_code-opts.adb @@ -120,6 +120,7 @@ package body Ortho_Code.Opts is end case; end loop; end Get_Fall_Stmt; + pragma Unreferenced (Get_Fall_Stmt); procedure Thread_Jump (Subprg : Subprogram_Data_Acc) is |