2
0
Эх сурвалжийг харах

Fixed "cyclic" handling of generic extends.

woollybah 8 жил өмнө
parent
commit
86e2183bbf
1 өөрчлөгдсөн 2 нэмэгдсэн , 0 устгасан
  1. 2 0
      decl.bmx

+ 2 - 0
decl.bmx

@@ -2649,7 +2649,9 @@ End Rem
 		'Semant superclass		
 		'Semant superclass		
 		If superTy
 		If superTy
 			'superClass=superTy.FindClass()
 			'superClass=superTy.FindClass()
+			attrs :| DECL_CYCLIC
 			superClass=superTy.SemantClass()
 			superClass=superTy.SemantClass()
+			attrs :~ DECL_CYCLIC
 			If superClass.IsInterface() Then
 			If superClass.IsInterface() Then
 				If Not IsExtern() Or Not superClass.IsExtern() Err superClass.ToString()+" is an interface, not a class."
 				If Not IsExtern() Or Not superClass.IsExtern() Err superClass.ToString()+" is an interface, not a class."
 				If (IsExtern() And Not superClass.IsExtern()) Or (superClass.IsExtern() And Not IsExtern()) Err "Extern and non extern types cannot be mixed."
 				If (IsExtern() And Not superClass.IsExtern()) Or (superClass.IsExtern() And Not IsExtern()) Err "Extern and non extern types cannot be mixed."