Find modules by icl instead of dcl, since the icl always exists

CloogleDBFactory.icl

@@ -117,7 +117,7 @@ findModules ex root lib aux base w
 | isError fps = ([], w)
 #! (Ok fps)   = fps
 #! mods       = map (\s -> let mod = basedot +++ s % (0, size s - 5) in
-	(lib, mod, aux)) $ filter included $ filter isDclModule fps
+	(lib, mod, aux)) $ filter included $ filter isIclModule fps
 #! (moremodss,w) = mapSt (findModules ex root lib aux o ((+++) basedot)) (filter isDirectory fps) w
 = (removeDupBy (\(l,m,_)->(l,m)) (mods ++ flatten moremodss), w)
 where
@@ -132,8 +132,8 @@ where
 	included :: String -> Bool
 	included s = not (any ((<>) -1 o flip indexOf (path </> s)) ex)
 
-	isDclModule :: String -> Bool
-	isDclModule s = s % (size s - 4, size s - 1) == ".dcl"
+	isIclModule :: String -> Bool
+	isIclModule s = s % (size s - 4, size s - 1) == ".icl"
 
 	isDirectory :: (String -> Bool)
 	isDirectory = not o isMember '.' o fromString