Commit | Line | Data |
---|---|---|
a22cc832 JF |
1 | struct catchfr { /* catch and errset frame */ |
2 | struct catchfr *link; /* link to next catchframe */ | |
3 | lispval flag; /* Do we print ? */ | |
4 | lispval labl; /* label caught at this point */ | |
5 | struct nament *svbnp; /* saved bnp */ | |
6 | lispval retenv[10]; /* reset environment */ | |
7 | lispval rs[4]; /* regis 6-11 and 13 */ | |
8 | lispval (*retadr)(); /* address to continue execution */ | |
9 | }; |