| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/Hint/ |
| H A D | Unsafe.hs | 56 … , fun_matches=MG{mg_origin=FromSource,mg_alts=L _ [L _ Match {m_pats=[]}]}}) <- [d]
72 isUnsafeDecl (ValD _ FunBind {fun_matches=MG {mg_origin=FromSource,mg_alts=L _ alts}}) =
|
| H A D | ListRec.hs | 137 , mg_alts=L _ [
158 MG{mg_origin=FromSource, mg_alts=
177 matchGroup e = MG{mg_alts=noLoc [noLoc $ match e], mg_origin=Generated, ..} -- Match group.
|
| H A D | Smell.hs | 136 , mg_alts=(L _ [L _ Match {
|
| H A D | Lambda.hs | 138 MG {mg_alts =
274 { mg_alts = noLoc function
|
| /dports/devel/hs-hlint/hlint-3.3.4/src/Hint/ |
| H A D | Unsafe.hs | 56 … , fun_matches=MG{mg_origin=FromSource,mg_alts=L _ [L _ Match {m_pats=[]}]}}) <- [d]
72 isUnsafeDecl (ValD _ FunBind {fun_matches=MG {mg_origin=FromSource,mg_alts=L _ alts}}) =
|
| H A D | ListRec.hs | 137 , mg_alts=L _ [
158 MG{mg_origin=FromSource, mg_alts=
177 matchGroup e = MG{mg_alts=noLoc [noLoc $ match e], mg_origin=Generated, ..} -- Match group.
|
| H A D | Lambda.hs | 148 MG {mg_alts =
283 { mg_alts = noLoc function
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/plugins/hls-tactics-plugin/src/Wingman/ |
| H A D | EmptyCase.hs | 122 pure $ Just $ L span $ HsCase ext scrut $ mg { mg_alts = l }
124 pure $ Just $ L span $ HsLamCase ext $ mg { mg_alts = l }
|
| H A D | GHC.hs | 225 (MG {mg_alts = L _ [L _ (AMatch _ pats body) ]})
262 (MG {mg_alts = L _ (fmap unLoc -> unpackMatches -> Just matches)})
269 (MG {mg_alts = L _ (fmap unLoc -> unpackMatches -> Just matches)})
|
| H A D | Simplify.hs | 22 (MG {mg_alts = L _ [L _
|
| /dports/devel/hs-hls-install/haskell-language-server-1.4.0/plugins/hls-tactics-plugin/src/Wingman/ |
| H A D | EmptyCase.hs | 122 pure $ Just $ L span $ HsCase ext scrut $ mg { mg_alts = l }
124 pure $ Just $ L span $ HsLamCase ext $ mg { mg_alts = l }
|
| H A D | GHC.hs | 225 (MG {mg_alts = L _ [L _ (AMatch _ pats body) ]})
262 (MG {mg_alts = L _ (fmap unLoc -> unpackMatches -> Just matches)})
269 (MG {mg_alts = L _ (fmap unLoc -> unpackMatches -> Just matches)})
|
| H A D | Simplify.hs | 22 (MG {mg_alts = L _ [L _
|
| /dports/devel/hs-hlint/hlint-3.3.4/src/GHC/Util/ |
| H A D | FreeVars.hs | 102 freeVars (L _ (HsLamCase _ MG{mg_alts=(L _ ms)})) = free (allVars ms) -- Lambda case
103 …freeVars (L _ (HsCase _ of_ MG{mg_alts=(L _ ms)})) = freeVars of_ ^+ free (allVars ms) -- Case exp…
209 …allVars (L _ FunBind{fun_id=n, fun_matches=MG{mg_alts=(L _ ms)}}) = allVars (noLoc $ VarPat noExtF…
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/GHC/Util/ |
| H A D | FreeVars.hs | 103 freeVars (L _ (HsLamCase _ MG{mg_alts=(L _ ms)})) = free (allVars ms) -- Lambda case
104 …freeVars (L _ (HsCase _ of_ MG{mg_alts=(L _ ms)})) = freeVars of_ ^+ free (allVars ms) -- Case exp…
216 …allVars (L _ FunBind{fun_id=n, fun_matches=MG{mg_alts=(L _ ms)}}) = allVars (noLoc $ VarPat noExtF…
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/retrie-0.1.1.1/Retrie/ |
| H A D | Expr.hs | 97 m' <- case unLoc $ mg_alts mg of
101 cloneT $ noLoc $ HsLam mg { mg_alts = noLoc [m'] }
103 cloneT $ noLoc $ HsLam noExtField mg { mg_alts = noLoc [m'] }
|
| /dports/lang/ghc/ghc-8.10.7/compiler/typecheck/ |
| H A D | TcPatSyn.hs | 731 MG{ mg_alts = cL (getLoc lpat) cases
737 MG{ mg_alts = noLoc [mkSimpleMatch LambdaExpr
747 mg = MG{ mg_alts = cL (getLoc match) [match]
880 add_dummy_arg mg@(MG { mg_alts =
883 = mg { mg_alts = cL l [cL loc (match { m_pats = nlWildPatName : pats })] }
|
| H A D | TcMatches.hs | 106 | [L _ match] <- unLoc $ mg_alts matches
213 tcMatches ctxt pat_tys rhs_ty (MG { mg_alts = L l matches
221 ; return (MG { mg_alts = L l matches'
1094 checkArgs _ (MG { mg_alts = L _ [] })
1096 checkArgs fun (MG { mg_alts = L _ (match1:matches) })
|
| H A D | TcArrows.hs | 246 (HsCmdLam x (MG { mg_alts = L l [L mtch_loc
262 cmd' = HsCmdLam x (MG { mg_alts = L l [match']
|
| /dports/devel/hs-hls-install/haskell-language-server-1.4.0/ghcide/src/Development/IDE/GHC/ |
| H A D | ExactPrint.hs | 487 { fun_matches = mg@MG { mg_alts = L alt_src alts@(_:_)}
490 ValD ext fb { fun_matches = mg { mg_alts = L alt_src matches }}
496 (ann, L _ (ValD _ FunBind { fun_matches = MG { mg_alts = L _ [alt']}}))
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/ghcide/src/Development/IDE/GHC/ |
| H A D | ExactPrint.hs | 487 { fun_matches = mg@MG { mg_alts = L alt_src alts@(_:_)}
490 ValD ext fb { fun_matches = mg { mg_alts = L alt_src matches }}
496 (ann, L _ (ValD _ FunBind { fun_matches = MG { mg_alts = L _ [alt']}}))
|
| /dports/devel/hs-hlint/hlint-3.3.4/src/Config/ |
| H A D | Compute.hs | 60 findExp name vs (HsLam _ MG{mg_alts=L _ [L _ Match{m_pats, m_grhss=GRHSs{grhssGRHSs=[L _ (GRHS _ []…
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/Config/ |
| H A D | Compute.hs | 60 findExp name vs (HsLam _ MG{mg_alts=L _ [L _ Match{m_pats, m_grhss=GRHSs{grhssGRHSs=[L _ (GRHS _ []…
|
| /dports/devel/hs-hls-install/haskell-language-server-1.4.0/plugins/hls-tactics-plugin/src/Wingman/AbstractLSP/ |
| H A D | TacticActions.hs | 160 ValD _ (FunBind { fun_matches = MG { mg_alts = L _ alts@(first_match : _)}
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/plugins/hls-tactics-plugin/src/Wingman/AbstractLSP/ |
| H A D | TacticActions.hs | 160 ValD _ (FunBind { fun_matches = MG { mg_alts = L _ alts@(first_match : _)}
|