godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

check for total size of locals and parameters

Browse Source
This commit is contained in:
ceriel 1988-04-15 17:25:01 +00:00
parent 09ed33d12d
commit 9dbd7bdcf5
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lang/cem/cemcom/code.c
View File

@ -283,6 +283,10 @@ end_proc(fbytes)
C_beginpart(pro_id);
C_pro(pro_name, nbytes);
#endif
if (fbytes > max_int) {
error("%s has more than %ld parameter bytes",
pro_name, (long) max_int);
}
C_ms_par(fbytes); /* # bytes for formals */
if (sp_occurred[SP_SETJMP]) { /* indicate use of "setjmp" */
options['n'] = 1;
@ -294,6 +298,10 @@ end_proc(fbytes)
#endif
LocalFinish();
C_end(nbytes);
if (nbytes > max_int) {
error("%s has more than %ld bytes of local variables",
pro_name, (long) max_int);
}
options['n'] = optionsn;
}