Disable smart constructor for now
This commit is contained in:
parent
2929bceaa1
commit
7f4bcf5f51
2 changed files with 16 additions and 16 deletions
|
@ -123,10 +123,10 @@ namespace Html
|
|||
TagType' : (type : String) -> {auto prf : IsValidTag type} -> Type
|
||||
TagType' type {prf} = TagType prf
|
||||
|
||||
||| Smart constructor for tags
|
||||
public export
|
||||
tag : (type : String) -> {auto prf : IsValidTag type} -> TagType prf
|
||||
tag type {prf = (PVoid type)} = Void type
|
||||
tag type {prf = (PRawText type)} = RawText type
|
||||
tag type {prf = (PEscapableRawText type)} = RawText type
|
||||
tag type {prf = (PNormal type)} = Normal type
|
||||
-- ||| Smart constructor for tags
|
||||
-- public export
|
||||
-- tag : (type : String) -> {auto prf : IsValidTag type} -> TagType prf
|
||||
-- tag type {prf = (PVoid type)} = Void type
|
||||
-- tag type {prf = (PRawText type)} = RawText type
|
||||
-- tag type {prf = (PEscapableRawText type)} = RawText type
|
||||
-- tag type {prf = (PNormal type)} = Normal type
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue