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 1818 },
1919 "dependencies" : {
2020 "purescript-effect" : " #compiler/0.12" ,
21- "purescript-node-buffer" : " justinwoo/purescript-node-buffer #compiler/0.12" ,
21+ "purescript-node-buffer" : " #compiler/0.12" ,
2222 "purescript-prelude" : " #compiler/0.12" ,
2323 "purescript-either" : " #compiler/0.12" ,
2424 "purescript-exceptions" : " #compiler/0.12"
Original file line number Diff line number Diff line change @@ -2,16 +2,15 @@ module Gzip where
22
33import Prelude
44
5- import Node.Stream
5+ import Effect (Effect )
6+ import Node.Stream (Duplex , Readable , Writable , pipe )
67
7- import Effect
8- import Effect.Console
98
9+ foreign import gzip :: Effect Duplex
10+ foreign import stdin :: Readable ()
11+ foreign import stdout :: Writable ()
1012
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 ())
1514main = do
1615 z <- gzip
1716 _ <- stdin `pipe` z
You can’t perform that action at this time.
0 commit comments