PageRenderTime 774ms queryFilters 0ms Sphinxql 40ms GetByIds 180ms meta 0ms repositoryFilters 444ms languageFilters 0ms sourceFilters 1ms

591 results for 'import UniqFM' (774 ms)

Source

Language

Repository

Stats.hs https://bitbucket.org/carter/ghc.git | Haskell | 297 lines
22import RegAlloc.Graph.Spill
23import RegAlloc.Graph.SpillCost
24import RegAlloc.Graph.TrivColorable
24import RegAlloc.Graph.TrivColorable
25import Instruction
26import RegClass
29
30import OldCmm
31import OldPprCmm()
32import Outputable
33import UniqFM
34import UniqSet
196
197binLifetimeCount :: UniqFM (VirtualReg, Int) -> UniqFM (Int, Int)
198binLifetimeCount fm
UniqFM.lhs http://picorec.googlecode.com/svn/trunk/ | Haskell | 233 lines
110-- Bindings in right argument shadow those in the left
111plusUFM		:: UniqFM elt -> UniqFM elt -> UniqFM elt
112
113plusUFM_C	:: (elt -> elt -> elt)
114		-> UniqFM elt -> UniqFM elt -> UniqFM elt
115
115
116minusUFM	:: UniqFM elt1 -> UniqFM elt2 -> UniqFM elt1
117
119intersectUFM_C	:: (elt1 -> elt2 -> elt3)
120		-> UniqFM elt1 -> UniqFM elt2 -> UniqFM elt3
121
132
133splitUFM        :: Uniquable key => UniqFM elt -> key -> (UniqFM elt, Maybe elt, UniqFM elt)
134		   -- Splits a UFM into things less than, equal to, and greater than the key
GraphOps.hs https://github.com/dorchard/ghc.git | Haskell | 665 lines
23import Outputable
24import Unique
25import UniqSet
25import UniqSet
26import UniqFM
27
28import Data.List        hiding (union)
29import Data.Maybe
30
645        => (a -> a) -> a -> k
646        -> UniqFM a -> UniqFM a
647
658        => (a -> a)
659        -> k -> UniqFM a -> UniqFM a
660
TcSMonad.lhs https://bitbucket.org/carter/ghc.git | Haskell | 1,722 lines
100
101import HscTypes
102
103import Inst
104import InstEnv 
105import FamInst 
105import FamInst 
106import FamInstEnv
107
107
108import qualified TcRnMonad as TcM
109import qualified TcMType as TcM
134import Unique 
135import UniqFM
136import Maybes ( orElse, catMaybes, firstJust )
AsmCodeGen.lhs https://bitbucket.org/carter/ghc.git | Haskell | 1,044 lines
57
58import UniqFM
59import UniqSupply
887instance Monad CmmOptM where
888  return x = CmmOptM $ \(imports, _) -> (# x,imports #)
889  (CmmOptM f) >>= g =
896addImportCmmOpt :: CLabel -> CmmOptM ()
897addImportCmmOpt lbl = CmmOptM $ \(imports, _dflags) -> (# (), lbl:imports #)
898
899instance HasDynFlags CmmOptM where
900    getDynFlags = CmmOptM $ \(imports, dflags) -> (# dflags, imports #)
901
903runCmmOpt dflags (CmmOptM f) = case f ([], dflags) of
904                        (# result, imports #) -> (result, imports)
905
Packages.lhs https://bitbucket.org/carter/ghc.git | Haskell | 1,054 lines
37
38import PackageConfig
39import DynFlags
39import DynFlags
40import Config           ( cProjectVersion )
41import Name             ( Name, nameModule_maybe )
41import Name             ( Name, nameModule_maybe )
42import UniqFM
43import Module
43import Module
44import Util
45import Panic
276    pkg {
277      importDirs  = munge_paths (importDirs pkg),
278      includeDirs = munge_paths (includeDirs pkg),
RtsTypes.hs git://github.com/ghcjs/ghcjs.git | Haskell | 822 lines
10
11import           DynFlags
12import           Encoding
12import           Encoding
13import           Id
14import           Module
14import           Module
15import           Name
16import           Outputable hiding ((<>))
16import           Outputable hiding ((<>))
17import           StgSyn
18import           Unique
18import           Unique
19import           UniqFM
20import           SrcLoc
Generator.hs git://github.com/ghcjs/ghcjs.git | Haskell | 2,380 lines
17
18import           Fingerprint
19import           ForeignCall
19import           ForeignCall
20import           CostCentre
21import           FastString
21import           FastString
22import           TysWiredIn
23import           BasicTypes
23import           BasicTypes
24import           ListSetOps
25import           PrelNames
33import           TcType
34import           UniqFM
35import           Unique
TcSMonad.lhs https://github.com/crdueck/ghc.git | Haskell | 1,709 lines
99
100import HscTypes
101
102import Inst
103import InstEnv 
104import FamInst 
104import FamInst 
105import FamInstEnv
106
106
107import qualified TcRnMonad as TcM
108import qualified TcMType as TcM
132import Unique 
133import UniqFM
134import Maybes ( orElse, catMaybes, firstJust )
AsmCodeGen.lhs https://github.com/crdueck/ghc.git | Haskell | 1,030 lines
59
60import UniqFM
61import UniqSupply
875instance Monad CmmOptM where
876  return x = CmmOptM $ \_ _ imports -> (# x, imports #)
877  (CmmOptM f) >>= g =
885    addImport = addImportCmmOpt
886    getThisModule = CmmOptM $ \_ this_mod imports -> (# this_mod, imports #)
887
888addImportCmmOpt :: CLabel -> CmmOptM ()
889addImportCmmOpt lbl = CmmOptM $ \_ _ imports -> (# (), lbl:imports #)
890
891instance HasDynFlags CmmOptM where
892    getDynFlags = CmmOptM $ \dflags _ imports -> (# dflags, imports #)
893
Packages.lhs https://github.com/crdueck/ghc.git | Haskell | 1,074 lines
37
38import PackageConfig
39import DynFlags
39import DynFlags
40import Config           ( cProjectVersion )
41import Name             ( Name, nameModule_maybe )
41import Name             ( Name, nameModule_maybe )
42import UniqFM
43import Module
43import Module
44import Util
45import Panic
276    pkg {
277      importDirs  = munge_paths (importDirs pkg),
278      includeDirs = munge_paths (includeDirs pkg),
Spill.hs https://github.com/dorchard/ghc.git | Haskell | 376 lines
9) where
10import RegAlloc.Liveness
11import Instruction
11import Instruction
12import Reg
13import Cmm hiding (RegSet)
13import Cmm hiding (RegSet)
14import BlockId
15
15
16import State
17import Unique
17import Unique
18import UniqFM
19import UniqSet
Spill.hs https://bitbucket.org/khibino/ghc-hack | Haskell | 339 lines
10where
11import RegAlloc.Liveness
12import Instruction
12import Instruction
13import Reg
14import OldCmm hiding (RegSet)
14import OldCmm hiding (RegSet)
15import BlockId
16
16
17import State
18import Unique
18import Unique
19import UniqFM
20import UniqSet
Liveness.hs git://github.com/ghc/ghc.git | Haskell | 1,005 lines
50import UniqSet
51import UniqFM
52import UniqSupply
392        slurpCompM :: [LiveBasicBlock instr]
393                   -> State (UniqFM [UniqFM Reg]) [Bag (Reg, Reg)]
394        slurpCompM blocks
404        slurpBlock :: Bool -> LiveBasicBlock instr
405                   -> State (UniqFM [UniqFM Reg]) (Bag (Reg, Reg))
406        slurpBlock propagate (BasicBlock blockId instrs)
416                -> LiveInstr instr
417                -> State (UniqFM [UniqFM Reg])          -- blockId -> [slot -> reg]
418                                                        --      for tracking slotMaps across jumps
459
460        mergeSlotMaps :: UniqFM Reg -> UniqFM Reg -> UniqFM Reg
461        mergeSlotMaps map1 map2
Liveness.hs http://picorec.googlecode.com/svn/trunk/ | Haskell | 946 lines
44import UniqSet
45import UniqFM
46import UniqSupply
385        slurpCompM :: [LiveBasicBlock instr]
386                   -> State (UniqFM [UniqFM Reg]) [Bag (Reg, Reg)]
387	slurpCompM blocks
397        slurpBlock :: Bool -> LiveBasicBlock instr
398                   -> State (UniqFM [UniqFM Reg]) (Bag (Reg, Reg))
399	slurpBlock propagate (BasicBlock blockId instrs)
409		-> LiveInstr instr
410		-> State (UniqFM [UniqFM Reg]) 		-- blockId -> [slot -> reg]
411							-- 	for tracking slotMaps across jumps
452
453	mergeSlotMaps :: UniqFM Reg -> UniqFM Reg -> UniqFM Reg
454	mergeSlotMaps map1 map2
Liveness.hs git://github.com/ilyasergey/GHC-XAppFix.git | Haskell | 950 lines
45import UniqSet
46import UniqFM
47import UniqSupply
384        slurpCompM :: [LiveBasicBlock instr]
385                   -> State (UniqFM [UniqFM Reg]) [Bag (Reg, Reg)]
386        slurpCompM blocks
396        slurpBlock :: Bool -> LiveBasicBlock instr
397                   -> State (UniqFM [UniqFM Reg]) (Bag (Reg, Reg))
398        slurpBlock propagate (BasicBlock blockId instrs)
408                -> LiveInstr instr
409                -> State (UniqFM [UniqFM Reg])          -- blockId -> [slot -> reg]
410                                                        --      for tracking slotMaps across jumps
451
452        mergeSlotMaps :: UniqFM Reg -> UniqFM Reg -> UniqFM Reg
453        mergeSlotMaps map1 map2
Coalesce.hs https://bitbucket.org/carter/ghc.git | Haskell | 95 lines
18import RegAlloc.Liveness
19import Instruction
20import Reg
21
22import OldCmm
23import Bag
24import Digraph
25import UniqFM
26import UniqSet
26import UniqSet
27import UniqSupply
28
52
53buildAlloc :: UniqFM Reg -> (Reg, Reg) -> UniqFM Reg
54buildAlloc fm (r1, r2)
Annotations.hs https://bitbucket.org/carter/ghc.git | Haskell | 107 lines
18
19import Module           ( Module )
20import Name
20import Name
21import Outputable
22import Serialized
22import Serialized
23import UniqFM
24import Unique
25
26import Data.Maybe
27import Data.Typeable
27import Data.Typeable
28import Data.Word        ( Word8 )
29
CmmSink.hs https://bitbucket.org/carter/ghc.git | Haskell | 568 lines
5
6import CodeGen.Platform (callerSaves)
7
9import CmmOpt
10import BlockId
11import CmmLive
11import CmmLive
12import CmmUtils
13import Hoopl
15import DynFlags
16import UniqFM
17import PprCmm ()
419
420addUsage :: UniqFM Int -> LocalReg -> UniqFM Int
421addUsage m r = addToUFM_C (+) m r 1
CmmRewriteAssignments.hs https://bitbucket.org/carter/ghc.git | Haskell | 631 lines
17
18import StgCmmUtils -- XXX layering violation
19
20import Cmm
21import CmmUtils
22import CmmOpt
23
24import DynFlags
25import UniqSupply
25import UniqSupply
26import UniqFM
27import Unique
27import Unique
28import BlockId
29
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21