Home
last modified time | relevance | path

Searched refs:FunBind (Results 1 – 25 of 371) sorted by relevance

12345678910>>...15

/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/haskell-src-exts-1.23.1/tests/examples/
H A DExtraPrettyParentheses.hs.prettyparser.golden5FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PLit () (Negative ()) (Int () …
9FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PParen () (PLit () (Negative (…
H A DByteStringUtils.hs.prettyparser.golden5FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
9FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
H A DEmptyCase.hs.parser.golden49 [ FunBind
111 , FunBind
H A DExtraPrettyParentheses.hs.parser.golden116 , FunBind
224 , FunBind
350 , FunBind
/dports/devel/hs-hoogle/hoogle-5.0.18.2/_cabal_deps/haskell-src-exts-1.23.0/tests/examples/
H A DExtraPrettyParentheses.hs.prettyparser.golden5FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PLit () (Negative ()) (Int () …
9FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PParen () (PLit () (Negative (…
H A DByteStringUtils.hs.prettyparser.golden5FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
9FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
H A DEmptyCase.hs.parser.golden49 [ FunBind
111 , FunBind
H A DExtraPrettyParentheses.hs.parser.golden116 , FunBind
224 , FunBind
350 , FunBind
/dports/www/hs-postgrest/postgrest-8.0.0/_cabal_deps/haskell-src-exts-1.23.1/tests/examples/
H A DExtraPrettyParentheses.hs.prettyparser.golden5FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PLit () (Negative ()) (Int () …
9FunBind () [InfixMatch () (PVar () (Ident () "x")) (Symbol () "*") [PParen () (PLit () (Negative (…
H A DByteStringUtils.hs.prettyparser.golden5FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
9FunBind () [Match () (Ident () "debugForeignPtr") [PVar () (Ident () "fp"),PVar () (Ident () "n")]…
H A DEmptyCase.hs.parser.golden49 [ FunBind
111 , FunBind
H A DExtraPrettyParentheses.hs.parser.golden116 , FunBind
224 , FunBind
350 , FunBind
/dports/devel/hs-hlint/hlint-3.3.4/src/GHC/Util/
H A DHsDecl.hs22 ValD _ FunBind{fun_id} -> Just $ unLoc fun_id
34 bindName (L _ FunBind{fun_id}) = Just $ rdrNameStr fun_id
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/GHC/Util/
H A DHsDecl.hs22 ValD _ FunBind{fun_id} -> Just $ unLoc fun_id
34 bindName (L _ FunBind{fun_id}) = Just $ rdrNameStr fun_id
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/Hint/
H A DUnsafe.hs55 FunBind {fun_id=L _ (Unqual x)
72 isUnsafeDecl (ValD _ FunBind {fun_matches=MG {mg_origin=FromSource,mg_alts=L _ alts}}) =
H A DSmell.hs134 FunBind {fun_matches=MG {
144 declSpans f@(L l (ValD _ FunBind {})) = [(l, warn "Long function" f f [])]
/dports/devel/hs-hlint/hlint-3.3.4/src/Hint/
H A DUnsafe.hs55 FunBind {fun_id=L _ (Unqual x)
72 isUnsafeDecl (ValD _ FunBind {fun_matches=MG {mg_origin=FromSource,mg_alts=L _ alts}}) =
H A DSmell.hs133 FunBind {fun_matches=MG {
143 declSpans f@(L l (ValD _ FunBind {})) = [(l, warn "Long function" f f [])]
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/haskell-src-exts-1.23.1/src/Language/Haskell/Exts/
H A DParseUtils.hs822 Nothing -> return (FunBind l $
976 mergeFunBinds revDs (FunBind l' ms1@(Match _ name ps _ _:_):ds1) =
980 mergeMatches ms' (FunBind _ ms@(Match loc name' ps' _ _:_):ds) l
987 mergeMatches ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
988 mergeFunBinds revDs (FunBind l' ims1@(InfixMatch _ _ name _ _ _:_):ds1) =
991 mergeInfix ims' (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_):ds) l
994 mergeInfix ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
1005 mergeMatches ms' (ClsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
1019 mergeInfix ms' ds l = mergeClsFunBinds (ClsDecl l (FunBind l ms'):revDs) ds
1031 mergeMatches ms' (InsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
[all …]
/dports/devel/hs-hoogle/hoogle-5.0.18.2/_cabal_deps/haskell-src-exts-1.23.0/src/Language/Haskell/Exts/
H A DParseUtils.hs822 Nothing -> return (FunBind l $
976 mergeFunBinds revDs (FunBind l' ms1@(Match _ name ps _ _:_):ds1) =
980 mergeMatches ms' (FunBind _ ms@(Match loc name' ps' _ _:_):ds) l
987 mergeMatches ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
988 mergeFunBinds revDs (FunBind l' ims1@(InfixMatch _ _ name _ _ _:_):ds1) =
991 mergeInfix ims' (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_):ds) l
994 mergeInfix ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
1005 mergeMatches ms' (ClsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
1019 mergeInfix ms' ds l = mergeClsFunBinds (ClsDecl l (FunBind l ms'):revDs) ds
1031 mergeMatches ms' (InsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
[all …]
/dports/www/hs-postgrest/postgrest-8.0.0/_cabal_deps/haskell-src-exts-1.23.1/src/Language/Haskell/Exts/
H A DParseUtils.hs822 Nothing -> return (FunBind l $
976 mergeFunBinds revDs (FunBind l' ms1@(Match _ name ps _ _:_):ds1) =
980 mergeMatches ms' (FunBind _ ms@(Match loc name' ps' _ _:_):ds) l
987 mergeMatches ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
988 mergeFunBinds revDs (FunBind l' ims1@(InfixMatch _ _ name _ _ _:_):ds1) =
991 mergeInfix ims' (FunBind _ ims@(InfixMatch loc _ name' _ _ _:_):ds) l
994 mergeInfix ms' ds l = mergeFunBinds (FunBind l ms':revDs) ds
1005 mergeMatches ms' (ClsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
1019 mergeInfix ms' ds l = mergeClsFunBinds (ClsDecl l (FunBind l ms'):revDs) ds
1031 mergeMatches ms' (InsDecl _ (FunBind _ ms@(Match loc name' ps' _ _:_)):ds) l
[all …]
/dports/math/hs-Agda/Agda-2.6.2/src/full/Agda/Compiler/MAlonzo/
H A DCompiler.hs406 , HS.FunBind [HS.Match d [] (HS.UnGuardedRhs HS.unit_con) emptyBinds] ] ++
421 … , HS.FunBind [HS.Match d (vars HS.PVar np) (HS.UnGuardedRhs HS.unit_con) emptyBinds] ] ++
436 … , HS.FunBind [HS.Match d (vars HS.PVar np) (HS.UnGuardedRhs HS.unit_con) emptyBinds] ] ++
447 , HS.FunBind [HS.Match d [HS.PVar (ihname "a" 0)]
556 funbind f ps b = HS.FunBind [HS.Match f ps (HS.UnGuardedRhs b) emptyBinds]
572 mkwhere (HS.FunBind [m0, HS.Match dn ps rhs emptyBinds] : fbs@(_:_)) =
573 [HS.FunBind [m0, HS.Match dn ps rhs bindsAux]]
585 fb e = [HS.FunBind [HS.Match (unqhname "d" q) []
650 , HS.FunBind [HS.Match (unqhname "check" q) []
666 , HS.FunBind [HS.Match (unqhname "cover" q) [HS.PVar $ HS.Ident "x"]
[all …]
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/apply-refact-0.9.3.0/src/Refact/
H A DCompat.hs86 FunBind,
203 type FunBind = HsMatchContext GhcPs type
205 type FunBind = HsMatchContext RdrName type
/dports/lang/ghc/ghc-8.10.7/compiler/typecheck/
H A DTcBinds.hs556 bind_fvs (FunBind { fun_ext = fvs }) = fvs
688 (dL->L loc (FunBind { fun_id = (dL->L nm_loc name)
714 ; let bind' = FunBind { fun_id = cL nm_loc mono_id
1252 [ dL->L b_loc (FunBind { fun_id = (dL->L nm_loc name)
1278 FunBind { fun_id = cL nm_loc mono_id, function
1335 tcLhs sig_fn no_gen (FunBind { fun_id = (dL->L nm_loc name)
1425 ; return ( FunBind { fun_id = cL loc mono_id
1653 | [lbind@(dL->L _ (FunBind { fun_id = v }))] <- lbinds
1662 restricted (FunBind { fun_id = v, fun_matches = m }) = restricted_match m
1682 bindFvs (FunBind { fun_id = (dL->L _ f)
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/ghc-exactprint-0.6.4/src/Language/Haskell/GHC/ExactPrint/
H A DTransform.hs517 Just (GHC.L l (GHC.ValD _ fb@(GHC.FunBind{}))) -> do
519 Just (GHC.L l (GHC.ValD fb@(GHC.FunBind{}))) -> do
523 Just fb'@(GHC.L _ (GHC.FunBind{})) -> do
556 balanceCommentsFB (GHC.L _ (GHC.FunBind _ _ (GHC.MG _ (GHC.L _ matches) _) _)) second = do
564 balanceCommentsFB (GHC.L _ (GHC.FunBind _ _ (GHC.MG matches _ _ _) _ _ _)) second = do
1130 lhsbind (b@(GHC.L _ GHC.FunBind{}):: GHC.LHsBind GhcPs)
1178 lhsbind (GHC.L _ (GHC.FunBind _ _ (GHC.MG _ (GHC.L _ matches) _) _)) = do
1180 lhsbind (GHC.L _ (GHC.FunBind _ _ (GHC.MG _ (GHC.L _ matches) _) _ _)) = do
1182 lhsbind (GHC.L _ (GHC.FunBind _ _ (GHC.MG _ (GHC.L _ matches) _) _ _)) = do
1184 lhsbind (GHC.L _ (GHC.FunBind _ (GHC.MG (GHC.L _ matches) _ _ _) _ _ _)) = do
[all …]

12345678910>>...15