@@ -57,8 +57,8 @@ validMainTypes :: [ST.CanonicalType]
57validMainTypes =
57validMainTypes =
60− , varying element
60+ , signal element
61− , varying html
61+ , signal html
64 fromModule :: [String] -> String -> ST.CanonicalType
64 fromModule :: [String] -> String -> ST.CanonicalType
@@ -68,8 +68,8 @@ validMainTypes =
69 fromModule ["VirtualDom"] "Node"
69 fromModule ["VirtualDom"] "Node"
71− varying tipe =
71+ signal tipe =
72− ST.App (fromModule ["Signal"] "Varying") [ tipe ]
72+ ST.App (fromModule ["SignalTypes"] "Signal") [ tipe ]
75 let builtin name =
75 let builtin name =
@@ -103,7 +103,7 @@ badMainMessage typeOfMain =
104 [ P.text "Type Error: 'main' must have one of the following types:"
104 [ P.text "Type Error: 'main' must have one of the following types:"
105 , P.text " "
105 , P.text " "
106− , P.text " Element, Html, Varying Element, Varying Html"
106+ , P.text " Element, Html, Signal Element, Signal Html"
107 , P.text " "
107 , P.text " "
108 , P.text "Instead 'main' has type:\n"
108 , P.text "Instead 'main' has type:\n"
109 , P.nest 4 (PP.pretty typeOfMain)
109 , P.nest 4 (PP.pretty typeOfMain)