mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 16:21:07 -08:00
Code Issues Projects Releases Wiki Activity

Stack context is saved by stack_context_save, not just by stack_context_begin.

Browse source 
Copied from Perforce
 Change: 187430
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Gareth Rees 2014-10-31 15:28:33 +00:00
parent ba98e611a4
commit d0dfea0bf6
8 changed files with 13 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

10
mps/code/ss.h
View file

@ -44,7 +44,7 @@ typedef struct StackContextStruct {
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
extern Addr *StackContextStackTop(StackContext sc);
@ -63,15 +63,15 @@ extern Res StackContextScan(ScanState ss, StackContext sc);
* See _setjmp(2). */
#define STACK_CONTEXT_SAVE(sc) BEGIN \
int _set = _setjmp((sc)->jumpBuffer); \
AVER(_set == 0); \
int _rc = _setjmp((sc)->jumpBuffer); \
AVER(_rc == 0); \
END
#else /* other platforms */
#define STACK_CONTEXT_SAVE(sc) BEGIN \
int _set = setjmp((sc)->jumpBuffer); \
AVER(_set == 0); \
int _rc = setjmp((sc)->jumpBuffer); \
AVER(_rc == 0); \
END
#endif /* platform defines */

4
mps/code/ssan.c
View file

@ -14,12 +14,12 @@ SRCID(ssan, "$Id$");
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN.
* the point when the context was saved by STACK_CONTEXT_SAVE.
*
* .assume: This assumes that the structure pointed to by sc is
* stack-allocated "above" the mutator's stack, and so its address is
* a conservative approximation to the top of the mutator's stack. The
* use of STACK_CONTEXT_BEGIN in mpsi.c assures this.
* use of STACK_CONTEXT_SAVE in mpsi.c assures this.
*/
Addr *StackContextStackTop(StackContext sc)

2
mps/code/ssw3i3mv.c
View file

@ -26,7 +26,7 @@ SRCID(ssw3i3mv, "$Id$");
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{

2
mps/code/ssw3i3pc.c
View file

@ -51,7 +51,7 @@ typedef struct __JUMP_BUFFER {
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{

2
mps/code/ssw3i6mv.c
View file

@ -33,7 +33,7 @@ SRCID(ssw3i6mv, "$Id$");
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{

2
mps/code/ssw3i6pc.c
View file

@ -73,7 +73,7 @@ typedef struct _JUMP_BUFFER {
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{

2
mps/code/ssxci3.c
View file

@ -24,7 +24,7 @@ SRCID(ssxci3, "$Id$");
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{

2
mps/code/ssxci6.c
View file

@ -24,7 +24,7 @@ SRCID(ssxci6, "$Id$");
/* StackContextStackTop -- return the "top" of the mutator's stack at
* the point when the context was saved by STACK_CONTEXT_BEGIN. */
* the point when the context was saved by STACK_CONTEXT_SAVE. */
Addr *StackContextStackTop(StackContext sc)
{