github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-13 23:27:12 +00:00
Code Issues Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Nick Briggs 2022-07-24 21:49:39 -07:00 committed by GitHub
parent 430da79e73
commit a15de4df10
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
inc/llstkdefs.h
View File

@ -9,7 +9,7 @@ void flip_cursorbar(int n);
void blt(register DLword *dest68k, register DLword *source68k, int nw);
void stack_check(StackWord *start68k);
void walk_stack(StackWord *start68k);
void quick_stack_check(void);
int quick_stack_check(void);
void check_FX(FX *fx68k);
void check_BF(Bframe *bf68k);
int check_stack_rooms(FX *fx68k);

12
src/llstk.c
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 */

1
src/xc.c
View File

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