diff options
| author | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2008-01-15 05:53:39 +0000 |
|---|---|---|
| committer | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2008-01-15 05:53:39 +0000 |
| commit | eb4d862a6b8ac3991dac9a8bc2fb0b9d9830e951 (patch) | |
| tree | 3944b708fedbc9f955f09f947cd4377c286a9127 /ortho/mcode/ortho_code-exprs.adb | |
| parent | 861828b455955858709dfda217af0188cfdef799 (diff) | |
| download | ghdl-eb4d862a6b8ac3991dac9a8bc2fb0b9d9830e951.tar.gz ghdl-eb4d862a6b8ac3991dac9a8bc2fb0b9d9830e951.tar.bz2 ghdl-eb4d862a6b8ac3991dac9a8bc2fb0b9d9830e951.zip | |
synchronize: add support for MacOSX, fix bogus type conversion
Diffstat (limited to 'ortho/mcode/ortho_code-exprs.adb')
| -rw-r--r-- | ortho/mcode/ortho_code-exprs.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-exprs.adb b/ortho/mcode/ortho_code-exprs.adb index b8da44cc8..0724bcc19 100644 --- a/ortho/mcode/ortho_code-exprs.adb +++ b/ortho/mcode/ortho_code-exprs.adb @@ -251,6 +251,7 @@ package body Ortho_Code.Exprs is begin return Enodes.Table (Stmt).Arg1; end Get_BB_Next; + pragma Unreferenced (Get_BB_Next); procedure Set_BB_Next (Stmt : O_Enode; Next : O_Enode) is begin |