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

Some minor mods and a bug fix with type transfer functions

Browse Source
This commit is contained in:
ceriel
1987-09-24 13:07:31 +00:00
parent e30234fce8
commit c5674041bf
15 changed files with 107 additions and 95 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lang/m2/comp/tmpvar.C
View File

@@ -39,11 +39,11 @@ struct tmpvar {
static struct tmpvar *TmpInts, /* for integer temporaries */
*TmpPtrs; /* for pointer temporaries */
static struct scope *ProcScope; /* scope of procedure in which the
static t_scope *ProcScope; /* scope of procedure in which the
temporaries are allocated
*/
TmpOpen(sc) struct scope *sc;
TmpOpen(sc) t_scope *sc;
{
/* Initialize for temporaries in scope "sc".
*/
@@ -54,7 +54,7 @@ arith
TmpSpace(sz, al)
arith sz;
{
register struct scope *sc = ProcScope;
register t_scope *sc = ProcScope;
sc->sc_off = - WA(align(sz - sc->sc_off, al));
return sc->sc_off;