roc-lang/roc
1
1
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2024-09-21 15:59:20 +03:00
Code Issues Packages Projects Releases Wiki Activity

Revert examples

Browse Source
This commit is contained in:
Ayaz Hafiz 2022-11-22 12:56:11 -06:00
parent 91ceebc065
commit 629d4236e3
No known key found for this signature in database
GPG Key ID: 0E2A37416A25EF58
1 changed files with 1 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
examples/platform-switching/main.roc
View File

@ -8,17 +8,4 @@ app "rocLovesPlatforms"
imports []
provides [main] to pf
Html state : [
Element (List (Html state)),
]
translateStatic : Html _ -> Html _
translateStatic = \node ->
when node is
Element children ->
newChildren = List.map children translateStatic
Element newChildren
main = when translateStatic (Element []) is
_ -> ""
main = "Which platform am I running on now?\n"