File tree 4 files changed +13
-21
lines changed
4 files changed +13
-21
lines changed Original file line number Diff line number Diff line change 11
11
" bower_components" ,
12
12
" node_modules" ,
13
13
" output" ,
14
- " tests" ,
15
- " tmp" ,
16
14
" bower.json" ,
17
- " Gruntfile.js" ,
18
15
" package.json"
19
16
],
20
17
"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"
32
24
}
33
25
}
Original file line number Diff line number Diff line change @@ -141,7 +141,7 @@ appendTextFile :: forall eff. Encoding -> FilePath -> String -> Callback eff Uni
141
141
#### ` exists `
142
142
143
143
``` 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
145
145
```
146
146
147
147
Original file line number Diff line number Diff line change @@ -70,7 +70,7 @@ foreign import fs ::
70
70
, rmdir :: Fn2 FilePath (JSCallback Unit ) Unit
71
71
, mkdir :: Fn3 FilePath String (JSCallback Unit ) Unit
72
72
, 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
74
74
, readFile :: forall a opts . Fn3 FilePath { | opts } (JSCallback a ) Unit
75
75
, writeFile :: forall a opts . Fn4 FilePath a { | opts } (JSCallback Unit ) Unit
76
76
, appendFile :: forall a opts . Fn4 FilePath a { | opts } (JSCallback Unit ) Unit
@@ -252,8 +252,8 @@ utimes :: forall eff. FilePath
252
252
253
253
utimes file atime mtime cb = mkEff $ \_ -> runFn4
254
254
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 )
257
257
(handleCallback cb)
258
258
where
259
259
ms (Milliseconds n) = n
Original file line number Diff line number Diff line change @@ -80,7 +80,7 @@ foreign import fs ::
80
80
, rmdirSync :: Fn1 FilePath Unit
81
81
, mkdirSync :: Fn2 FilePath String Unit
82
82
, readdirSync :: Fn1 FilePath (Array FilePath )
83
- , utimesSync :: Fn3 FilePath Int Int Unit
83
+ , utimesSync :: Fn3 FilePath Number Number Unit
84
84
, readFileSync :: forall a opts . Fn2 FilePath { | opts } a
85
85
, writeFileSync :: forall a opts . Fn3 FilePath a { | opts } Unit
86
86
, appendFileSync :: forall a opts . Fn3 FilePath a { | opts } Unit
@@ -253,8 +253,8 @@ utimes :: forall eff. FilePath
253
253
254
254
utimes file atime mtime = mkEff $ \_ -> runFn3
255
255
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 )
258
258
where
259
259
ms (Milliseconds n) = n
260
260
You can’t perform that action at this time.
0 commit comments