erc32/gnatsupp/gnatsupp.c

0001 /**
0002  * @file
0003  *
0004  * @ingroup sparc_erc32
0005  *
0006  * @brief Support for gnat/rtems interrupts and exception handling
0007  */
0008
0009 /*
0010  * COPYRIGHT (c) 1999.
0011  * European Space Agency.
0012  *
0013  * The license and distribution terms for this file may be
0014  * found in the file LICENSE in this distribution or at
0015  * http://www.rtems.org/license/LICENSE.
0016  */
0017
0018 #include <bsp/gnatcommon.h>
0019
0020 void
0021 __gnat_install_handler (void)
0022 {
0023   __gnat_install_handler_common (0x1d, 0x15);
0024 }