diff options
| author | Shayan-Najd <sh.najd@gmail.com> | 2018-11-22 01:23:29 +0000 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2018-11-24 12:30:21 +0200 |
| commit | 509d5be69c7507ba5d0a5f39ffd1613a59e73eea (patch) | |
| tree | b3db08f371014cbf235525843a312f67dea77354 /utils | |
| parent | ad2d7612dbdf0e928318394ec0606da3b85a8837 (diff) | |
| download | haskell-509d5be69c7507ba5d0a5f39ffd1613a59e73eea.tar.gz | |
[TTG: Handling Source Locations] Foundation and Pat
This patch removes the ping-pong style from HsPat (only, for now),
using the plan laid out at
https://ghc.haskell.org/trac/ghc/wiki/ImplementingTreesThatGrow/HandlingSourceLocations (solution
A).
- the class `HasSrcSpan`, and its functions (e.g., `cL` and `dL`), are introduced
- some instances of `HasSrcSpan` are introduced
- some constructors `L` are replaced with `cL`
- some patterns `L` are replaced with `dL->L` view pattern
- some type annotation are necessarily updated (e.g., `Pat p` --> `Pat (GhcPass p)`)
Phab diff: D5036
Trac Issues #15495
Updates haddock submodule
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/ghctags/Main.hs | 2 | ||||
| m--------- | utils/haddock | 0 |
2 files changed, 1 insertions, 1 deletions
diff --git a/utils/ghctags/Main.hs b/utils/ghctags/Main.hs index 6020f41d27..f84139fa0d 100644 --- a/utils/ghctags/Main.hs +++ b/utils/ghctags/Main.hs @@ -270,7 +270,7 @@ boundValues mod group = in vals ++ tys ++ fors where found = foundOfLName mod -startOfLocated :: Located a -> RealSrcLoc +startOfLocated :: HasSrcSpan a => a -> RealSrcLoc startOfLocated lHs = case getLoc lHs of RealSrcSpan l -> realSrcSpanStart l UnhelpfulSpan _ -> panic "startOfLocated UnhelpfulSpan" diff --git a/utils/haddock b/utils/haddock -Subproject 0b379984f7898ab0656f71f05fb0163a6a2ddb2 +Subproject 6414b46e1ac8b63cad20d662311788a80e3b29b |