dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-12-24 04:12:09 +03:00
Code Issues Packages Projects Releases Wiki Activity

Generate stub.

Browse Source
This commit is contained in:
Dillon Kearns 2022-09-15 13:49:43 -07:00
parent 2d86d57800
commit 5b4754de37
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
codegen/GenerateMain.elm
View File

@ -214,7 +214,15 @@ otherFile routes phaseString =
, referenceFrom : List String -> Elm.Expression
}
getStaticRoutes =
topLevelValue "getStaticRoutes" todo
topLevelValue "getStaticRoutes"
(Gen.DataSource.combine
[]
|> Gen.DataSource.call_.map Gen.List.values_.concat
|> Elm.withType
(Gen.DataSource.annotation_.dataSource
(Type.list (Type.named [ "Route" ] "Route"))
)
)
in
Elm.file [ "Main" ]
[ Elm.alias "Model"
@ -324,6 +332,7 @@ otherFile routes phaseString =
|> Elm.declaration "main"
|> expose
, config.declaration
, getStaticRoutes.declaration
, Elm.portOutgoing "sendPageData"
(Type.record
[ ( "oldThing", Gen.Json.Encode.annotation_.value )