Do the same for inductives
parent
e5ff71991d
commit
d3d67c1d92
|
@ -22,8 +22,8 @@ def ctorToHtml (c : Process.NameInfo) : HtmlM Html := do
|
|||
let renderedDoc ← docStringToHtml doc
|
||||
pure
|
||||
<li class="constructor" id={name}>
|
||||
<div class="inductive_ctor_doc">[renderedDoc]</div>
|
||||
{shortName} : [← infoFormatToHtml c.type]
|
||||
<div class="inductive_ctor_doc">[renderedDoc]</div>
|
||||
</li>
|
||||
else
|
||||
pure
|
||||
|
|
Loading…
Reference in New Issue