Ver Fonte

Tweaked interface test order.

woollybah há 8 anos atrás
pai
commit
7514a3a766
1 ficheiros alterados com 5 adições e 3 exclusões
  1. 5 3
      decl.bmx

+ 5 - 3
decl.bmx

@@ -2695,9 +2695,6 @@ End Rem
 	
 	Method CheckInterface(cdecl:TClassDecl, impls:TList)
 		While cdecl
-			For Local idecl:TClassDecl = EachIn cdecl.implments
-				CheckInterface(idecl, impls)
-			Next
 		
 			For Local decl:TFuncDecl=EachIn cdecl.SemantedMethods()
 				Local found:Int
@@ -2715,6 +2712,11 @@ End Rem
 				End If
 				'EndIf
 			Next
+			
+			For Local idecl:TClassDecl = EachIn cdecl.implments
+				CheckInterface(idecl, impls)
+			Next
+
 			cdecl=cdecl.superClass
 		Wend
 	End Method