[Ada] VxWorks: call s-tpopsp.Self only when needed
authorJerome Lambourg <lambourg@adacore.com>
Mon, 12 Aug 2019 08:59:08 +0000 (08:59 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Mon, 12 Aug 2019 08:59:08 +0000 (08:59 +0000)
commit96a8b7050beeb1a28d0e2c2a8d3e841ea38d450c
treef029116c9099d7dc410720720c4dc94a1ebeb815
parent43eb2bb6967ffd6d9b9fadfa606c177671c28261
[Ada] VxWorks: call s-tpopsp.Self only when needed

2019-08-12  Jerome Lambourg  <lambourg@adacore.com>

gcc/ada/

* libgnarl/s-taprop__vxworks.adb (Abort_Handler): Only call
s-tpopsp.Self when actually needed.

From-SVN: r274283
gcc/ada/ChangeLog
gcc/ada/libgnarl/s-taprop__vxworks.adb