Non-working tag smart constructor

This commit is contained in:
Nathan McCarty 2025-02-19 00:34:00 -05:00
parent dc3c49cdf6
commit 2929bceaa1
3 changed files with 40 additions and 5 deletions

View file

@ -6,12 +6,12 @@ import Structures.Dependent.DList
helloWorld : Html "html"
helloWorld =
Normal "html" ["lang" =$ "en"] [
Normal "head" [] [
RawText "title" [] "Example"
tag "html" ["lang" =$ "en"] [
tag "head" [] [
tag "title" [] "Example"
],
Normal "body" [] [
Normal "p" [] [Text "Hello World!"]
tag "body" [] [
tag "p" [] [Text "Hello World!"]
]
]