on master help sign in
check for file changes based on exact time
764b6aaEvan Czaplicki
builder/src/Build.hs+1−1
@@ -260,7 +260,7 @@ crawlModule env@(Env _ root pkg srcDirs locals foreigns) mvar docsNeed name =
260 then crawlFile env mvar docsNeed name path =<< File.getTime path
260 then crawlFile env mvar docsNeed name path =<< File.getTime path
261 else
261 else
262 do newTime <- File.getTime path
262 do newTime <- File.getTime path
263− if oldTime < newTime || needsDocs docsNeed
263+ if oldTime /= newTime || needsDocs docsNeed
264 then crawlFile env mvar docsNeed name path newTime
264 then crawlFile env mvar docsNeed name path newTime
265 else crawlDeps env mvar deps (SCached local)
265 else crawlDeps env mvar deps (SCached local)
266
266