style change.

This commit is contained in:
Kazu Yamamoto 2014-04-11 11:15:59 +09:00
parent ba4a1b9688
commit 54bea65736
1 changed files with 1 additions and 1 deletions

View File

@ -121,7 +121,7 @@ typeOf opt cradle file modstr lineNo colNo =
cmp a b
| a `G.isSubspanOf` b = O.LT
| b `G.isSubspanOf` a = O.GT
| otherwise = O.EQ
| otherwise = O.EQ
errmsg = convert opt ([] :: [((Int,Int,Int,Int),String)])