sam/libqbe
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions

allow multiple functions in file

Browse source
This commit is contained in:
Quentin Carbonneaux 2015-10-08 22:02:32 -04:00
parent b5d98b762f
commit e53054c076
4 changed files with 45 additions and 44 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lisc/parse.c
View file

@ -778,12 +778,9 @@ parsedat(void cb(Dat *))
cb(&d);
}
Fn *
parse(FILE *f, void data(Dat *))
void
parse(FILE *f, void data(Dat *), void func(Fn *))
{
Fn *fn;
fn = 0;
inf = f;
lnum = 1;
thead = TXXX;
@ -791,12 +788,7 @@ parse(FILE *f, void data(Dat *))
for (;;)
switch (nextnl()) {
case TFunc:
if (fn)
/* todo, support multiple
* functions per file
*/
diag("too many functions");
fn = parsefn();
func(parsefn());
break;
case TType:
parsetyp();
@ -805,7 +797,7 @@ parse(FILE *f, void data(Dat *))
parsedat(data);
break;
case TEOF:
return fn;
return;
default:
err("top-level definition expected");
break;