| /dports/devel/stack/stack-2.7.3/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/lang/purescript/purescript-0.14.5/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/finance/hs-hledger/hledger-1.19/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/finance/hs-hledger-web/hledger-web-1.19/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/finance/hs-hledger-ui/hledger-ui-1.19/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/devel/hs-spago/spago-0.20.3/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/devel/hs-git-annex/git-annex-8.20210903/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/devel/hs-ghcprofview/ghcprofview-0.1.0.1/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/www/hs-postgrest/postgrest-8.0.0/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/net-im/matterhorn/matterhorn-50200.13.0/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/textproc/hs-pandoc/pandoc-2.14.2/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/textproc/hs-pandoc-crossref/pandoc-crossref-0.3.12.0/_cabal_deps/safe-0.3.19/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/textproc/cgrep/cgrep-6.6.32/_cabal_deps/safe-0.3.18/Safe/ |
| H A D | Exact.hs | 45 addNote note fun msg = error $ function
58 f 0 xs = nil xs function
59 f i (x:xs) = x `cons` f (i-1) xs function
67 f (x:xs) (y:ys) = cons x y $ f xs ys function
68 f [] [] = nil function
69 f [] _ = err "second list is longer than the first" function
77 f (x:xs) (y:ys) (z:zs) = cons x y z $ f xs ys zs function
78 f [] [] [] = nil function
110 takeExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "takeExactNote") (const… function
119 dropExactNote note i xs = withFrozenCallStack $ splitAtExact_ (addNote note "dropExactNote") id (fl… function
[all …]
|
| /dports/databases/zodb/ZODB-5.6.0/src/ZODB/ |
| H A D | transact.py | 19 def _commit(note): argument
25 def transact(f, note=None, retries=5): argument
|
| /dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ |
| H A D | cfgbuild.c | 98 rtx note; in control_flow_insn_p() local
137 count_basic_blocks (rtx f) in count_basic_blocks()
178 find_label_refs (rtx f, rtx lvl) in find_label_refs()
185 rtx note; in find_label_refs() local
416 rtx note = find_reg_note (insn, REG_EH_REGION, NULL_RTX); in make_edges() local
451 find_basic_blocks_1 (rtx f) in find_basic_blocks_1()
540 rtx note; in find_basic_blocks_1() local
590 find_basic_blocks (rtx f, int nregs ATTRIBUTE_UNUSED, in find_basic_blocks()
719 edge e, f; in compute_outgoing_frequencies() local
723 rtx note = find_reg_note (BB_END (b), REG_BR_PROB, NULL); in compute_outgoing_frequencies() local
|
| /dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ |
| H A D | cfgbuild.c | 98 rtx note; in control_flow_insn_p() local
137 count_basic_blocks (rtx f) in count_basic_blocks()
178 find_label_refs (rtx f, rtx lvl) in find_label_refs()
185 rtx note; in find_label_refs() local
416 rtx note = find_reg_note (insn, REG_EH_REGION, NULL_RTX); in make_edges() local
451 find_basic_blocks_1 (rtx f) in find_basic_blocks_1()
540 rtx note; in find_basic_blocks_1() local
590 find_basic_blocks (rtx f, int nregs ATTRIBUTE_UNUSED, in find_basic_blocks()
719 edge e, f; in compute_outgoing_frequencies() local
723 rtx note = find_reg_note (BB_END (b), REG_BR_PROB, NULL); in compute_outgoing_frequencies() local
|
| /dports/audio/libmusicxml/libmusicxml-3.18/samples/ |
| H A D | xmlfactory.cpp | 35 float f = (float)rand() / RAND_MAX; in getrandom() local
44 string note; in randomNote() local
64 static TElement measure (musicxmlfactory* f, int n) { in measure()
69 TElement note = 0; in measure() local
88 static TElement dynamic (musicxmlfactory* f, int type) { in dynamic()
96 static TElement lastmeasure (musicxmlfactory* f, int n) { in lastmeasure()
132 musicxmlfactory* f = factoryOpen(); in main() local
|
| /dports/lang/purescript/purescript-0.14.5/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/finance/hs-hledger-ui/hledger-ui-1.19/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/finance/hs-hledger-web/hledger-web-1.19/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/finance/hs-hledger/hledger-1.19/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/devel/hs-spago/spago-0.20.3/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|
| /dports/devel/hs-git-annex/git-annex-8.20210903/_cabal_deps/safe-0.3.19/ |
| H A D | Safe.hs | 89 where f 0 (x:xs) = Right x function
90 f i (x:xs) = f (i-1) xs function
91 f i [] = Left $ "index too large, index=" ++ show o ++ ", length=" ++ show (o-i) function
113 tailNote note x = withFrozenCallStack $ fromNote note "tailNote []" $ tailMay x function
129 initNote note x = withFrozenCallStack $ fromNote note "initNote []" $ initMay x function
145 headNote note x = withFrozenCallStack $ fromNote note "headNote []" $ headMay x function
146 lastNote note x = withFrozenCallStack $ fromNote note "lastNote []" $ lastMay x function
223 cycleNote note x = withFrozenCallStack $ fromNote note "cycleNote []" $ cycleMay x function
234 assertNote note True val = val function
249 atNote note f x = withFrozenCallStack $ fromNoteEither note "atNote" $ at_ f x function
[all …]
|