ngws
/
mad
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Force early evaluation

This commit is contained in:
Niels G. W. Serup 2024-10-05 23:42:40 +02:00
parent 9c912d2457
commit 152f988363
No known key found for this signature in database
GPG Key ID: 38EEEBCE67324F19
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
byg/src/DependencyGenerator.hs
View File

@ -279,4 +279,6 @@ hasExtension exts filename = do
ext `elemOf` exts ext `elemOf` exts
copyTo :: (TokenableTo FilePath a, TokenableTo FilePath b) => a -> b -> DepGenM () copyTo :: (TokenableTo FilePath a, TokenableTo FilePath b) => a -> b -> DepGenM ()
copyTo path targetDir = copyFile path (joinPaths targetDir path) copyTo path targetDir = do
pathToken <- toToken path
copyFile pathToken (joinPaths targetDir pathToken)