1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-27 12:22:24 +00:00

quick_stack_check() should return a result indicating status (#432)

This commit is contained in:
Nick Briggs
2022-07-24 21:49:39 -07:00
committed by GitHub
parent 430da79e73
commit a15de4df10
3 changed files with 8 additions and 7 deletions

View File

@@ -829,7 +829,7 @@ void walk_stack(StackWord *start68k) {
for DEBUGING using FNSTKCHECK
*/
/**************************************************************/
void quick_stack_check(void) {
int quick_stack_check(void) {
StackWord *start68k;
StackWord *scanptr68k;
StackWord *endstack68k;
@@ -849,7 +849,7 @@ void quick_stack_check(void) {
WARN("CURRENTFX >= CurrentStackPTR??\n",
printf("CURRENTFX=0x%x,CurrentStackPTR=0x%x\n", LADDR_from_68k(CURRENTFX),
LADDR_from_68k(CurrentStackPTR)));
return;
return(1);
}
setflg = T;
save_nextblock = CURRENTFX->nextblock;
@@ -871,7 +871,7 @@ void quick_stack_check(void) {
freesize = FSB_size(scanptr68k);
if (freesize == 0) {
warn("FSB freesize = 0!");
return;
return(1);
}
#ifdef FSBCHECK
if (freesize > STACKAREA_SIZE + MINEXTRASTACKWORDS) {
@@ -888,7 +888,7 @@ void quick_stack_check(void) {
freesize = FSB_size(scanptr68k);
if (freesize == 0) {
warn("Guard block freesize = 0!");
return;
return(1);
}
scanptr68k = (StackWord *)((DLword *)scanptr68k + freesize);
break;
@@ -902,7 +902,7 @@ void quick_stack_check(void) {
if (STKWORD(scanptr68k)->flags != STK_NOTFLG) {
warn("StackCheck:!=STK_NOTFLG");
printf("content:0x%x\n", GETWORD(scanptr68k));
return;
return(1);
}
scanptr68k = (StackWord *)((DLword *)scanptr68k + DLWORDSPER_CELL);
} /* while end */;
@@ -941,7 +941,7 @@ void quick_stack_check(void) {
GETWORD(CurrentStackPTR + 2) = savestack1;
GETWORD(CurrentStackPTR + 3) = savestack2;
}
return;
return(0);
} /* quick_stack_check end */

View File

@@ -50,6 +50,7 @@
#include "arith.h"
#include "stream.h"
#include "testtooldefs.h"
#include "tos1defs.h"
#include "tosret.h"
#include "tosfns.h"