Searched refs:tcg_dus (Results 1 – 12 of 12) sorted by relevance
155 ; let new_gbl_env = gbl_env { tcg_dus = emptyDUs }162 ; traceRn "rn_bracket dec" (ppr (tcg_dus tcg_env) $$163 ppr (duUses (tcg_dus tcg_env)))164 ; return (DecBrG x group', duUses (tcg_dus tcg_env)) }
1237 ; traceRn "RUN" (ppr (tcg_dus gbl_env))1243 used_names keep = findUses (tcg_dus gbl_env) emptyNameSet `unionNameSet` keep
239 addTcgDUs tcg_env dus = tcg_env { tcg_dus = tcg_dus tcg_env `plusDU` dus }
105 mkUsedNames TcGblEnv{ tcg_dus = dus } = allUses dus
210 tcg_dus = tcg_dus tcg_env `plusDU` function
1484 , tcg_dus = tcg_dus tcg_env `plusDU` usesOnly fo_fvs } } ; function1774 tcg_dus = tcg_dus tcg_env function
486 tcg_dus :: DefUses, function
694 tcg_dus = usesOnly (availsToNameSetWithSelectors exports), function
284 tcg_dus = emptyDUs, function
489 tcg_dus :: DefUses, function
458 tcg_dus :: DefUses, function