intero 0.1.1 → 0.1.2

raw patch · 3 files changed

+12/−2 lines, 3 files

Files

• intero.cabal +1/−1
• src/GhciFind.hs +10/−1
• src/InteractiveUI.hs +1/−0

@@ -1,7 +1,7 @@ name:   intero version:-  0.1.1+  0.1.2 synopsis:   Complete interactive development program for Haskell license:

@@ -59,7 +59,8 @@                         return (Right (stripSurrounding                                          (span' :                                           map makeSrcSpan-                                              (filter ((== Just name') .+                                              (filter (fromMaybe False .+                                                       fmap (reliableNameEquality name') .                                                        fmap getName .                                                        spaninfoVar)                                                       (modinfoSpans info)))))@@ -72,6 +73,14 @@                (mkRealSrcLoc (mkFastString fp)                              el'                              (1 + ec')))++-- | Reliable equality for two names. This tests based on the start+-- line and start column and module.+--+-- We don't use standard equality. The unique can differ. Even the end+-- column can differ.+reliableNameEquality :: Name -> Name -> Bool+reliableNameEquality name1 name2 = nameSrcLoc name1 == nameSrcLoc name2  -- | Strip out spans which surrounding other spans in a parent->child -- fashion. Those are useless.

@@ -165,6 +165,7 @@   unlines [versionString           ,"Type :intro and press enter for an introduction of the standard commands."] +versionString :: [Char] versionString =   "Intero " ++   showVersion Paths_intero.version ++