mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-14 23:40:39 -08:00
Code Issues Projects Releases Wiki Activity

Remove unnecessary check

Browse source 
Copied from Perforce
 Change: 19213
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Pekka Pirinen 1998-01-14 14:59:03 +00:00
parent ba055c8ce2
commit 55186a7803
1 changed files with 5 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
mps/src/ring.c
View file

@ -1,7 +1,7 @@
/* impl.c.ring: RING IMPLEMENTATION
*
* $HopeName: MMsrc!ring.c(trunk.5) $
* Copyright (C) 1995,1996, 1997 Harlequin Group, all rights reserved.
* $HopeName: MMsrc!ring.c(trunk.6) $
* Copyright (C) 1995,1996, 1997, 1998 Harlequin Group, all rights reserved.
*
* .readership: Any MPS developer.
*
@ -22,7 +22,7 @@
#include "mpm.h"
SRCID(ring, "$HopeName: MMsrc!ring.c(trunk.5) $");
SRCID(ring, "$HopeName: MMsrc!ring.c(trunk.6) $");
/* RingCheck, RingCheckSingle -- check the validity of a ring node
@ -54,12 +54,8 @@ Bool RingCheckSingle(Ring ring)
Bool RingIsSingle(Ring ring)
{
AVER(RingCheck(ring));
if(ring->next == ring) {
AVER(RingCheckSingle(ring));
return TRUE;
}
return FALSE;
AVERT(Ring, ring);
return (ring->next == ring);
}