Disable smart constructor for now

This commit is contained in:
Nathan McCarty 2025-02-19 05:00:28 -05:00
parent 2929bceaa1
commit 7f4bcf5f51
2 changed files with 16 additions and 16 deletions

View file

@ -5,15 +5,15 @@ import SSG.HTML
import Structures.Dependent.DList
helloWorld : Html "html"
helloWorld =
tag "html" ["lang" =$ "en"] [
tag "head" [] [
tag "title" [] "Example"
],
tag "body" [] [
tag "p" [] [Text "Hello World!"]
]
]
-- helloWorld =
-- tag "html" ["lang" =$ "en"] [] [
-- tag "head" [] [
-- tag "title" [] "Example"
-- ],
-- tag "body" [] [
-- tag "p" [] [Text "Hello World!"]
-- ]
-- ]
main : IO ()
main = putStr $ render helloWorld