jinjor

How Elm program works

Program	.html	.js	embed	flags	port	file
Html.node	✅	✅	✅	❌	❌	✅
Browser.sandbox	✅	✅	✅	❌	❌	✅
Browser.element	✅	✅	✅	✅	✅	✅
Browser.document	✅	✅	❌	✅	✅	✅
Browser.application	✅	✅	❌	✅	✅	❌
Platform.worker	✅	✅	❌	✅	✅	✅

jinjor

module Return exposing
    ( Return
    , map
    , return
    , toTuple
    , withCommand
    , withTask
    )

import Http

jinjor

シンプルな世界を目指したい

欲しい

• TypeScript bundle (or concatenation)
• CSS bundle (or concatenation)
• ハッシュつきファイル
• PostCSS
  • autoprefixer
• minify

jinjor

Programming in Japan

Pros

• Single timezone
• Simple month names
• No plurals
• No AM and PM
• YYYY/MM/DD
• Metric units

jinjor

json = """{ "name": "tom", "age": 42 }"""

decodeString (maybe (field "age"    int  )) json        -- Ok (Just 42)
decodeString (maybe (field "name"   int  )) json        -- Ok Nothing
decodeString (maybe (field "height" float)) json        -- Ok Nothing
decodeString (maybe (field "height" float)) "null"      -- Ok Nothing
decodeString (maybe (field "height" float)) "\"hello\"" -- Ok Nothing
decodeString (maybe (field "height" float)) ""          -- Err ...

decodeString (field "age"    (maybe int  )) json        -- Ok (Just 42)

jinjor

module Tuple3 exposing (..)


get1and2 : ( a, b, c ) -> ( a, b )
get1and2 ( a, b, c ) =
    ( a, b )


get2and3 : ( a, b, c ) -> ( b, c )
get2and3 ( a, b, c ) =

jinjor

# make sure every time only one file is re-compiled

echo "time\t\tlines\timports\tfile"

for f in `find src -name *.elm`
do
  elm-make $f --output=/dev/null > /dev/null
  sleep 1
  touch $f
  a=`wc -l $f | awk '{print $1}'`

jinjor

module Util.HttpUtil exposing (..)

import Task exposing (..)
import Http exposing (..)
import Json.Decode as D exposing (Decoder)
import Json.Encode as E


encodeHeaders : List ( String, String ) -> E.Value
encodeHeaders headers =

jinjor

{
    "$schema": "http://json-schema.org/draft-04/schema#",
    "description": "A representation of a person, company, organization, or place",
    "type": "object",
    "required": ["familyName", "givenName"],
    "properties": {
        "fn": {
            "description": "Formatted Name",
            "type": "string"
        },

jinjor

module JsxParser
    exposing
        ( JSXElement
        , JSXAttribute
        , JSXAttributeValue(..)
        , JSXChild(..)
        , run
        )

{- JSX Parser