Comments only

56a8c8a6 · Simon Peyton Jones · 65e6470c · 56a8c8a6
Commit 56a8c8a6 authored Oct 04, 2012 by Simon Peyton Jones
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

compiler/deSugar/MatchLit.lhs compiler/deSugar/MatchLit.lhs +1 -1

No files found.
--- a/compiler/deSugar/MatchLit.lhs
+++ b/compiler/deSugar/MatchLit.lhs
@@ -107,7 +107,7 @@ dsOverLit' dflags (OverLit { ol_val = val, ol_rebindable = rebindable
                           , ol_witness = witness, ol_type = ty })
  | not rebindable
  , Just expr <- shortCutLit dflags val ty = dsExpr expr	-- Note [Literal short cut]
-  | otherwise			    = dsExpr witness
+  | otherwise	                           = dsExpr witness
 \end{code}

 Note [Literal short cut]