/dports/lang/ghc/ghc-8.10.7/rts/ |
H A D | RtsFlags.c | 37 RTS_FLAGS RtsFlags; variable 151 RtsFlags.GcFlags.nurseryChunkSize = 0; in initRtsFlagsDefaults() 158 RtsFlags.GcFlags.oldGenFactor = 2; in initRtsFlagsDefaults() 161 RtsFlags.GcFlags.generations = 2; in initRtsFlagsDefaults() 1733 RtsFlags.GcFlags.maxHeapSize) { in normaliseRtsOpts() 1734 RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; in normaliseRtsOpts() 1739 RtsFlags.GcFlags.maxHeapSize) { in normaliseRtsOpts() 1741 RtsFlags.GcFlags.minAllocAreaSize = RtsFlags.GcFlags.maxHeapSize; in normaliseRtsOpts() 1770 if (RtsFlags.GcFlags.useNonmoving && RtsFlags.GcFlags.generations == 1) { in normaliseRtsOpts() 1779 if (RtsFlags.GcFlags.compact && RtsFlags.GcFlags.useNonmoving) { in normaliseRtsOpts() [all …]
|
H A D | Timer.c | 57 if (RtsFlags.ConcFlags.ctxtSwitchTicks > 0 in handle_tick() 76 idle_ticks_to_gc = RtsFlags.GcFlags.idleGCDelayTime / in handle_tick() 77 RtsFlags.MiscFlags.tickInterval; in handle_tick() 81 if (RtsFlags.GcFlags.doIdleGC) { in handle_tick() 97 if (!(RtsFlags.ProfFlags.doHeapProfile in handle_tick() 98 || RtsFlags.CcFlags.doCostCentres)) { in handle_tick() 119 if (RtsFlags.MiscFlags.tickInterval != 0) { in initTimer() 120 initTicker(RtsFlags.MiscFlags.tickInterval, handle_tick); in initTimer() 129 if (RtsFlags.MiscFlags.tickInterval != 0) { in startTimer() 139 if (RtsFlags.MiscFlags.tickInterval != 0) { in stopTimer() [all …]
|
H A D | Trace.c | 55 RtsFlags.TraceFlags.scheduler || in initTracing() 56 RtsFlags.DebugFlags.scheduler; in initTracing() 60 RtsFlags.TraceFlags.gc || in initTracing() 61 RtsFlags.DebugFlags.gc || in initTracing() 62 RtsFlags.DebugFlags.scheduler; in initTracing() 68 RtsFlags.TraceFlags.nonmoving_gc; in initTracing() 71 RtsFlags.TraceFlags.sparks_sampled; in initTracing() 75 RtsFlags.TraceFlags.sparks_full || in initTracing() 76 RtsFlags.DebugFlags.sparks; in initTracing() 79 RtsFlags.TraceFlags.user; in initTracing() [all …]
|
H A D | ProfHeap.c | 119 switch (RtsFlags.ProfFlags.doHeapProfile) { in closureIdentity() 170 || RtsFlags.ProfFlags.bioSelector != NULL); in doingLDVProfiling() 365 if (! RtsFlags.ProfFlags.doHeapProfile) { in initHeapProfiling() 384 if (RtsFlags.ProfFlags.doHeapProfile) { in initHeapProfiling() 393 RtsFlags.ProfFlags.doHeapProfile = 0; in initHeapProfiling() 480 if (! RtsFlags.ProfFlags.doHeapProfile) { in endHeapProfiling() 627 if (RtsFlags.ProfFlags.descrSelector) { in closureSatisfiesConstraints() 632 if (RtsFlags.ProfFlags.typeSelector) { in closureSatisfiesConstraints() 637 if (RtsFlags.ProfFlags.retainerSelector) { in closureSatisfiesConstraints() 852 switch (RtsFlags.ProfFlags.doHeapProfile) { in dumpCensus() [all …]
|
H A D | Stats.c | 418 RtsFlags.GcFlags.giveStats != NO_GC_STATS || in stat_startGCWorker() 430 RtsFlags.GcFlags.giveStats != NO_GC_STATS || in stat_endGCWorker() 442 if (RtsFlags.GcFlags.ringBell) { in stat_startGC() 447 RtsFlags.GcFlags.giveStats != NO_GC_STATS || in stat_startGC() 464 if (RtsFlags.GcFlags.giveStats != NO_GC_STATS) in stat_startGC() 883 if (RtsFlags.GcFlags.useNonmoving) { in report_summary() 934 if (RtsFlags.GcFlags.useNonmoving) { in report_summary() 973 if (RtsFlags.MiscFlags.internalCounters) { in report_summary() 1741 FILE *sf = RtsFlags.GcFlags.statsFile; in statsPrintf() 1756 FILE *sf = RtsFlags.GcFlags.statsFile; in statsFlush() [all …]
|
H A D | Proftimer.c | 54 if (RtsFlags.ProfFlags.doHeapProfile && in startHeapProfTimer() 55 RtsFlags.ProfFlags.heapProfileIntervalTicks > 0) { in startHeapProfTimer() 65 ticks_to_heap_profile = RtsFlags.ProfFlags.heapProfileIntervalTicks; in initProfTimer() 89 ticks_to_heap_profile = RtsFlags.ProfFlags.heapProfileIntervalTicks; in handleProfTick()
|
H A D | Profiling.c | 200 if (RtsFlags.CcFlags.doCostCentres) { in initProfiling() 250 if (RtsFlags.CcFlags.outputFileNameStem) { in initProfilingLogFile() 251 stem = RtsFlags.CcFlags.outputFileNameStem; in initProfilingLogFile() 285 RtsFlags.CcFlags.doCostCentres = 0; in initProfilingLogFile() 289 RtsFlags.ProfFlags.doHeapProfile = 0; in initProfilingLogFile() 306 if (RtsFlags.CcFlags.doCostCentres) { in endProfiling() 467 if (RtsFlags.ProfFlags.modSelector) { in ccsSetSelected() 474 if (RtsFlags.ProfFlags.ccSelector) { in ccsSetSelected() 481 if (RtsFlags.ProfFlags.ccsSelector) { in ccsSetSelected() 727 if (RtsFlags.CcFlags.doCostCentres == 0) return; in reportCCSProfiling() [all …]
|
H A D | Trace.h | 50 #define DEBUG_interp RtsFlags.DebugFlags.interp 51 #define DEBUG_weak RtsFlags.DebugFlags.weak 52 #define DEBUG_gccafs RtsFlags.DebugFlags.gccafs 53 #define DEBUG_gc RtsFlags.DebugFlags.gc 55 #define DEBUG_block_alloc RtsFlags.DebugFlags.alloc 56 #define DEBUG_sanity RtsFlags.DebugFlags.sanity 59 #define DEBUG_stm RtsFlags.DebugFlags.stm 60 #define DEBUG_prof RtsFlags.DebugFlags.prof 61 #define DEBUG_gran RtsFlags.DebugFlags.gran 62 #define DEBUG_par RtsFlags.DebugFlags.par [all …]
|
H A D | RtsStartup.c | 327 if (RtsFlags.MiscFlags.install_signal_handlers) { in hs_init_ghc() 416 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in hs_exit_() 421 if (RtsFlags.MiscFlags.install_signal_handlers) { in hs_exit_() 441 if (RtsFlags.MiscFlags.install_signal_handlers) { in hs_exit_() 511 if (RtsFlags.TickyFlags.showTickyStats) PrintTickyInfo(); in hs_exit_() 513 FILE *tf = RtsFlags.TickyFlags.tickyFile; in hs_exit_()
|
H A D | ProfilerReport.c | 76 if (RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_VERBOSE) { in fprintHeader() 128 || RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_ALL) { in reportPerCCCosts() 140 if (RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_VERBOSE) { in reportPerCCCosts() 162 if (RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_VERBOSE) { in reportPerCCCosts() 244 if (RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_VERBOSE) { in logCCS() 299 (double) RtsFlags.MiscFlags.tickInterval) / (TIME_RESOLUTION * n_capabilities), in writeCCSReport() 301 (int) TimeToUS(RtsFlags.MiscFlags.tickInterval), in writeCCSReport()
|
H A D | ProfilerReportJson.c | 133 RtsFlags.ParFlags.nCapabilities); in writeCCSReportJson() 136 (double) RtsFlags.MiscFlags.tickInterval) / (TIME_RESOLUTION * n_capabilities)); in writeCCSReportJson() 140 (int) TimeToUS(RtsFlags.MiscFlags.tickInterval)); in writeCCSReportJson()
|
H A D | Task.c | 431 if (RtsFlags.ParFlags.setAffinity) { in workerStart() 434 if (RtsFlags.GcFlags.numa && !RtsFlags.DebugFlags.numa) { in workerStart() 533 if (RtsFlags.ParFlags.setAffinity) { in rts_setInCallCapability() 544 if (RtsFlags.GcFlags.numa) { in rts_pinThreadToNumaNode() 547 if (!DEBUG_IS_ON || !RtsFlags.DebugFlags.numa) { // faking NUMA in rts_pinThreadToNumaNode()
|
/dports/devel/hs-hlint/hlint-3.3.4/_cabal_deps/ghc-lib-parser-9.0.1.20210324/compiler/cbits/ |
H A D | cutils.c | 13 RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; in ghc_lib_parser_enableTimingStats() 19 RtsFlags.GcFlags.heapSizeSuggestion = size / BLOCK_SIZE; in ghc_lib_parser_setHeapSize() 20 if (RtsFlags.GcFlags.maxHeapSize != 0 && in ghc_lib_parser_setHeapSize() 21 RtsFlags.GcFlags.heapSizeSuggestion > RtsFlags.GcFlags.maxHeapSize) { in ghc_lib_parser_setHeapSize() 22 RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; in ghc_lib_parser_setHeapSize()
|
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/ghc-lib-parser-8.10.7.20210828/compiler/parser/ |
H A D | cutils.c | 13 RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; in ghc_lib_parser_enableTimingStats() 19 RtsFlags.GcFlags.heapSizeSuggestion = size / BLOCK_SIZE; in ghc_lib_parser_setHeapSize() 20 if (RtsFlags.GcFlags.maxHeapSize != 0 && in ghc_lib_parser_setHeapSize() 21 RtsFlags.GcFlags.heapSizeSuggestion > RtsFlags.GcFlags.maxHeapSize) { in ghc_lib_parser_setHeapSize() 22 RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; in ghc_lib_parser_setHeapSize()
|
/dports/devel/hs-ormolu/ormolu-0.4.0.0/_cabal_deps/ghc-lib-parser-9.2.1.20211101/compiler/cbits/ |
H A D | cutils.c | 13 RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; in ghc_lib_parser_enableTimingStats() 19 RtsFlags.GcFlags.heapSizeSuggestion = size / BLOCK_SIZE; in ghc_lib_parser_setHeapSize() 20 if (RtsFlags.GcFlags.maxHeapSize != 0 && in ghc_lib_parser_setHeapSize() 21 RtsFlags.GcFlags.heapSizeSuggestion > RtsFlags.GcFlags.maxHeapSize) { in ghc_lib_parser_setHeapSize() 22 RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; in ghc_lib_parser_setHeapSize()
|
/dports/lang/ghc/ghc-8.10.7/compiler/parser/ |
H A D | cutils.c | 13 RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; in enableTimingStats() 19 RtsFlags.GcFlags.heapSizeSuggestion = size / BLOCK_SIZE; in setHeapSize() 20 if (RtsFlags.GcFlags.maxHeapSize != 0 && in setHeapSize() 21 RtsFlags.GcFlags.heapSizeSuggestion > RtsFlags.GcFlags.maxHeapSize) { in setHeapSize() 22 RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; in setHeapSize()
|
/dports/lang/ghc/ghc-8.10.7/rts/sm/ |
H A D | GC.c | 793 if (RtsFlags.GcFlags.useNonmoving) { in GarbageCollect() 840 if (major_gc && RtsFlags.GcFlags.generations > 1 && ! RtsFlags.GcFlags.useNonmoving) in GarbageCollect() 964 if (RtsFlags.GcFlags.maxHeapSize != 0) { in GarbageCollect() 1371 if (RtsFlags.GcFlags.longGCSync != 0 && in waitForGcThreads() 1387 if (RtsFlags.GcFlags.longGCSync != 0 && in waitForGcThreads() 1388 t2 - t0 > RtsFlags.GcFlags.longGCSync) { in waitForGcThreads() 1831 if (!RtsFlags.GcFlags.useNonmoving && in resizeGenerations() 1832 (RtsFlags.GcFlags.compact || in resizeGenerations() 1845 if (RtsFlags.GcFlags.sweep) { in resizeGenerations() 1900 if (RtsFlags.GcFlags.generations == 1) in resize_nursery() [all …]
|
H A D | Storage.c | 199 if (RtsFlags.GcFlags.useNonmoving) in initStorage() 203 if (RtsFlags.GcFlags.compact || RtsFlags.GcFlags.sweep) { in initStorage() 204 if (RtsFlags.GcFlags.generations == 1) { in initStorage() 208 if (RtsFlags.GcFlags.compact) in initStorage() 219 if (RtsFlags.GcFlags.largeAllocLim > 0) { in initStorage() 251 if (RtsFlags.GcFlags.nurseryChunkSize == 0) { in storageAddCapabilities() 301 if (RtsFlags.GcFlags.useNonmoving) { in storageAddCapabilities() 508 if (RtsFlags.GcFlags.useNonmoving) { in lockCAF() 735 if (RtsFlags.GcFlags.nurseryChunkSize) { in allocNurseries() 838 if (RtsFlags.GcFlags.nurseryChunkSize) { in resizeNurseriesFixed() [all …]
|
H A D | Sanity.c | 756 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in checkGlobalTSOList() 825 for (g = 1; g < RtsFlags.GcFlags.generations; g++) { in checkLocalMutableLists() 924 if (RtsFlags.GcFlags.useNonmoving && gen == oldest_gen) { in checkGeneration() 971 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in checkFullHeap() 1021 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in findMemoryLeak() 1043 if (RtsFlags.GcFlags.useNonmoving) { in findMemoryLeak() 1186 W_ gen_blocks[RtsFlags.GcFlags.generations]; in memInventory() 1197 if (RtsFlags.GcFlags.useNonmoving) in memInventory() 1203 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in memInventory() 1249 for (g = 0; g < RtsFlags.GcFlags.generations; g++) { in memInventory() [all …]
|
/dports/lang/ghc/ghc-8.10.7/ghc/ |
H A D | hschooks.c | 32 if (RtsFlags.GcFlags.giveStats == NO_GC_STATS) { in initGCStatistics() 33 RtsFlags.GcFlags.giveStats = COLLECT_GC_STATS; in initGCStatistics() 43 RtsFlags.GcFlags.heapSizeSuggestionAuto = true; in defaultsHook() 45 RtsFlags.GcFlags.maxStkSize = 512*1024*1024 / sizeof(W_); in defaultsHook() 51 RtsFlags.GcFlags.idleGCDelayTime = SecondsToTime(5); in defaultsHook()
|
/dports/lang/ghc/ghc-8.10.7/rts/win32/ |
H A D | veh_excn.c | 186 if (!RtsFlags.MiscFlags.install_seh_handlers) in __register_hs_exception_handler() 212 if (!RtsFlags.MiscFlags.install_seh_handlers) in __unregister_hs_exception_handler() 232 if (!RtsFlags.MiscFlags.generate_dump_file) in generateDump() 273 if (!RtsFlags.MiscFlags.generate_stack_trace) in generateStack()
|
/dports/lang/ghc/ghc-8.8.4-boot/includes/rts/ |
H A D | Flags.h | 256 extern DLLIMPORT RTS_FLAGS RtsFlags; 259 extern RTS_FLAGS RtsFlags[]; 261 extern RTS_FLAGS RtsFlags;
|
/dports/lang/ghc/ghc-8.8.4-boot/includes/ |
H A D | Rts.h | 275 #define IF_RTSFLAGS(c,s) if (RtsFlags.c) { s; } doNothing() 279 #define IF_DEBUG(c,s) if (RtsFlags[0].DebugFlags.c) { s; } doNothing() 281 #define IF_DEBUG(c,s) if (RtsFlags.DebugFlags.c) { s; } doNothing()
|
/dports/lang/ghc/ghc-8.10.7/includes/rts/ |
H A D | Flags.h | 283 extern DLLIMPORT RTS_FLAGS RtsFlags; 290 extern RTS_FLAGS RtsFlags[]; 292 extern RTS_FLAGS RtsFlags;
|
/dports/lang/ghc/ghc-8.10.7/includes/ |
H A D | Rts.h | 296 #define IF_RTSFLAGS(c,s) if (RtsFlags.c) { s; } doNothing() 301 #define IF_DEBUG(c,s) if (RtsFlags[0].DebugFlags.c) { s; } doNothing() 303 #define IF_DEBUG(c,s) if (RtsFlags.DebugFlags.c) { s; } doNothing()
|