Skip to content
Browse files

Change error message slightly

in response to Neil's suggestion on Trac #4877
  • Loading branch information...
1 parent b926bd6 commit 9fc03d37c67098ab9dfa9403ff2c94e640074a76 @simonpj simonpj committed Oct 4, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 compiler/rename/RnExpr.lhs
View
2 compiler/rename/RnExpr.lhs
@@ -147,7 +147,7 @@ rnExpr (OpApp e1 (L op_loc (HsVar op_rdr)) _ e2)
; final_e <- mkOpAppRn e1' (L op_loc op') fixity e2'
; return (final_e, fv_e1 `plusFV` fv_op `plusFV` fv_e2) }
rnExpr (OpApp _ other_op _ _)
- = failWith (vcat [ hang (ptext (sLit "Operator application with a non-variable operator:"))
+ = failWith (vcat [ hang (ptext (sLit "Infix application with a non-variable operator:"))
2 (ppr other_op)
, ptext (sLit "(Probably resulting from a Template Haskell splice)") ])

0 comments on commit 9fc03d3

Please sign in to comment.
Something went wrong with that request. Please try again.