* lib/string_.h: If the gnulib module XYZ is not present, undefine
[gnulib.git] / tests / test-allocsa.c
1 /* Test of safe automatic memory allocation.
2    Copyright (C) 2005 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 2, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software Foundation,
16    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
17
18 /* Written by Bruno Haible <bruno@clisp.org>, 2005.  */
19
20 #ifdef HAVE_CONFIG_H
21 # include <config.h>
22 #endif
23
24 #include "allocsa.h"
25
26 #include <stdlib.h>
27
28 #define ASSERT(expr) if (!(expr)) abort ();
29
30 static void
31 do_allocation (int n)
32 {
33   void *ptr = allocsa (n);
34   freesa (ptr);
35   ptr = safe_alloca (n);
36 }
37
38 void (*func) (int) = do_allocation;
39
40 int
41 main ()
42 {
43   int i;
44
45   /* Repeat a lot of times, to make sure there's no memory leak.  */
46   for (i = 0; i < 100000; i++)
47     {
48       /* Try various values.
49          n = 0 gave a crash on Alpha with gcc-2.5.8.
50          Some versions of MacOS X have a stack size limit of 512 KB.  */
51       func (34);
52       func (134);
53       func (399);
54       func (510823);
55       func (129321);
56       func (0);
57       func (4070);
58       func (4095);
59       func (1);
60       func (16582);
61     }
62
63   return 0;
64 }