mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-06 14:22:31 -07:00
Code Issues Projects Releases Wiki Activity

Add ambig root to hold p[i] during commit

Browse source 
Copied from Perforce
 Change: 20618
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1999-03-15 12:46:15 +00:00
parent fafa8d44a9
commit 55ea05dfa2
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
mps/qa/function/45.c
View file

@ -1,6 +1,6 @@
/*
TEST_HEADER
id = $HopeName$
id = $HopeName: MMQA_test_function!45.c(trunk.3) $
summary = arena_collect when lots of APs are in mid-cycle
language = c
link = testlib.o newfmt.o
@ -42,6 +42,8 @@ static void test(void)
int h,i,j,k,l;
mycell *pobj;
mycell *ambig[NAPS];
size_t size0, size1;
long mdiff = 0;
size_t bytes;
@ -145,6 +147,7 @@ cells = allocone(ap[0], NCELLS);
break;
case 2:
commentif(BLAH, "%i: begin commit %li", i, p[i]->data.id);
ambig[i] = p[i];
ap[i]->init = ap[i]->alloc;
ap_state[i] = 3;
break;
@ -158,6 +161,7 @@ cells = allocone(ap[0], NCELLS);
commentif(BLAH, "%i -> %i", i, l);
}
ap_state[i] = 0;
ambig[i] = NULL;
break;
}
}