mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-04-07 06:41:00 -07:00
25 lines
619 B
C
25 lines
619 B
C
/* impl.c.span: ANSI STACK PROBE
|
|
*
|
|
* $HopeName: MMsrc!span.c(trunk.1) $
|
|
* Copyright (C) 1997 Harlequin Limited. All rights reserved.
|
|
*
|
|
* PURPOSE
|
|
*
|
|
* .purpose: The purpose of the ANSI Stack Probe is to provide a
|
|
* non-functional implementation of the Stack Probe interface.
|
|
* Stack Probe has a function implementation on platforms where the
|
|
* MPS takes some special action to avoid stack overflow.
|
|
*/
|
|
|
|
#include "mpm.h"
|
|
|
|
SRCID(span, "$HopeName: MMsrc!span.c(trunk.1) $");
|
|
|
|
|
|
/* StackProbe -- probe above the stack to provoke early stack overflow */
|
|
|
|
void StackProbe(Word depth)
|
|
{
|
|
AVER(depth == 0);
|
|
NOOP;
|
|
}
|