File tree Expand file tree Collapse file tree 2 files changed +7
-8
lines changed Expand file tree Collapse file tree 2 files changed +7
-8
lines changed Original file line number Diff line number Diff line change 18
18
},
19
19
"dependencies" : {
20
20
"purescript-effect" : " #compiler/0.12" ,
21
- "purescript-node-buffer" : " justinwoo/purescript-node-buffer #compiler/0.12" ,
21
+ "purescript-node-buffer" : " #compiler/0.12" ,
22
22
"purescript-prelude" : " #compiler/0.12" ,
23
23
"purescript-either" : " #compiler/0.12" ,
24
24
"purescript-exceptions" : " #compiler/0.12"
Original file line number Diff line number Diff line change @@ -2,16 +2,15 @@ module Gzip where
2
2
3
3
import Prelude
4
4
5
- import Node.Stream
5
+ import Effect (Effect )
6
+ import Node.Stream (Duplex , Readable , Writable , pipe )
6
7
7
- import Effect
8
- import Effect.Console
9
8
9
+ foreign import gzip :: Effect Duplex
10
+ foreign import stdin :: Readable ()
11
+ foreign import stdout :: Writable ()
10
12
11
- foreign import gzip :: forall eff . Eff (gzip :: GZIP | eff ) (Duplex (gzip :: GZIP | eff ))
12
- foreign import stdin :: forall eff . Readable () (console :: CONSOLE | eff )
13
- foreign import stdout :: forall eff . Writable () (console :: CONSOLE | eff )
14
-
13
+ main :: Effect (Writable ())
15
14
main = do
16
15
z <- gzip
17
16
_ <- stdin `pipe` z
You can’t perform that action at this time.
0 commit comments