* pa.md (subsi3): Turn into an expander. Create two anonymous
[official-gcc.git] / gcc / ggc-none.c
blob6551e59a3ac4265c9f3d39fcb2139b4a2250fdc3
1 /* Null garbage collection for the GNU compiler.
2 Copyright (C) 1998, 1999 Free Software Foundation, Inc.
4 This file is part of GNU CC.
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
9 any later version.
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING. If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
21 /* This version is used by the gen* programs, where we don't really
22 need GC at all. This prevents problems with pulling in all the
23 tree stuff. */
25 /* We are used by gengenrtl, before genrtl.h exists. But we don't
26 need it either. */
27 #define NO_GENRTL_H
29 #include "config.h"
30 #include "system.h"
31 #include "rtl.h"
32 #include "ggc.h"
34 /* For now, keep using the old obstack scheme in the gen* programs. */
35 int ggc_p = 0;
37 rtx
38 ggc_alloc_rtx (nslots)
39 int nslots;
41 int size = sizeof(struct rtx_def) + (nslots - 1) * sizeof(rtunion);
42 rtx n;
44 n = (rtx) xmalloc (size);
45 bzero ((char *) n, size);
47 return n;
50 rtvec
51 ggc_alloc_rtvec (nelt)
52 int nelt;
54 int size = sizeof (struct rtvec_def) + (nelt - 1) * sizeof (rtunion);
55 rtvec v;
57 v = (rtvec) xmalloc (size);
58 bzero ((char *) v, size);
60 return v;