d93de65 · elk · git.iko.soy

on master help sign in

Add Elm.Name.value NOINLINE constant

d93de65Evan Czaplicki9 years ago

src/Canonicalize/Effects.hs+1−1

@@ -190,7 +190,7 @@ primitives =

190

191isJson :: ModuleName.Canonical -> N.Name -> Bool

192isJson home name =

193− home == ModuleName.jsonEncode && name == "Value"

193+ home == ModuleName.jsonEncode && name == N.value

194

195

196isList :: ModuleName.Canonical -> N.Name -> Bool

src/Elm/Name.hs+10−1

@@ -6,7 +6,7 @@ module Elm.Name

6 , int, float, bool, char, string

7 , maybe, list, array

8 , task, router, cmd, sub

9− , shader, debug, utils, negate

9+ , shader, debug, utils, negate, value

10 )

11 where

@@ -15,6 +15,10 @@ import Prelude hiding (maybe, negate)

15import qualified Data.Text as Text

18+

19+-- NAME

20+

21+

18type Name = Text.Text

22type Name = Text.Text

@@ -105,3 +109,8 @@ utils = "Utils"

105{-# NOINLINE negate #-}

109{-# NOINLINE negate #-}

106negate :: Name

110negate :: Name

107negate = "negate"

111negate = "negate"

112+

113+

114+{-# NOINLINE value #-}

115+value :: Name

116+value = "Value"