diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/elaborate.sml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/elaborate.sml b/src/elaborate.sml index 61a0b1c0..ed2e0d78 100644 --- a/src/elaborate.sml +++ b/src/elaborate.sml @@ -1751,6 +1751,7 @@ fun findHead e e' = case e of L'.ENamed _ => true | L'.EModProj _ => true + | L'.ERel _ => true | L'.EApp (e, _) => findHead' e | L'.ECApp (e, _) => findHead' e | L'.EKApp (e, _) => findHead' e |