summaryrefslogtreecommitdiff
path: root/ortho/mcode/ortho_code-opts.adb
diff options
context:
space:
mode:
Diffstat (limited to 'ortho/mcode/ortho_code-opts.adb')
-rw-r--r--ortho/mcode/ortho_code-opts.adb1
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