]>
Commit | Line | Data |
---|---|---|
70482933 RK |
1 | /**************************************************************************** |
2 | * * | |
3 | * GNAT COMPILER COMPONENTS * | |
4 | * * | |
fbf5a39b | 5 | * F I N A L * |
70482933 RK |
6 | * * |
7 | * C Implementation File * | |
8 | * * | |
fbf5a39b | 9 | * Copyright (C) 1992-2003 Free Software Foundation, Inc. * |
70482933 RK |
10 | * * |
11 | * GNAT is free software; you can redistribute it and/or modify it under * | |
12 | * terms of the GNU General Public License as published by the Free Soft- * | |
13 | * ware Foundation; either version 2, or (at your option) any later ver- * | |
14 | * sion. GNAT is distributed in the hope that it will be useful, but WITH- * | |
15 | * OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY * | |
16 | * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * | |
17 | * for more details. You should have received a copy of the GNU General * | |
18 | * Public License distributed with GNAT; see file COPYING. If not, write * | |
19 | * to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, * | |
20 | * MA 02111-1307, USA. * | |
21 | * * | |
22 | * As a special exception, if you link this file with other files to * | |
23 | * produce an executable, this file does not by itself cause the resulting * | |
24 | * executable to be covered by the GNU General Public License. This except- * | |
25 | * ion does not however invalidate any other reasons why the executable * | |
26 | * file might be covered by the GNU Public License. * | |
27 | * * | |
28 | * GNAT was originally developed by the GNAT team at New York University. * | |
71ff80dc | 29 | * Extensive contributions were provided by Ada Core Technologies Inc. * |
70482933 RK |
30 | * * |
31 | ****************************************************************************/ | |
32 | ||
fbf5a39b | 33 | extern void __gnat_finalize (void); |
70482933 RK |
34 | |
35 | /* This routine is called at the extreme end of execution of an Ada program | |
36 | (the call is generated by the binder). The standard routine does nothing | |
37 | at all, the intention is that this be replaced by system specific code | |
38 | where finalization is required. */ | |
39 | ||
40 | void | |
41 | __gnat_finalize () | |
42 | { | |
43 | } |