From 240cfcd5cdda9301457867f9d26edcd0cf272b24 Mon Sep 17 00:00:00 2001 From: Quentin Carbonneaux Date: Thu, 17 Mar 2016 13:41:12 -0400 Subject: support return of structs --- lisc/util.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisc/util.c') diff --git a/lisc/util.c b/lisc/util.c index fc9884a..368a060 100644 --- a/lisc/util.c +++ b/lisc/util.c @@ -174,7 +174,7 @@ phicls(int t, Tmp *tmp /*, int c*/) } Ref -newtmp(char *prfx, Fn *fn) +newtmp(char *prfx, int k, Fn *fn) { static int n; int t; @@ -182,6 +182,7 @@ newtmp(char *prfx, Fn *fn) t = fn->ntmp++; vgrow(&fn->tmp, fn->ntmp); sprintf(fn->tmp[t].name, "%s%d", prfx, ++n); + fn->tmp[t].cls = k; fn->tmp[t].slot = -1; fn->tmp[t].nuse = +1; fn->tmp[t].ndef = +1; -- cgit 1.4.1