on master help sign in
Rename JavaScript.Ports to JavaScript.Foreign
commitb35ab452c9b8e8bf8065ef4a0685e7bc7e17d8db authorEvan Czaplicki <info@elm-lang.org> dateFri 27 Feb 2015, 15:57 (12 years ago) parent69a4366
3 files changed+5−5
elm-compiler.cabal+1−1 src/Generate/JavaScript.hs+3−3 src/Generate/JavaScript/Ports.hs → src/Generate/JavaScript/Foreign.hs+1−1
elm-compiler.cabal+1−1
@@ -63,8 +63,8 @@ Library
6363 Elm.Compiler.Type.Extract,
6464 Elm.Compiler.Version,
6565 Generate.JavaScript,
66+ Generate.JavaScript.Foreign,
6667 Generate.JavaScript.Helpers,
67− Generate.JavaScript.Ports,
6868 Generate.JavaScript.Variable,
6969 Generate.Cases,
7070 Transform.AddDefaultImports,
src/Generate/JavaScript.hs+3−3
@@ -11,7 +11,7 @@ import Language.ECMAScript3.Syntax
1111
1212import Generate.JavaScript.Helpers as Help
1313import qualified Generate.Cases as Case
14−import qualified Generate.JavaScript.Ports as Port
14+import qualified Generate.JavaScript.Foreign as Foreign
1515import qualified Generate.JavaScript.Variable as Var
1616
1717import AST.Annotation
@@ -206,12 +206,12 @@ expression (A region expr) =
206206
207207 PortIn name tipe ->
208208 return $ obj ["_P","portIn"] `call`
209− [ string name, Port.incoming tipe ]
209+ [ string name, Foreign.incoming tipe ]
210210
211211 PortOut name tipe value ->
212212 do value' <- expression value
213213 return $ obj ["_P","portOut"] `call`
214− [ string name, Port.outgoing tipe, value' ]
214+ [ string name, Foreign.outgoing tipe, value' ]
215215
216216
217217definition :: Canonical.Def -> State Int [Statement ()]
src/Generate/JavaScript/Ports.hs → src/Generate/JavaScript/Foreign.hsrenamed+1−1
@@ -1,4 +1,4 @@
1−module Generate.JavaScript.Ports (incoming, outgoing) where
1+module Generate.JavaScript.Foreign (incoming, outgoing) where
22
33import qualified Data.List as List
44import Generate.JavaScript.Helpers