File tree Expand file tree Collapse file tree 4 files changed +13
-21
lines changed Expand file tree Collapse file tree 4 files changed +13
-21
lines changed Original file line number Diff line number Diff line change 1111 " bower_components" ,
1212 " node_modules" ,
1313 " output" ,
14- " tests" ,
15- " tmp" ,
1614 " bower.json" ,
17- " Gruntfile.js" ,
1815 " package.json"
1916 ],
2017 "dependencies" : {
21- "purescript-either" : " ~0.2.0" ,
22- "purescript-maybe" : " ~0.3.0" ,
23- "purescript-foreign" : " ~0.5.0" ,
24- "purescript-node-buffer" : " ~0.1.0" ,
25- "purescript-node-path" : " ~0.4.0-rc.1" ,
26- "purescript-datetime" : " ~0.6.0" ,
27- "purescript-exceptions" : " ~0.3.0" ,
28- "purescript-strings" : " ~0.5.0" ,
29- "purescript-globals" : " ~0.2.0" ,
30- "purescript-integers" : " ~0.2.0" ,
31- "purescript-unsafe-coerce" : " ~0.1.0"
18+ "purescript-datetime" : " ^0.9.0" ,
19+ "purescript-exceptions" : " ^0.3.0" ,
20+ "purescript-foreign" : " ^0.7.0" ,
21+ "purescript-node-buffer" : " ^0.1.0" ,
22+ "purescript-node-path" : " ^0.4.0-rc.1" ,
23+ "purescript-unsafe-coerce" : " ^0.1.0"
3224 }
3325}
Original file line number Diff line number Diff line change @@ -141,7 +141,7 @@ appendTextFile :: forall eff. Encoding -> FilePath -> String -> Callback eff Uni
141141#### ` exists `
142142
143143``` purescript
144- exists :: forall eff. FilePath -> (Boolean -> Eff eff Unit) -> Eff (fs :: FS | eff) Unit
144+ exists :: forall eff. FilePath -> (Boolean -> Eff (fs :: FS | eff) Unit) -> Eff (fs :: FS | eff) Unit
145145```
146146
147147
Original file line number Diff line number Diff line change @@ -70,7 +70,7 @@ foreign import fs ::
7070 , rmdir :: Fn2 FilePath (JSCallback Unit ) Unit
7171 , mkdir :: Fn3 FilePath String (JSCallback Unit ) Unit
7272 , readdir :: Fn2 FilePath (JSCallback (Array FilePath )) Unit
73- , utimes :: Fn4 FilePath Int Int (JSCallback Unit ) Unit
73+ , utimes :: Fn4 FilePath Number Number (JSCallback Unit ) Unit
7474 , readFile :: forall a opts . Fn3 FilePath { | opts } (JSCallback a ) Unit
7575 , writeFile :: forall a opts . Fn4 FilePath a { | opts } (JSCallback Unit ) Unit
7676 , appendFile :: forall a opts . Fn4 FilePath a { | opts } (JSCallback Unit ) Unit
@@ -252,8 +252,8 @@ utimes :: forall eff. FilePath
252252
253253utimes file atime mtime cb = mkEff $ \_ -> runFn4
254254 fs.utimes file
255- (ms (toEpochMilliseconds atime) / 1000 )
256- (ms (toEpochMilliseconds mtime) / 1000 )
255+ (ms (toEpochMilliseconds atime) / 1000.0 )
256+ (ms (toEpochMilliseconds mtime) / 1000.0 )
257257 (handleCallback cb)
258258 where
259259 ms (Milliseconds n) = n
Original file line number Diff line number Diff line change @@ -80,7 +80,7 @@ foreign import fs ::
8080 , rmdirSync :: Fn1 FilePath Unit
8181 , mkdirSync :: Fn2 FilePath String Unit
8282 , readdirSync :: Fn1 FilePath (Array FilePath )
83- , utimesSync :: Fn3 FilePath Int Int Unit
83+ , utimesSync :: Fn3 FilePath Number Number Unit
8484 , readFileSync :: forall a opts . Fn2 FilePath { | opts } a
8585 , writeFileSync :: forall a opts . Fn3 FilePath a { | opts } Unit
8686 , appendFileSync :: forall a opts . Fn3 FilePath a { | opts } Unit
@@ -253,8 +253,8 @@ utimes :: forall eff. FilePath
253253
254254utimes file atime mtime = mkEff $ \_ -> runFn3
255255 fs.utimesSync file
256- (ms (toEpochMilliseconds atime) / 1000 )
257- (ms (toEpochMilliseconds mtime) / 1000 )
256+ (ms (toEpochMilliseconds atime) / 1000.0 )
257+ (ms (toEpochMilliseconds mtime) / 1000.0 )
258258 where
259259 ms (Milliseconds n) = n
260260
You can’t perform that action at this time.
0 commit comments