Skip to content
Snippets Groups Projects
Commit 19a86f31 authored by Keith Wansbrough's avatar Keith Wansbrough
Browse files

[project @ 1999-01-07 14:54:42 by keithw]

Add missing pattern to tidyNote.
parent 98200644
No related merge requests found
......@@ -305,6 +305,8 @@ tidyAlt env (con, vs, rhs) = (con, vs', tidyExpr env' rhs)
(env', vs') = mapAccumL tidyNestedBndr env vs
tidyNote env (Coerce t1 t2) = Coerce (tidyType env t1) (tidyType env t2)
tidyNote env note = note
\end{code}
\begin{code}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment