Size: a a a

Elm Lang сообщество разработчиков

2018 December 04

I

Igor in Elm Lang сообщество разработчиков
Ryner :: () -> IO ❄️
Это то я все сделал
Шо за темка?
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
Igor
Шо за темка?
dracula
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
Ryner :: () -> IO ❄️
Проблема в том, что я хз где и как триггерить
сек, запилю элли
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
фак, в 0.19 порты нельзя использовать
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
пришлось подзапариваться
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
ort module Main exposing (..)

import Html exposing (Html, p, program, text)
import Json.Decode exposing (..)


-- MAIN


main =
   program
       { init = init
       , update = update
       , view = view
       , subscriptions = subscriptions
       }



-- MODEL


type alias Model =
   String


init : ( Model, Cmd Msg )
init =
   ( "", Cmd.none )



-- UPDATE


type Msg
   = UpdateModel (Result String String)


update : Msg -> Model -> ( Model, Cmd Msg )
update msg model =
   case msg of
       UpdateModel new ->
           ( "blop", Cmd.none )



-- SUBSCRIPTIONS


decoder : Decoder String
decoder =
   string


port bleep : (Value -> msg) -> Sub msg


subscriptions : Model -> Sub Msg
subscriptions _ =
   bleep (decodeValue decoder >> UpdateModel)



-- VIEW


view : Model -> Html Msg
view model =
   text <| toString model
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
<html>
<head>
 <style>
   html {
     background: #F7F7F7;
   }
 </style>
</head>
<body>
 <script>
   var app = Elm.Main.fullscreen();  
   window.foo = function(a) {
     app.ports.bleep.send(a);
   }
 </script>
</body>
</html>
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
Ryner :: () -> IO ❄️
Проблема в том, что я хз где и как триггерить
так понятнее?
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
Anton Komissarov
так понятнее?
Дома уже попробую
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
я компилил с 0.18
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
но там всё должно быть точно так же
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
Надеюсь
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
Если оно заработает, то я наконец-то проду доделаю
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
должно, рядовой случай
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
А декодер тут не лишний?
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
можно identity поставить
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
payload  в целом лишний у порта
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
но пустое значение передавать нельзя
источник

R:

Ryner :: () -> IO ❄️ in Elm Lang сообщество разработчиков
Все, заработало, спасибо
источник

AK

Anton Komissarov in Elm Lang сообщество разработчиков
нп
источник