1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-13 06:50:39 -08:00
emacs/mps/qa/function/8.c
Richard Tucker 7e4391159c Add id to header
Copied from Perforce
 Change: 20304
 ServerID: perforce.ravenbrook.com
1998-10-29 12:23:33 +00:00

34 lines
396 B
C

/*
TEST_HEADER
id = $HopeName$
summary = create spaces at once until an error results!
language = c
link = testlib.o
OUTPUT_SPEC
space > 10
END_HEADER
*/
#include "testlib.h"
static void test(void)
{
mps_space_t space;
int p;
p=0;
while (1)
{
die(mps_space_create(&space), "create");
p = p+1;
report("space", "%i", p);
}
}
int main(void)
{
easy_tramp(test);
return 0;
}