From eb4d862a6b8ac3991dac9a8bc2fb0b9d9830e951 Mon Sep 17 00:00:00 2001
From: gingold
Date: Tue, 15 Jan 2008 05:53:39 +0000
Subject: synchronize: add support for MacOSX, fix bogus type conversion

---
 ortho/mcode/ortho_code-opts.adb | 1 +
 1 file changed, 1 insertion(+)

(limited to 'ortho/mcode/ortho_code-opts.adb')

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
-- 
cgit