From 05e57594ef1cf45c2d44dd45ba268ef9df67dce3 Mon Sep 17 00:00:00 2001 From: Charles Forsyth Date: Sun, 14 May 2017 22:42:47 +0100 Subject: need to tag the cycle for later code, so move the test --- appl/cmd/limbo/types.b | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'appl/cmd') diff --git a/appl/cmd/limbo/types.b b/appl/cmd/limbo/types.b index c14ff512..2ee207b3 100644 --- a/appl/cmd/limbo/types.b +++ b/appl/cmd/limbo/types.b @@ -1774,8 +1774,8 @@ cycfield(base: ref Type, id: ref Decl) error(base.src.start, "illegal type cycle without a reference in field " +id.sym.name+" of "+stypeconv(base)); id.cycerr = byte 1; - }else if(arc & ArcCyc && oldcycles){ - if((arc & ArcArray) && id.cyc == byte 0 && !(arc & ArcPolycyc)){ + }else if(arc & ArcCyc){ + if((arc & ArcArray) && oldcycles && id.cyc == byte 0 && !(arc & ArcPolycyc)){ if(id.cycerr == byte 0) error(base.src.start, "illegal circular reference to type "+typeconv(id.ty) +" in field "+id.sym.name+" of "+stypeconv(base)); -- cgit v1.2.3