@@ -326,10 +326,15 @@ buildMakeActions outputDir filePathMap foreigns usePrefix =
326326
327327 getOutputTimestamp :: ModuleName -> Make (Maybe UTCTime)
328328 getOutputTimestamp mn = do
329+ dumpCoreFn <- asks optionsDumpCoreFn
329330 let filePath = T.unpack (runModuleName mn)
330331 jsFile = outputDir </> filePath </> "index.js"
331332 externsFile = outputDir </> filePath </> "externs.json"
332− min <$> getTimestamp jsFile <*> getTimestamp externsFile
333+ coreFnFile = outputDir </> filePath </> "corefn.json"
334+ min3 js exts coreFn
335+ | dumpCoreFn = min (min js exts) coreFn
336+ | otherwise = min js exts
337+ min3 <$> getTimestamp jsFile <*> getTimestamp externsFile <*> getTimestamp coreFnFile
333338
334339 readExterns :: ModuleName -> Make (FilePath, Externs)
335340 readExterns mn = do