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

bug fix: static link was not always removed

Browse Source
This commit is contained in:
ceriel
1989-11-16 14:57:15 +00:00
parent 72f667fbf9
commit e93e256512
2 changed files with 12 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lang/pc/comp/declar.g
View File

@@ -320,7 +320,8 @@ ProcedureHeading(register struct node **pnd; register struct type **ptp;)
|
/* empty */
{ *ptp =
proc_type((struct paramlist *)0, (arith) 0);
proc_type((struct paramlist *)0,
(proclevel > 1) ? pointer_size : (arith) 0);
}
]
;
@@ -383,7 +384,7 @@ FunctionHeading(register struct node **pnd; register struct type **ptp;)
struct node *fpl = NULLNODE;
struct type *tp;
struct paramlist *pr = 0;
arith nb_pars = 0;
arith nb_pars = (proclevel > 1) ? pointer_size : 0;
} :
FUNCTION
IDENT { *pnd = MkLeaf(Name, &dot);