From: Arnaud Charlet Date: Wed, 8 Dec 2004 11:49:07 +0000 (+0100) Subject: * vxaddr2line.adb: Add support for x86 vxworks X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4e8c0836b4fd5d08cc776a07a134796f0b405808;p=gcc.git * vxaddr2line.adb: Add support for x86 vxworks From-SVN: r91895 --- diff --git a/gcc/ada/vxaddr2line.adb b/gcc/ada/vxaddr2line.adb index 5fc7759276f..6d79cfc5c48 100644 --- a/gcc/ada/vxaddr2line.adb +++ b/gcc/ada/vxaddr2line.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2002-2003 Ada Core Technologies, Inc. -- +-- Copyright (C) 2002-2004 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -81,7 +81,8 @@ procedure VxAddr2Line is -- All supported architectures type Architecture is - (WINDOWS_POWERPC, + (SOLARIS_I586, + WINDOWS_POWERPC, WINDOWS_M68K, SOLARIS_POWERPC, DEC_ALPHA); @@ -125,6 +126,11 @@ procedure VxAddr2Line is Nm_Binary => null, Addr_Digits_To_Skip => 0, Bt_Offset_From_Call => 0), + SOLARIS_I586 => + (Addr2line_Binary => null, + Nm_Binary => null, + Addr_Digits_To_Skip => 0, + Bt_Offset_From_Call => -2), DEC_ALPHA => (Addr2line_Binary => null, Nm_Binary => null, @@ -212,7 +218,6 @@ procedure VxAddr2Line is return; end Detect_Arch; - ----------- -- Error -- ----------- @@ -224,7 +229,6 @@ procedure VxAddr2Line is raise Program_Error; end Error; - -------------------------- -- Get_Reference_Offset -- --------------------------