1 /* Implement runtime actions for CHILL.
2 Copyright (C) 1992,1993 Free Software Foundation, Inc.
5 This file is part of GNU CC.
7 GNU CC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GNU CC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU CC; see the file COPYING. If not, write to
19 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
26 extern void __cause_ex1 (char *exname, char *file, int lineno);
28 /* define needed exceptions */
29 EXCEPTION (allocatefail)
36 * size number of bytes to allocate
37 * filename source file which issued the call
38 * linenumber line number within that source file
48 * allocate memory from heap
53 __allocate (size, filename, linenumber)
61 __cause_ex1 ("rangefail", filename, linenumber);
64 __cause_ex1 ("allocatefail", filename, linenumber);