Keep global track of imported modules, so we don't inadvertently load the same module twice.

decl.bmx

@@ -565,6 +565,7 @@ Type TScopeDecl Extends TDecl
 	End Method
 
 	Method FindType:TType( ident$,args:TType[] )
+'DebugLog Self.ident + "::FindType::" + ident
 		Local decl:Object=(GetDecl( ident ))
 		If decl Then
 			Local ty:TType=TType(decl)
@@ -623,7 +624,7 @@ End Rem
 	
 	Method FindFuncDecl:TFuncDecl( ident$,argExprs:TExpr[] = Null,explicit:Int=False )
 'DebugLog "FindFuncDecl : " + ident
-'If ident = "_IsRootPath" Then DebugStop
+'If ident = "OpenStream" Then DebugStop
 		'Local funcs:TFuncDeclList=TFuncDeclList( FindDecl( ident ) )
 		Local f:TDecl = TDecl(findDecl(ident))
 		If Not f Then Return Null
@@ -1685,6 +1686,8 @@ Type TAppDecl Extends TScopeDecl
 
 	Field imported:TMap=New TMap'<TModuleDecl>			'maps modpath->mdecl
 	
+	Field globalImports:TMap = New TMap
+	
 	Field mainModule:TModuleDecl
 	Field mainFunc:TFuncDecl	
 		
@@ -1723,6 +1726,10 @@ Type TAppDecl Extends TScopeDecl
 		EndIf
 	End Method
 	
+	Method IsImported:Int(modpath:String)
+		Return globalImports.Contains(modpath)
+	End Method
+	
 	Method GetDecl:Object( ident$ )
 		Local obj:Object = Super.GetDecl(ident)
 		If Not obj Then

iparser.bmx

@@ -38,6 +38,13 @@ Type TIParser
 'DebugStop	
 		Const STATE_CLASS:Int = 1
 		
+		
+		' already imported??
+		If _appInstance.IsImported(modpath)
+			' add import to the scope (so we can find decls in it later)
+			pmod.imported.Insert(modpath, _appInstance.globalImports.ValueForKey(modpath))
+			Return False
+		End If
 	
 		Local _mod:TModuleDecl = New TModuleDecl.Create(modpath, "bb" + modpath, path, attrs)
 		Select modpath
@@ -66,6 +73,8 @@ Type TIParser
 		Else
 			pmod.imported.Insert(modpath, _mod)
 		End If
+
+		_appInstance.globalImports.Insert(modpath, _mod)
 		
 		Local ipath:String