support recursive list elements references

The search for list_el invoked a recursive evaluation of the types.

1 files changed, 8 insertions, 6 deletions

diff --git a/src/resolve.cc b/src/resolve.cc
index c6f45076..e1d9dba5 100644
--- a/src/resolve.cc
+++ b/src/resolve.cc
@@ -111,12 +111,14 @@ UniqueType *TypeRef::resolveTypeList( Compiler *pd )
 	ObjectField *listEl = 0;
 	FieldList *fieldList = utValue->structEl->structDef->objectDef->fieldList;
 	for ( FieldList::Iter f = *fieldList; f.lte(); f++, off++ ) {
-		UniqueType *fUT = f->value->typeRef->resolveType( pd );
-		if ( fUT->typeId == TYPE_GENERIC && fUT->generic != 0 &&
-				fUT->generic->typeId == GEN_LIST_EL )
-		{
-			listEl = f->value;
-			break;
+		if ( f->value->type == ObjectField::GenericElementType ) {
+			UniqueType *fUT = f->value->typeRef->resolveType( pd );
+			if ( fUT->typeId == TYPE_GENERIC && fUT->generic != 0 &&
+					fUT->generic->typeId == GEN_LIST_EL )
+			{
+				listEl = f->value;
+				break;
+			}
 		}
 	}