File tree Expand file tree Collapse file tree 2 files changed +0
-6
lines changed
Expand file tree Collapse file tree 2 files changed +0
-6
lines changed Original file line number Diff line number Diff line change @@ -131,11 +131,6 @@ def toDecl (declName : Name) : CompilerM Decl := do
131131 let value ← inlineMatchers value
132132 /- Recall that `inlineMatchers` may have exposed `ite`s and `dite`s which are tagged as `[macro_inline]`. -/
133133 let value ← macroInline value
134- /-
135- Remark: we have disabled the following transformatbion, we will perform it at phase 2, after code specialization.
136- It prevents many optimizations (e.g., "cases-of-ctor").
137- -/
138- -- let value ← applyCasesOnImplementedBy value
139134 return (type, value)
140135 let code ← toLCNF value
141136 let decl ← if let .fun decl (.return _) := code then
Original file line number Diff line number Diff line change @@ -278,7 +278,6 @@ partial def Code.toMono (code : Code) : ToMonoM Code := do
278278 else if let some info ← hasTrivialStructure? c.typeName then
279279 trivialStructToMono info c
280280 else
281- -- TODO: `casesOn` `[implemented_by]` support
282281 let type ← toMonoType c.resultType
283282 let alts ← c.alts.mapM fun alt =>
284283 match alt with
You can’t perform that action at this time.
0 commit comments