c/src/lib/libbsp/sparc/erc32/gnatsupp/gnatsupp.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

/*
 *
 * Support for gnat/rtems interrupts and exception handling.
 * Jiri Gaisler, ESA/ESTEC, 17-02-1999.
 *
 *  $Id$
 */

void __gnat_install_handler_common( int, int );

void
__gnat_install_handler (void)
{
  __gnat_install_handler_common (0x1d, 0x15);
}