Caml1999I037Ġ*Stdlib__Gc$stat;@@+minor_words@@%floatD@@@&gc.mliTT@@A@.promoted_words@@@@@ XKOXKf@@"B@+major_words@@@@@]]&@@.C@1minor_collections@@#intA@@@'a(a@@@@@c@  d@  @@xI@*free_words@@J@@@oE m qpE m @@J@+free_blocks@@V@@@{H  |H  @@K@,largest_free@@b@@@M Y ]M Y p@@L@)fragments@@n@@@RR*@@M@+compactions @@z@@@WW@@N@.top_heap_words!@@@@@Z6:Z6O@@O@*stack_size"@@@@@]]@@P@8forced_major_collections#@@@@@cJNcJl@@Q@@@A@@@@@Sg@@@@@@A@'control;@@/minor_heap_size%@@@@@rkork@@S@4major_heap_increment&@@@@@xx@@T@.space_overhead'@@@@@[_[t@@U@'verbose(@@@@@@@V@,max_overhead)@@@@@  @@W@+stack_limit*@@@@@@@*X@1allocation_policy+@@@@@! ""@@6Y@+window_size,@@@@@-.@@BZ@2custom_major_ratio-@@@@@9:@@N[@2custom_minor_ratio.@@ @@@E"6":F"6"S@@Z\@5custom_minor_max_size/@@,@@@Q##R#$@@f]@@@A@@@@@Uq\\V%{%~@@@@jR@A@$stat@$unitF@@@w@@@@@,caml_gc_statAA @@@o&S&Sp&S&@@^@@*quick_stat@@@@@@@@@2caml_gc_quick_statAA@@@'''('@@_@@(counters@0@@@@@@@@@@@@@@@@@@@0caml_gc_countersAA>@@@)))*2@@`@@+minor_words@W@@@@@@@@3caml_gc_minor_wordsAA;caml_gc_minor_words_unboxed@@A**+ +C@@a@@#get@o@@@ @@@@@+caml_gc_getAAm@@@ ,d,d ,,@%alert ,, ,,@5unsynchronized_access ,, ,,@@@@@ )GC parameters are a mutable global state. ,, ,,@@ ,, ,,@@@@@@@@@@ ,,(@@b@@#set@:@@@@@@@@+caml_gc_setAA@@@--.n.o@%alert.." ..'@5unsynchronized_access-..(...=@@@@@ )GC parameters are a mutable global state.8.>.C9.>.l@@;.>.B<.>.m@@@@@@@@@@@..(@@Tc@@%minor@@@@@@@@@-caml_gc_minorAA@@@V//W//@@kd@@+major_slice@@@@@D@@@@@Ő3caml_gc_major_sliceAA@@@m"00n"00L@@e@@%major@@@@@@@@@Ȑ-caml_gc_majorAA@@@*11*11@@f@@*full_major@/@@@3@@@@@ː2caml_gc_full_majorAA-@@@-2626-262o@@g@@'compact@F@@@J@@@@@ΐ2caml_gc_compactionAAD@@@233233M@@h@@*print_stat@&Stdlib+out_channel@@@e@@@@@@633633@@i@@/allocated_bytes@t@@@@@@@@@:4v4v:4v4@@j@@.get_minor_free@@@@@@@@@א3caml_get_minor_freeAA@@@?5U5U?5U5@@k@@(finalise@@!a@@@@@@@ @@@@@@@@E55E56(@@#l@@-finalise_last@@@@@@@@@@@!a@@@@@@@@@-BB.BC(@@Bm@@0finalise_release@@@@@@@@@@@EEAEF@@Un@@%alarm;@@@A@@@@@JFFKFF@@@@_o@A@,create_alarm@@@@@@@@@@@@@@@@cGgGgdGgG@@xp@@,delete_alarm@@@@@@@@@@uKKvKK@@q@@.eventlog_pause@ @@@$@@@@@@LDLDLfL@0ocaml.deprecatedLfLiLfLy@ !Use Runtime_events.pause instead.LfL{LfL@@LfLzLfL@@@@@@LfLf@@r@@/eventlog_resume@L@@@P@@@@@@LLLL@0ocaml.deprecatedLLLL@ "Use Runtime_events.resume instead.LLLL@@LLLL@@@@@@LL@@s@@Ӡ'Memprof@!t;@@@A@@@@@PJPNPJPT@@@@t@A@1allocation_source;@@&NormalH@@PwPPwP@@v@'MarshalI@@PwPPwP@@ w@&CustomJ@@PwPPwP@@x@(Map_fileK@@PwPPwP@@y@@@A@@@@@ PwP{@@A@u@A@;string_of_allocation_source@5@@@g&stringQ@@@h@@i@PP PP@@4z@@*allocation;@@)n_samplesN@@ @@@m1QQ"2QQ2@@F|@$sizeO@@@@@l=QoQw>QoQ@@R}@&sourceP@@0@@@kHQQIQQ@@]~@)callstacks@@(Printexc-raw_backtrace@@@jWRR#XRRE@@l@@@@@@@@@[PQ\RwR~@@@@p{@A@'tracker;%minor@y%major@u@B+alloc_minor@@@S@@@x&optionL@@@z@@{SPSVSPS@@A@+alloc_major@@@@@@t'@@@v@@wSSSS@@B@'promote@@@7#6@@@r@@sSSSS@@C@-dealloc_minor@@@FK@@@p@@qSSSS@@D@-dealloc_major@@@OY@@@n@@oSTST!@@E@@@A@@@@@@@S*S.T"T'@@@@@@A@,null_trackerp%minor@}%major@|@@@~@V;V?V;Vi@@F@@%start-sampling_rate@@@.callstack_sizex@@@@@@@.%minor@%major@@@@3@@@@@@@@@@ VV WW@@"G@@$stop@@@@@@@@@@ ;__!;__@@5H@@'discard@"@@@@@@@@@2Haa3Haa@@GI@@@@6P3P37Mbb@KJ@@@9suspended_collection_work;@@@A@@@@@@PbbAPbb@@@@UK@A@'ramp_up@@@@@!a@@@@@"@@@@@@@2caml_ml_gc_ramp_upAA@@@cRbbdScc@@xL@@)ramp_down@@@@@@@@@4caml_ml_gc_ramp_downAA @@@y}jjz~kk@@M@@@r\*Stdlib__Gc0IK98〢qH~Yd0Stdlib__Printexc00@DP,MP$Q1s.젠+Stdlib__Obj0]'kZ<栠-Stdlib__Int320 u&&Stdlib0Lku]8_٠8CamlinternalFormatBasics0%FU(Q/Tu@@@Caml1999T0370g(oC*Stdlib__Gc*ocaml.text&_none_@@A = Memory management control and statistics; finalised values. &gc.mliQQ@@@@@@3@@@@@@#intA;@@@A@@@@@:@A@$charB;@@A@@@@@>@A@&stringQ;@@ A@@@@@B@@@%bytesC;@@ A@@@@@F@@@%floatD;@@A@@@@@J@@@$boolE;@@%falsec@@T@$trued@@Z@@@A@@@@@[@A@$unitF;@@"()e@@e@@@A@@@@@f@A@ #exnG;@@@A@@@@@j@@@#effH;@@O@A@A@@@@@@s@@@,continuationI;@@Q@@P@B@A@nY@@@@@@@@@%arrayJ;@@R@A@A@@@@@@@@@ $listK;@@S@A"[]f@@@"::g@@@T@@@ @@A@Y@@@@@@@@&optionL;@@V@A$Noneh@@@$Somei@@@@@A@Y@@@@@@@@)nativeintM;@@A@@@@@@@@%int32N;@@A@@@@@@@@%int64O;@@A@@@@@@@@&lazy_tP;@@X@AJA@Y@@@@@@@@5extension_constructorR;@@A@@@@@@@@*floatarrayS;@@A@@@@@@@@&iarrayT;@@Y@A[A@Y@@@@@@@@*atomic_locU;@@Z@AdA@@@@@@@@@.Assert_failure`#@@@@@J@@@@@@@@[@@A=ocaml.warn_on_literal_pattern @ @0Division_by_zero]#@@@A  @+End_of_file\#$@@@A@'FailureY#,@'@@A!$$@0Invalid_argumentX#5@0@@A*$-#-@-Match_failureV#>@@=@9@;@@a@@A;5>4>@)Not_foundZ#O@@@AC=F<F@-Out_of_memoryW#W@@@AKENDN@.Stack_overflow^#_@@@ASMVLV@.Sys_blocked_io_#g@@@A[U^T^@)Sys_error[#o@j@@Ad^g]g@:Undefined_recursive_modulea#x@@w@s@u@@h@@Auoxnx@:Continuation_already_takenb#@@@A}wv@&Stdlib@AxA+$statASS@@;@@+minor_words@@Q@@@TT@)ocaml.doc S Number of words allocated in the minor heap since the program was started. UV'I@@@@@@@A@.promoted_words@@m@@@XKOXKf@ Number of words allocated in the minor heap that survived a minor collection and were moved to the major heap since the program was started. Ygk[ @@@@@@@B@+major_words@@@@@]]&@6 r Number of words allocated in the major heap, including the promoted words, since the program was started. ^'+_f@@@@@@@C@1minor_collections@@@@@aa@P < Number of minor collections since the program was started. bb@@@@@@@D@1major_collections@@@@@d d$@j T Number of major collection cycles completed since the program was started. e%)fk@@@@@@@E@*heap_words@@@@@hh@ ) Total size of the major heap, in words. i i@@@@@@@8F@+heap_chunks@@@@@+k,k@ Number of contiguous pieces of memory that make up the major heap. This metric is currently not available in OCaml 5: the field value is always [0]. 9l:n~@@@@@@@RG@*live_words@@@@@EpFp@ * Number of words of live data in the major heap, including the header words. Note that "live" words refers to every word in the major heap that isn't currently known to be collectable, which includes words that have become unreachable by the program after the start of the previous gc cycle. It is typically much simpler and more predictable to call {!Gc.full_major} (or {!Gc.compact}) then computing gc stats, as then "live" words has the simple meaning of "reachable by the program". One caveat is that a single call to {!Gc.full_major} will not reclaim values that have a finaliser from {!Gc.finalise} (this does not apply to {!Gc.finalise_last}). If this caveat matters, simply call {!Gc.full_major} twice instead of once. SqT~  @@@@@@@lH@+live_blocks@@4@@@_@  `@  @Ґ j Number of live blocks in the major heap. See [live_words] for a caveat about what "live" means. mA  nC * k@@@@@@@I@*free_words@@N@@@yE m qzE m @쐠 # Number of words in the free list. F  F  @@@@@@@J@+free_blocks@@h@@@H  H  @ Number of blocks in the free list. This metric is currently not available in OCaml 5: the field value is always [0]. I  K A W@@@@@@@K@,largest_free@@@@@M Y ]M Y p@ Size (in words) of the largest block in the free list. This metric is currently not available in OCaml 5: the field value is always [0]. N q uP @@@@@@@L@)fragments@@@@@ðRR*@: Number of wasted words due to fragmentation. These are 1-words free blocks placed between two live blocks. They are not available for allocation. S+/U@@@@@@@M@+compactions @@@@@ưWW@T ; Number of heap compactions since the program was started. XX4@@@@@@@N@.top_heap_words!@@@@@ɰZ6:Z6O@n 3 Maximum size reached by the major heap, in words.  [PT [P@@@@@@@"O@*stack_size"@@@@@̰]]@ Current size of the stack, in words. This metric is currently not available in OCaml 5: the field value is always [0]. @since 3.12 #^$a2H@@@@@@@f@@@@@@@VQ@@@A@@@@@ASBg@ n The memory management counters are returned in a [stat] record. These counters give values for the whole program. The total amount of memory allocated by the program since it was started is (in words) [minor_words + major_words - promoted_words]. Multiply by the word size (4 on a 32-bit machine, 8 on a 64-bit machine) to get the number of bytes. OhPoXZ@@@@@@@@@h@@@#ϠϰWT@@@Ш@гҠ%float`TaT@@3_^^_____@^;@@@A@@@@@&#@@@A@@@@@ݠy@@@@@@#Ԡ԰xXK]@@@Ш@гנ%floatXK`XKe@@!@@@@$@ޠ@@@@@@#נװ]@@@Ш@гڠ%float] ]%@@>@@@@A@ᠰ@@@@@@#ڠڰa@@@Ш@гݠ#intaa@@[@@@@^@䠰1А@@@@@@#ݠݰd@@@Ш@гࠐ#intd d#@@x@@@@{@砰N퐠@@@@@@#h@@@Ш@г㠐#inthh@@@@@@@꠰k @@@@@@# k@@@Ш@г栐#intkk@@@@@@@'@@@@@@#&p@@@Ш@г預#int/p0p@@ϰ@@@@@𠰠D@@@@@@#C@  @@@Ш@г점#intL@  M@  @@@@@@@󠰠a@@@@@@#`E m {@@@Ш@г#intiE m ~jE m @@ @@@@ @~@@@@@@#}H  @@@Ш@г#intH  H  @@&@@@@)@@@@@@@#M Y i@@@Ш@г#intM Y lM Y o@@C@@@@F@@@@@@@#R#@@@Ш@г#intR&R)@@`@@@@c@6Ր@@@@@@#W@@@Ш@г#intWW@@}@@@@@S򐠠@@@@@@#Z6H@@@Ш@г#intZ6KZ6N@@@@ @@@p@@@@@@#]@@@Ш@г#int]]@@ @@ @@@,@@@@@@#+cJf@@@Ш@г#int4cJh5cJk@@ ԰@@@@@ I @@@@@@@A@T@@@@@@@L@A+'control$BYq\aZq\h@@;@@/minor_heap_size%@@;@@@frkogrk@ِ The size (in words) of the minor heap. Changing this parameter will trigger a minor collection. The total size of the minor heap used by this program is the sum of the heap sizes of the active domains. Default: 256k. tsuvW@@@@@@@S@4major_heap_increment&@@U@@@xx@󐠠  How much to add to the major heap when increasing it. If this number is less than or equal to 1000, it is a percentage of the current heap size (i.e. setting it to 100 will double the heap size at each increase). If it is more than 1000, it is a fixed number of words that will be added to the heap. This field is currently not available in OCaml 5: the field value is always [0]. yCY@@@@@@@T@.space_overhead'@@o@@@[_[t@  The major GC speed is computed from this parameter. This is the memory that will be "wasted" because the GC does not immediately collect unreachable blocks. It is expressed as a percentage of the memory used for live data. The GC will work more (use more CPU time and collect blocks more eagerly) if [space_overhead] is smaller. Default: 120. uy@@@@@@@U@'verbose(@@@@@@' x This value controls the GC messages on standard error output. It is a sum of some of the following flags, to print messages on the corresponding events: - [0x0001] Start and end of major GC cycle. - [0x0002] Minor collection and major GC slice. - [0x0004] Growing and shrinking of the heap. - [0x0008] Resizing of stacks and memory manager tables. - [0x0010] Heap compaction. - [0x0020] Change of GC parameters. - [0x0040] Computation of major GC slice size. - [0x0080] Calling of finalisation functions. - [0x0100] Bytecode executable and shared library search at start-up. - [0x0200] Computation of compaction-triggering condition. - [0x0400] Output GC statistics at program exit. - [0x0800] GC debugging messages. - [0x1000] Address space reservation changes. Default: 0. @@@@@@@V@,max_overhead)@@@@@@A  Heap compaction is triggered when the estimated amount of "wasted" memory is more than [max_overhead] percent of the amount of live data. If [max_overhead] is set to 0, heap compaction is triggered at the end of each major GC cycle (this setting is intended for testing purposes only). If [max_overhead >= 1000000], compaction is never triggered. This field is currently not available in OCaml 5: the field value is always [0]. @@@@@@@W@+stack_limit*@@@@@@[ H The maximum size of the fiber stacks (in words). Default: 128M. @@@@@@@X@1allocation_policy+@@@@@  "@u ~ The policy used for allocating in the major heap. This field is currently not available in OCaml 5: the field value is always [0]. Prior to OCaml 5.0, possible values were 0, 1 and 2. - 0 was the next-fit policy - 1 was the first-fit policy (since OCaml 3.11) - 2 was the best-fit policy (since OCaml 4.10) @since 3.11 #'@@@@@@@)Y@+window_size,@@@@@@  The size of the window used by the major GC for smoothing out variations in its workload. This is an integer between 1 and 50. @since 4.03 This field is currently not available in OCaml 5: the field value is always [0]. *+@@@@@@@CZ@2custom_major_ratio-@@ @@@67@ 9 Target ratio of floating garbage to major heap size for out-of-heap memory held by custom values located in the major heap. The GC speed is adjusted to try to use this much memory for dead values that are not yet collected. Expressed as a percentage of major heap size. The default value keeps the out-of-heap floating garbage about the same size as the in-heap overhead. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 44. @since 4.08 DE""4@@@@@@@][@2custom_minor_ratio.@@%@@@P"6":Q"6"S@Ð  Bound on floating garbage for out-of-heap memory held by custom values in the minor heap. A minor GC is triggered when this much memory is held by custom values located in the minor heap. Expressed as a percentage of minor heap size. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 100. @since 4.08 ^"T"X_##@@@@@@@w\@5custom_minor_max_size/@@?@@@j##k#$@ݐ Y Maximum amount of out-of-heap memory for each custom value allocated in the minor heap. Custom values that hold more than this many bytes are allocated on the major heap. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 70000 bytes. @since 4.08 x$$y%d%z@@@@@@@]@@@A@@@@@|q\\}%{%~@ The GC parameters are given as a [control] record. Note that these parameters can also be initialised by setting the OCAMLRUNPARAM environment variable. See the documentation of [ocamlrun]. %%&?&Q@@@@@@@@@R@@#11,rk~@@@Ш@г4#intrkrk@@<3@$K;@@@A@@@@@'$@@@A@@D@@@@>=@==@@@=@=@#994x@%@@Ш@г<#intxx@@D"@@G@@%@C3ҐA@@@@@@@@@@@#<<7[m@(@@Ш@г?#int[p[s@@G?@@J@@B@FPDC@CC@@@C@C@#??:@+@@Ш@гB#int@@J\@@M@@_@Im GF@FF@@@F@F@#BB= @.@@Ш@гE#int@@My@@P@@|@L)JI@II@@@I@I@#EE@(@1@@Ш@гH#int12@@P@@S@@ @OFML@LL@@@L@L@#HHCE@4@@Ш@гK#intNO!@@S@@V@@ @RcPO@OO@@@O@O@#KKFb@7@@Ш@гN#intkl@@Vа@@Y@@@USR@RR@@@R@R@#NNI@:@@Ш@гQ#int@@Y@@\@@@XVU@UU@@@U@U@#QQL"6"L@=@@Ш@гT#int"6"O"6"R@@\ @@_@@ @[YX@XX@@@X@X@#TTO#$@@@@Ш@гW#int#$#$@@_'@@b@@*@^8א\[@[[@@@[@[@@A@WC␠UT@TT@@@T@T@@3@?@Acb@$stat0&S&\&S&`@б@г$unit&S&c&S&g@@ @@@53@Z@A@@г$stat&S&k&S&o@@ @@@6@@@@@7@@,caml_gc_statAA @@@&S&S&S&@ f Return the current values of the memory management counters in a [stat] record that represents the program's total memory stats. The [heap_chunks], [free_blocks], [largest_free], and [stack_size] metrics are currently not available in OCaml 5: their returned field values are therefore [0]. This function causes a full major collection. && ''@@@@@@@8^@@@4@@@@@@8*quick_stat17''8'(@б@г$unitB'(C'(@@ @@@83DCCDDDDD@Qf?@A@@гѠ$statQ'( R'(@@ @@@9@@@@@:@@2caml_gc_quick_statAAP@@@`''a'('@Ӑ  Returns a record with the current values of the memory management counters like [stat]. Unlike [stat], [quick_stat] does not perform a full major collection, and hence, is much faster. However, [quick_stat] reports the counters sampled at the last minor collection or at the end of the last major collection cycle (whichever is the latest). Hence, the memory stats returned by [quick_stat] are not instantaneously accurate. n((((o))@@@@@@@_@@@@@@@@@7(counters2))))@б@г>$unit)*)*@@ @@@;3@Pe>@A@@В@гf%float)*)* @@ @@@<@@@гu%float)*)*@@ @@@="@@@г%float)*)*@@ @@@>1@@@@&@@ @@?:-@@@@ @@@=C@@0caml_gc_countersAAʠ@@@)))*2@M Return [(minor_words, promoted_words, major_words)] for the current domain or potentially previous domains. This function is as fast as [quick_stat]. *3*3**@@@@@@@ `@@@^@@@@@@b+minor_words3 ** **@б@г$unit ** **@@ @@@A3        @{>@A@@гܠ%float ** **@@ @@@B@'unboxed %*+ &*+ @@ )*+ **+ @@@ @@C# .*+ @@3caml_gc_minor_wordsAA;caml_gc_minor_words_unboxed@@A 6** 7+ +C@  Number of words allocated in the minor heap by this domain or potentially previous domains. This number is accurate in byte-code programs, but only an approximation in programs compiled to native code. In native code this function does not allocate. @since 4.04  D+D+D E,P,b@@@@@@@ ]a@@@ Z@@@@@@E #get4 ] ,d,m ^ ,d,p@б@г $unit h ,d,s i ,d,w@@ @@@D3 j i i j j j j j@^s@@A@@г'control w ,d,{ x ,d,@@ @@@E@@@@@F@@+caml_gc_getAAv@@@  ,d,d  ,,@%alert  ,,  ,,@5unsynchronized_access  ,,  ,,@@@@@ )GC parameters are a mutable global state.  ,,  ,,@@  ,,  ,,@@@@@@@@@@  ,,(@  Return the current values of the GC parameters in a [control] record. The [major_heap_increment], [max_overhead], [allocation_policy], and [window_size] fields are currently not available in OCaml 5: their returned field values are therefore [0].  ,, --@@@@@@@ b@<@:9@87430@@@/.@+(@@@'@@@'@&D 㐠%$@$$@@@$@$@qY#set5 -- --@б@г'control -- -.@@ @@@G3        @x@A@@г $unit -.  -.@@ @@@H@@@@@I@@+caml_gc_setAA@@@ -- .n.o@%alert .." ..'@5unsynchronized_access $..( %..=@@@@@ )GC parameters are a mutable global state. /.>.C 0.>.l@@ 2.>.B 3.>.m@@@@@@@@@@ 7..(@ H [set r] changes the GC parameters according to the [control] record [r]. The normal usage is: [Gc.set { (Gc.get()) with Gc.verbose = 0x00d }] The [major_heap_increment], [max_overhead], [allocation_policy], and [window_size] fields are currently not available in OCaml 5: setting them therefore has no effect.  D.p.p E//@@@@@@@ ]c@<@:9@87430@@@/.@+(@@@'@@@'@& l%$@$$@@@$@$@qY%minor6 o// p//@б@г '$unit z// {//@@ @@@J3 | { { | | | | |@x@A@@г 6$unit // //@@ @@@K@@@@@L@@-caml_gc_minorAA@@@ // //@ = Trigger a minor collection.   //  /0@@@@@@@ d@@@  @@@@@@7+major_slice7 "00 "00'@б@г #int "00* "00-@@ @@@M3        @Pe>@A@@г #int "001 "004@@ @@@N@@@@@O@@3caml_gc_major_sliceAAנ@@@ "00 "00L@ Z e [major_slice n] Do a minor collection and a slice of major collection. [n] is the size of the slice: the GC will do enough work to free (on average) [n] words of memory. If [n] = 0, the GC will try to do enough work to ensure that the next automatic slice has no work to do. This function returns an unspecified integer (currently: 0).  #0M0M (1t1@@@@@@@ e@@@ k @@@@@@7%major8 *11 *11@б@г Š$unit *11 *11@@ @@@P3        @Pe>@A@@г Ԡ$unit '*11 (*11@@ @@@Q@@@@@R@@-caml_gc_majorAA&@@@ 6*11 7*11@ F Do a minor collection and finish the current major collection cycle.  D+11 E+124@@@@@@@ ]f@@@  Y@@@@@@7*full_major9 \-262? ]-262I@б@г $unit g-262L h-262P@@ @@@S3 i h h i i i i i@Pe>@A@@г #$unit v-262T w-262X@@ @@@T@@@@@U@@2caml_gc_full_majorAAu@@@ -2626 -262o@ Do a minor collection, finish the current major collection cycle, and perform a complete new cycle. This will collect all currently unreachable blocks.  .2p2p 023@@@@@@@ g@@@  @@@@@@7'compact: 233  233'@б@г c$unit 233* 233.@@ @@@V3        @Pe>@A@@г r$unit 2332 2336@@ @@@W@@@@@X@@2caml_gc_compactionAAĠ@@@ 233 233M@ G m Perform a full major collection and compact the heap. Note that heap compaction is a lengthy operation.  33N3N 433@@@@@@@ h@@@ X @@@@@@7*print_stat; 633 633@б@г +out_channel 633 633@@ @@@Y3        @Pe>@A@@г $unit 633 633@@ @@@Z@@@@@[@@@ 633 @ Print the current values of the memory management counters (in human-readable form) of the total program into the channel argument.  ,733 -84*4t@@@@@@@ Ei@@@  @@@@@@@1/allocated_bytes< C:4v4z D:4v4@б@г $unit N:4v4 O:4v4@@ @@@\3 P O O P P P P P@J_8@A@@г %float ]:4v4 ^:4v4@@ @@@]@@@@@^@@@ h:4v4v @ ڐ Return the number of bytes allocated by this domain and potentially a previous domain. It is returned as a [float] to avoid overflow problems with [int] on 32-bit machines.  u;44 v=5/5S@@@@@@@ j@@@  @@@@@@1.get_minor_free= ?5U5^ ?5U5l@б@г D$unit ?5U5o ?5U5s@@ @@@_3        @J_8@A@@г y#int ?5U5w ?5U5z@@ @@@`@@@@@a@@3caml_get_minor_freeAA@@@ ?5U5U ?5U5@ ( e Return the current size of the free space inside the minor heap of this domain. @since 4.03  @55 C55@@@@@@@ k@@@ 9 ؐ@@@@@@7(finalise> E56 E56 @б@б@А!a@iC@b3        @Nc<@A E56 E56@@г $unit E56 E56@@ @@@c@@@@@d@@б@А!a E56 E56 @@г $unit E56$ E56(@@ @@@e)@@@1@@f,@@@@@g/ E56 @@@ E55@ [finalise f v] registers [f] as a finalisation function for [v]. [v] must be heap-allocated. [f] will be called with [v] as argument at some point between the first time [v] becomes unreachable (including through weak pointers) and the time [v] is collected by the GC. Several functions can be registered for the same value, or even several instances of the same function. Each instance will be called once (or never, if the program terminates before [v] becomes unreachable). The GC will call the finalisation functions in the order of deallocation. When several values become unreachable at the same time (i.e. during the same GC cycle), the finalisation functions will be called in the reverse order of the corresponding calls to [finalise]. If [finalise] is called in the same order as the values are allocated, that means each value is finalised before the values it depends upon. Of course, this becomes false if additional dependencies are introduced by assignments. In the presence of multiple OCaml threads it should be assumed that any particular finaliser may be executed in any of the threads. Anything reachable from the closure of finalisation functions is considered reachable, so the following code will not work as expected: - [ let v = ... in Gc.finalise (fun _ -> ...v...) v ] Instead you should make sure that [v] is not in the closure of the finalisation function by writing: - [ let f = fun x -> ... let v = ... in Gc.finalise f v ] The [f] function can use all features of OCaml, including assignments that make the value reachable again. It can also loop forever (in this case, the other finalisation functions will not be called during the execution of f, unless it calls [finalise_release]). It can call [finalise] on [v] or other values to register other functions or even itself. It can raise an exception; in this case the exception will interrupt whatever the program was doing when the function was called. [finalise] will raise [Invalid_argument] if [v] is not guaranteed to be heap-allocated. Some examples of values that are not heap-allocated are integers, constant constructors, booleans, the empty array, the empty list, the unit value. The exact list of what is heap-allocated or not is implementation-dependent. Some constant values can be heap-allocated but never deallocated during the lifetime of the program, for example a list of integer constants; this is also implementation-dependent. Note that values of types [float] are sometimes allocated and sometimes not, so finalising them is unsafe, and [finalise] will also raise [Invalid_argument] for them. Values of type ['a Lazy.t] (for any ['a]) are like [float] in this respect, except that the compiler sometimes optimizes them in a way that prevents [finalise] from detecting them. In this case, it will not raise [Invalid_argument], but you should still avoid calling [finalise] on lazy values. The results of calling {!String.make}, {!Bytes.make}, {!Bytes.create}, {!Array.make}, and {!val:Stdlib.ref} are guaranteed to be heap-allocated and non-constant except when the length argument is [0].  )F6)6) *BB@@@@@@@ Bl@@@  =@@@@@@O-finalise_last? @BB ABC @б@б@г $unit MBC  NBC@@ @@@j3 O N N O O O O O@j}:@A@@г $unit \BC ]BC@@ @@@k@@@@@l@@б@А!a@rC@m pBC qBC @@г &$unit yBC$ zBC(@@ @@@n,@@@@@o/@@@"@@p2 BC  @@@ BB@  same as {!finalise} except the value is not given as argument. So you can't use the given value for the computation of the finalisation function. The benefit is that the function is called after the value is unreachable for the last time instead of the first time. So contrary to {!finalise} the value will never be reachable again or used again. In particular every weak pointer and ephemeron that contained this value as key or data is unset before running the finalisation function. Moreover the finalisation functions attached with {!finalise} are always called before the finalisation functions attached with {!finalise_last}. @since 4.04  C)C) EE@@@@@@@ m@@@  @@@@@@R0finalise_release@ EE EE@б@г d$unit EE EE@@ @@@s3        @k8@A@@г s$unit EE EF@@ @@@t@@@@@u@@@ EE @ C A finalisation function may call [finalise_release] to tell the GC that it can launch the next finalisation function without waiting for the current one to return.  FF FF@@@@@@@ n@@@ S 򐠠@@@@@@1A+%alarmAC FF FF@@;@@@A@@@@@ FF@ m An alarm is a piece of data that calls a user function at the end of major GC cycle. The following functions are provided to create and delete alarms. FF GMGe@@@@@@@@@!o@@@A@ |@@@@@@@3@[pI@A"@,create_alarmB!GgGk"GgGw@б@б@г ۠$unit.GgG{/GgG@@ @@@v30//00000@C=@A@@г ꠐ$unit=GgG>GgG@@ @@@w@@@@@x@@гW%alarmMGgGNGgG@@ @@@y@@@@@z"VGgGz @@@YGgGg @ ː  [create_alarm f] will arrange for [f] to be called at the end of major GC cycles, not caused by [f] itself, starting with the current cycle or the next one. [f] will run on the same domain that created the alarm, until the domain exits or [delete_alarm] is called. A value of type [alarm] is returned that you can use to call [delete_alarm]. It is not guaranteed that the Gc alarm runs at the end of every major GC cycle, but it is guaranteed that it will run eventually. As an example, here is a crude way to interrupt a function if the memory consumption of the program exceeds a given [limit] in MB, suitable for use in the toplevel: {[ let run_with_memory_limit (limit : int) (f : unit -> 'a) : 'a = let limit_memory () = let mem = Gc.(quick_stat ()).heap_words in if mem / (1024 * 1024) > limit / (Sys.word_size / 8) then raise Out_of_memory in let alarm = Gc.create_alarm limit_memory in Fun.protect f ~finally:(fun () -> Gc.delete_alarm alarm ; Gc.compact ()) ]} fGGgKK@@@@@@@p@@@ z@@@@@@B,delete_alarmC}KK~KK@б@г%alarmKKKK@@ @@@{3@[r8@A@@гD$unitKKKK@@ @@@|@@@@@}@@@KK @  z [delete_alarm a] will stop the calls to the function associated to [a]. Calling [delete_alarm a] again has no effect. KKLLB@@@@@@@q@@@ $Ð@@@@@@1.eventlog_pauseDLDLHLDLV@б@г~$unitLDLYLDL]@@ @@@~3@J_8@A@@г$unitLDLaLDLe@@ @@@@@@@@@@@LDLDLfL@0ocaml.deprecatedLfLiLfLy@ !Use Runtime_events.pause instead.LfL{LfL@@LfLzLfL@@@@@@LfLf@@r@@@@@@@@@=)/eventlog_resumeELLLL@б@гӠ$unit&LL'LL@@ @@@3(''(((((@VkD@A@@г⠐$unit5LL6LL@@ @@@@@@@@@@@@LLALL@0ocaml.deprecatedGLLHLL@ "Use Runtime_events.resume instead.SLLTLL@@VLLWLL@@@@@@ZLL@@rs@@@@@@@@@=)'MemprofDrP3P:sP3PA@J@@БA+!tFEPJPSPJPT@@;@@A@@@@@PJPN@ 7 the type of a profile PUPYPUPu@@@@@@@@@t@@@A@@@@@@@@3@vd@A!@A+1allocation_sourceGFPwPPwP@@;@@&NormalH@@PwPPwP@@v@'MarshalI@@PwPPwP@@w@&CustomJ@@PwPPwP@@x@(Map_fileK@@PwPPwP@@y@@@A@@@@@PwP{@@A@u@@#((&%@$@@@(@#$$PwP"@!@@@%@#!!PwP@@@@"@#PwP@@@@@@A@@@3@Ptn@A @;string_of_allocation_sourceLPPPP@б@гY1allocation_sourcePPPP@@ @@@3@d^@A@@гޠ&stringPPPP@@ @@@@@@@@@@@PP @@7z@@ @@A+*allocationMG+PQ,PQ@@;@@)n_samplesN@@ @@@8QQ"9QQ2@ - The number of samples in this block (>= 1). FQ3Q;GQ3Qm@@@@@@@_|@$sizeO@@'@@@RQoQwSQoQ@Ő 8 The size of the block, in words, excluding the header. `QQaQQ@@@@@@@y}@&sourceP@@@@@lQQmQQ@ߐ> The cause of the allocation. zQQ{QR@@@@@@@~@)callstacks@@(Printexc-raw_backtrace@@@RR#RRE@ # The callstack for the allocation. RFRNRFRv@@@@@@@@@@@@@@@@PQRwR~@ The type of metadata associated with allocations. This is the type of records passed to the callback triggered by the sampling of an allocation. RRSS(@@@@@@@@@{@@#~~yQQ+@j@@Ш@г#intQQ.QQ1@@3@;@@@@@@@@@'$@@@A@@@@@5Ԑ@@@@@@#QoQ{@r@@Ш@г#intQoQ~QoQ@@"@@@@%@R񐠠@@@@@@#QQ@u@@Ш@г1allocation_sourceQQQQ@@?@@@@B@o@@@@@@# RR,@u@@Ш@гRR/RR7@RR8@@@a@@@@d@0@@@@@@@@@;@@@@@@@332233333@y@A@A+'trackerHAS*SDBS*SK@А%minor@w3HGGHHHHH@'!;@@u@@v@B@A@GG@BB@@@[S*S.\T"T'@ΐ  A [('minor, 'major) tracker] describes how memprof should track sampled blocks over their lifetime, keeping a user-defined piece of metadata for each of them: ['minor] is the type of metadata to keep for minor blocks, and ['major] the type of metadata for major blocks. The member functions in a [tracker] are called callbacks. If an allocation or promotion callback raises an exception or returns [None], memprof stops tracking the corresponding block. iT(T,jV0V9@@@@@@@@@@@@AmS*S4nS*S:@@BAА%major@x-yS*S<zS*SB@@ @;5 @B+alloc_minor@@@a@@@yGI@z@@@|@@}SPSVSPS@@A@+alloc_major@@@v@@@/I@@@@@@SSSS@@B@'promote@@@iI@BI@@@@@@SSSS@@C@-dealloc_minor@@@|I@x@@@@@SSSS@@D@-dealloc_major@@@_I@@@@@@STST!@@E@@@A@@@@@@@@@u@#bbTSPSa@S@@Ш@б@гe*allocationSPScSPSm@@m@@гj&optionSPSxSPS~@А%minorrSPSqSPSw@@@y @@ @@@@~@v@#rrd SS@c@@Ш@б@гu*allocationSSSS@@}̰@@гz&optionSSSS@А%majorٰ%SS&SS@@@ܰ @@ݰ @@@@@@#v/SS@u@@Ш@б@А%minor8SS9SS@@г&option@SSASS@А%majorGSSHSS@@@ @@ @@@@@@#QSS@@@Ш@б@А%minorZSS[SS@@г$unitbSScSS@@@@ @@@@@@#lST@@@Ш@б@А%major)uSTvST@@г$unit}ST~ST @@4@@5 @@@@8@@@A@)'&@&&@@@&@&@@3@B@A54@,null_trackerV;VCV;VO@г`'trackerV;VbV;Vi@А%minor@I@3@aq3@AV;VRV;VX@@А%major@I@V;VZV;V`@@@# @@@V;VQ"@@@V;V?%@8 0 Default callbacks simply return [None] or [()] VjVnVjV@@@@@@@F@@5@H琠@@@@@@6%startVVVV@б-sampling_rateг%float VV VV@@ @@@3@Qj:@A@@б.callstack_sizeгݠ#int  VV  VV@@ @@@@@б@гؠ'tracker VW VW @А%minor@I@(% VV& VV@@А%major@I@41 VV2 VW@@@! @@@<9 VV @@г!tA WWB WW@@ @@@J@@@@@M@@KD@@@ @@UR VV@@g\ @@YV VV@@@YVV@ː  Start a profile with the given parameters. Raises an exception if a profile is already sampling in the current domain. Sampling begins immediately. The parameter [sampling_rate] is the sampling rate in samples per word (including headers). Usually, with cheap callbacks, a rate of 1e-4 has no visible effect on performance, and 1e-3 causes the program to run a few percent slower. 0.0 <= sampling_rate <= 1.0. The parameter [callstack_size] is the length of the callstack recorded at every sample. Its default is [max_int]. The parameter [tracker] determines how to track sampled blocks over their lifetime in the minor and major heap. Sampling and running callbacks are temporarily disabled on the current thread when calling a callback, so callbacks do not need to be re-entrant if the program is single-threaded and single-domain. However, if threads or multiple domains are used, it is possible that several callbacks will run in parallel. In this case, callback functions must be re-entrant. Note that a callback may be postponed slightly after the actual event. The callstack passed to an allocation callback always accurately reflects the allocation, but the program state may have evolved between the allocation and the call to the callback. If a new thread or domain is created when the current domain is sampling for a profile, the child thread or domain joins that profile (using the same [sampling_rate], [callstack_size], and [tracker] callbacks). An allocation callback is always run by the thread which allocated the block. If the thread exits or the profile is stopped before the callback is called, the allocation callback is not called and the block is not tracked. Each subsequent callback is generally run by the domain which allocated the block. If the domain terminates or the profile is stopped before the callback is called, the callback may be run by a different domain. Different domains may sample for different profiles simultaneously. f WWg9__@@@@@@@G@@(@z@@@@@@y$stop};__~;__@б@г5$unit;__;__@@ @@@3@8@A@@гD$unit;__;__@@ @@@@@@@@@@@;__ @  Stop sampling for the current profile. Fails if no profile is sampling in the current domain. Stops sampling in all threads and domains sharing the profile. Promotion and deallocation callbacks from a profile may run after [stop] is called, until [discard] is applied to the profile. A profile is implicitly stopped (but not discarded) if all domains and threads sampling for it are terminated. <__Faa@@@@@@@H@@@$Ð@@@@@@1'discardHaaHaa@б@гP!tHaaHaa@@ @@@3@J_8@A@@г$unitHaaHaa@@ @@@@@@@@@@@Haa @] Discards all profiling state for a stopped profile, which prevents any more callbacks for it. Raises an exception if called on a profile which has not been stopped. IaaLbb@@@@@@@I@@@m @@@@@@1@A@c]A@@A@A@O@/@w@W0@@3@DY2@A3@|@APDPFMbb@@0 / [Memprof] is a profiling engine which randomly samples allocated memory words. Every allocated word has a probability of being sampled equal to a configurable sampling rate. Once a block is sampled, it becomes tracked. A tracked block triggers a user-defined callback as soon as it is allocated, promoted or deallocated. Since blocks are composed of several words, a block can potentially be sampled several times. If a block is sampled several times, then each of the callbacks is called once for each event of this block: the multiplicity is given in the [n_samples] field of the [allocation] structure. This engine makes it possible to implement a low-overhead memory profiler as an OCaml library. Note: this API is EXPERIMENTAL. It may change without prior notice. -LL.P%P2@@@@@@@0P3P3@@A+9suspended_collection_workI;Pbb<Pbb@@;@@EA@@@@@?Pbb@@@@WK@@@A@@@3>==>>>>>@@A@A@U.@& A@A@@m@@n@@Ȑ65@55@@@5@5@2@A#&@'ramp_upjRbbkRbb@б@б@г$$unitwRbbxRbb@@ @@@3yxxyyyyy@<GA@A@@А!a@J@ RbbRbb@@@ @@@@В@А!aRbbRbb@@@гe9suspended_collection_workRbbRbc@@ @@@)@@@@(@ @@0 @@@% @@3Rbb@@2caml_ml_gc_ramp_upAA @@@RbbScc@*  In general, the OCaml GC assumes that the program runs in a "steady state" where peak memory usage remains constant: for each newly allocated work, it assumes that one work has become unreachable and will try to collect it during the next GC slice. This assumption is incorrect at the points during program execution where the live memory increases instead of remaining stable: the steady-state assumption will make the GC work harder at no benefit as it will not find more memory to collect. [ramp_up f] puts the current domain in a "ramp-up" phase for the duration of the evaluation of [f ()], letting the GC know that the steady-state assumption does not hold; it should be used when you know that the live memory of the program will increase significantly. During a ramp-up phase, the GC will not try to work harder for new allocations: the corresponding collection work is "suspended". The total amount of suspended collection work is returned by [ramp_up] along with the result of the function. If the user discards this suspended work (by doing nothing with it), the GC will never accelerate to recover the corresponding amount of memory. This is appropriate if the ramp-up work allocates long-lived memory that remains live until the end of the program execution. If the user knows that at a certain point in the program the live memory consumption has been reduced by the corresponding amount -- typically, because the memory allocated during [ramp_up] has become unused -- then they should call {!ramp_down} below to have the GC "resume" this collection work. If [f ()] raises an exception, the ramp-up phase terminates, the collection work that was suspended is resumed, and the exception is re-raised. If [f ()] performs an effect, the effect is not handled and an [Effect.Unhandled] exception is thrown instead. Tcc{jj@@@@@@@L@@@;ڐ@@@@@@Y)ramp_down}jj}jj@б@г9suspended_collection_work}jj}jj@@ @@@3@r>@A@@г$unit}jj}jk@@ @@@@@@@@@@4caml_ml_gc_ramp_downAA @@@}jj~kk@y v Notify the GC about some amount of collection work that was suspended during a ramp-up phase, to be resumed now. kkk]k@@@@@@@-M@@@)@@@@@@7@A@A@ G @  @  Z@ 4 @  @ R +@  @ ~ W@ 1 @  @  p@ J #@ @@o,@ @{@ZTA@1@@i@=@@<(@@"A@@]@@3ZYYZZZZZ@q_@A@ H************************************************************************cA@@dA@L@ H iBMMjBM@ H OCaml oCpC@ H uDvD3@ H Damien Doligez, projet Para, INRIA Rocquencourt {E44|E4@ H Jacques-Henri Jourdan, projet Gallium, INRIA Paris FF@ H GG@ H Copyright 1996-2016 Institut National de Recherche en Informatique HHg@ H et en Automatique. IhhIh@ H JJ@ H All rights reserved. This file is distributed under the terms of KKN@ H the GNU Lesser General Public License version 2.1, with the LOOLO@ H special exception on linking described in the file LICENSE. MM@ H NN5@ H************************************************************************O66O6@ >* Memory management control and statistics; finalised values.  T* Number of words allocated in the minor heap since the program was started. # * Number of words allocated in the minor heap that survived a minor collection and were moved to the major heap since the program was started.  s* Number of words allocated in the major heap, including the promoted words, since the program was started.  =* Number of minor collections since the program was started. ޠ U* Number of major collection cycles completed since the program was started. Ǡ ** Total size of the major heap, in words.  * Number of contiguous pieces of memory that make up the major heap. This metric is currently not available in OCaml 5: the field value is always [0].  +* Number of words of live data in the major heap, including the header words. Note that "live" words refers to every word in the major heap that isn't currently known to be collectable, which includes words that have become unreachable by the program after the start of the previous gc cycle. It is typically much simpler and more predictable to call {!Gc.full_major} (or {!Gc.compact}) then computing gc stats, as then "live" words has the simple meaning of "reachable by the program". One caveat is that a single call to {!Gc.full_major} will not reclaim values that have a finaliser from {!Gc.finalise} (this does not apply to {!Gc.finalise_last}). If this caveat matters, simply call {!Gc.full_major} twice instead of once.  k* Number of live blocks in the major heap. See [live_words] for a caveat about what "live" means. k $* Number of words in the free list. T * Number of blocks in the free list. This metric is currently not available in OCaml 5: the field value is always [0]. = * Size (in words) of the largest block in the free list. This metric is currently not available in OCaml 5: the field value is always [0]. & * Number of wasted words due to fragmentation. These are 1-words free blocks placed between two live blocks. They are not available for allocation.  <* Number of heap compactions since the program was started.  4* Maximum size reached by the major heap, in words. ᠠ * Current size of the stack, in words. This metric is currently not available in OCaml 5: the field value is always [0]. @since 3.12 ʠ o* Number of forced full major collections completed since the program was started. @since 4.12  o* The memory management counters are returned in a [stat] record. These counters give values for the whole program. The total amount of memory allocated by the program since it was started is (in words) [minor_words + major_words - promoted_words]. Multiply by the word size (4 on a 32-bit machine, 8 on a 64-bit machine) to get the number of bytes.  * The size (in words) of the minor heap. Changing this parameter will trigger a minor collection. The total size of the minor heap used by this program is the sum of the heap sizes of the active domains. Default: 256k.  * How much to add to the major heap when increasing it. If this number is less than or equal to 1000, it is a percentage of the current heap size (i.e. setting it to 100 will double the heap size at each increase). If it is more than 1000, it is a fixed number of words that will be added to the heap. This field is currently not available in OCaml 5: the field value is always [0]. k * The major GC speed is computed from this parameter. This is the memory that will be "wasted" because the GC does not immediately collect unreachable blocks. It is expressed as a percentage of the memory used for live data. The GC will work more (use more CPU time and collect blocks more eagerly) if [space_overhead] is smaller. Default: 120. T y* This value controls the GC messages on standard error output. It is a sum of some of the following flags, to print messages on the corresponding events: - [0x0001] Start and end of major GC cycle. - [0x0002] Minor collection and major GC slice. - [0x0004] Growing and shrinking of the heap. - [0x0008] Resizing of stacks and memory manager tables. - [0x0010] Heap compaction. - [0x0020] Change of GC parameters. - [0x0040] Computation of major GC slice size. - [0x0080] Calling of finalisation functions. - [0x0100] Bytecode executable and shared library search at start-up. - [0x0200] Computation of compaction-triggering condition. - [0x0400] Output GC statistics at program exit. - [0x0800] GC debugging messages. - [0x1000] Address space reservation changes. Default: 0. = * Heap compaction is triggered when the estimated amount of "wasted" memory is more than [max_overhead] percent of the amount of live data. If [max_overhead] is set to 0, heap compaction is triggered at the end of each major GC cycle (this setting is intended for testing purposes only). If [max_overhead >= 1000000], compaction is never triggered. This field is currently not available in OCaml 5: the field value is always [0]. & I* The maximum size of the fiber stacks (in words). Default: 128M.  * The policy used for allocating in the major heap. This field is currently not available in OCaml 5: the field value is always [0]. Prior to OCaml 5.0, possible values were 0, 1 and 2. - 0 was the next-fit policy - 1 was the first-fit policy (since OCaml 3.11) - 2 was the best-fit policy (since OCaml 4.10) @since 3.11  * The size of the window used by the major GC for smoothing out variations in its workload. This is an integer between 1 and 50. @since 4.03 This field is currently not available in OCaml 5: the field value is always [0]. ᠠ :* Target ratio of floating garbage to major heap size for out-of-heap memory held by custom values located in the major heap. The GC speed is adjusted to try to use this much memory for dead values that are not yet collected. Expressed as a percentage of major heap size. The default value keeps the out-of-heap floating garbage about the same size as the in-heap overhead. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 44. @since 4.08 ʠ * Bound on floating garbage for out-of-heap memory held by custom values in the minor heap. A minor GC is triggered when this much memory is held by custom values located in the minor heap. Expressed as a percentage of minor heap size. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 100. @since 4.08  Z* Maximum amount of out-of-heap memory for each custom value allocated in the minor heap. Custom values that hold more than this many bytes are allocated on the major heap. Note: this only applies to values allocated with [caml_alloc_custom_mem] (e.g. bigarrays). Default: 70000 bytes. @since 4.08  * The GC parameters are given as a [control] record. Note that these parameters can also be initialised by setting the OCAMLRUNPARAM environment variable. See the documentation of [ocamlrun].  g* Return the current values of the memory management counters in a [stat] record that represents the program's total memory stats. The [heap_chunks], [free_blocks], [largest_free], and [stack_size] metrics are currently not available in OCaml 5: their returned field values are therefore [0]. This function causes a full major collection.  * Returns a record with the current values of the memory management counters like [stat]. Unlike [stat], [quick_stat] does not perform a full major collection, and hence, is much faster. However, [quick_stat] reports the counters sampled at the last minor collection or at the end of the last major collection cycle (whichever is the latest). Hence, the memory stats returned by [quick_stat] are not instantaneously accurate.  * Return [(minor_words, promoted_words, major_words)] for the current domain or potentially previous domains. This function is as fast as [quick_stat].  8 * Number of words allocated in the minor heap by this domain or potentially previous domains. This number is accurate in byte-code programs, but only an approximation in programs compiled to native code. In native code this function does not allocate. @since 4.04  ߠ * Return the current values of the GC parameters in a [control] record. The [major_heap_increment], [max_overhead], [allocation_policy], and [window_size] fields are currently not available in OCaml 5: their returned field values are therefore [0].  k I* [set r] changes the GC parameters according to the [control] record [r]. The normal usage is: [Gc.set { (Gc.get()) with Gc.verbose = 0x00d }] The [major_heap_increment], [max_overhead], [allocation_policy], and [window_size] fields are currently not available in OCaml 5: setting them therefore has no effect.  堠>* Trigger a minor collection.  f* [major_slice n] Do a minor collection and a slice of major collection. [n] is the size of the slice: the GC will do enough work to free (on average) [n] words of memory. If [n] = 0, the GC will try to do enough work to ensure that the next automatic slice has no work to do. This function returns an unspecified integer (currently: 0).  : G* Do a minor collection and finish the current major collection cycle.   * Do a minor collection, finish the current major collection cycle, and perform a complete new cycle. This will collect all currently unreachable blocks.  n* Perform a full major collection and compact the heap. Note that heap compaction is a lengthy operation.  V * Print the current values of the memory management counters (in human-readable form) of the total program into the channel argument.   * Return the number of bytes allocated by this domain and potentially a previous domain. It is returned as a [float] to avoid overflow problems with [int] on 32-bit machines.  ɠ f* Return the current size of the free space inside the minor heap of this domain. @since 4.03  ~ * [finalise f v] registers [f] as a finalisation function for [v]. [v] must be heap-allocated. [f] will be called with [v] as argument at some point between the first time [v] becomes unreachable (including through weak pointers) and the time [v] is collected by the GC. Several functions can be registered for the same value, or even several instances of the same function. Each instance will be called once (or never, if the program terminates before [v] becomes unreachable). The GC will call the finalisation functions in the order of deallocation. When several values become unreachable at the same time (i.e. during the same GC cycle), the finalisation functions will be called in the reverse order of the corresponding calls to [finalise]. If [finalise] is called in the same order as the values are allocated, that means each value is finalised before the values it depends upon. Of course, this becomes false if additional dependencies are introduced by assignments. In the presence of multiple OCaml threads it should be assumed that any particular finaliser may be executed in any of the threads. Anything reachable from the closure of finalisation functions is considered reachable, so the following code will not work as expected: - [ let v = ... in Gc.finalise (fun _ -> ...v...) v ] Instead you should make sure that [v] is not in the closure of the finalisation function by writing: - [ let f = fun x -> ... let v = ... in Gc.finalise f v ] The [f] function can use all features of OCaml, including assignments that make the value reachable again. It can also loop forever (in this case, the other finalisation functions will not be called during the execution of f, unless it calls [finalise_release]). It can call [finalise] on [v] or other values to register other functions or even itself. It can raise an exception; in this case the exception will interrupt whatever the program was doing when the function was called. [finalise] will raise [Invalid_argument] if [v] is not guaranteed to be heap-allocated. Some examples of values that are not heap-allocated are integers, constant constructors, booleans, the empty array, the empty list, the unit value. The exact list of what is heap-allocated or not is implementation-dependent. Some constant values can be heap-allocated but never deallocated during the lifetime of the program, for example a list of integer constants; this is also implementation-dependent. Note that values of types [float] are sometimes allocated and sometimes not, so finalising them is unsafe, and [finalise] will also raise [Invalid_argument] for them. Values of type ['a Lazy.t] (for any ['a]) are like [float] in this respect, except that the compiler sometimes optimizes them in a way that prevents [finalise] from detecting them. In this case, it will not raise [Invalid_argument], but you should still avoid calling [finalise] on lazy values. The results of calling {!String.make}, {!Bytes.make}, {!Bytes.create}, {!Array.make}, and {!val:Stdlib.ref} are guaranteed to be heap-allocated and non-constant except when the length argument is [0].   * same as {!finalise} except the value is not given as argument. So you can't use the given value for the computation of the finalisation function. The benefit is that the function is called after the value is unreachable for the last time instead of the first time. So contrary to {!finalise} the value will never be reachable again or used again. In particular every weak pointer and ephemeron that contained this value as key or data is unset before running the finalisation function. Moreover the finalisation functions attached with {!finalise} are always called before the finalisation functions attached with {!finalise_last}. @since 4.04  * A finalisation function may call [finalise_release] to tell the GC that it can launch the next finalisation function without waiting for the current one to return. l * An alarm is a piece of data that calls a user function at the end of major GC cycle. The following functions are provided to create and delete alarms. E  * [create_alarm f] will arrange for [f] to be called at the end of major GC cycles, not caused by [f] itself, starting with the current cycle or the next one. [f] will run on the same domain that created the alarm, until the domain exits or [delete_alarm] is called. A value of type [alarm] is returned that you can use to call [delete_alarm]. It is not guaranteed that the Gc alarm runs at the end of every major GC cycle, but it is guaranteed that it will run eventually. As an example, here is a crude way to interrupt a function if the memory consumption of the program exceeds a given [limit] in MB, suitable for use in the toplevel: {[ let run_with_memory_limit (limit : int) (f : unit -> 'a) : 'a = let limit_memory () = let mem = Gc.(quick_stat ()).heap_words in if mem / (1024 * 1024) > limit / (Sys.word_size / 8) then raise Out_of_memory in let alarm = Gc.create_alarm limit_memory in Fun.protect f ~finally:(fun () -> Gc.delete_alarm alarm ; Gc.compact ()) ]} ꠠ {* [delete_alarm a] will stop the calls to the function associated to [a]. Calling [delete_alarm a] again has no effect.  0* [Memprof] is a profiling engine which randomly samples allocated memory words. Every allocated word has a probability of being sampled equal to a configurable sampling rate. Once a block is sampled, it becomes tracked. A tracked block triggers a user-defined callback as soon as it is allocated, promoted or deallocated. Since blocks are composed of several words, a block can potentially be sampled several times. If a block is sampled several times, then each of the callbacks is called once for each event of this block: the multiplicity is given in the [n_samples] field of the [allocation] structure. This engine makes it possible to implement a low-overhead memory profiler as an OCaml library. Note: this API is EXPERIMENTAL. It may change without prior notice. )8* the type of a profile Ǡ .* The number of samples in this block (>= 1).  9* The size of the block, in words, excluding the header. ?* The cause of the allocation. 蠠 $* The callstack for the allocation. Π * The type of metadata associated with allocations. This is the type of records passed to the callback triggered by the sampling of an allocation.   * A [('minor, 'major) tracker] describes how memprof should track sampled blocks over their lifetime, keeping a user-defined piece of metadata for each of them: ['minor] is the type of metadata to keep for minor blocks, and ['major] the type of metadata for major blocks. The member functions in a [tracker] are called callbacks. If an allocation or promotion callback raises an exception or returns [None], memprof stops tracking the corresponding block.  1* Default callbacks simply return [None] or [()]  * Start a profile with the given parameters. Raises an exception if a profile is already sampling in the current domain. Sampling begins immediately. The parameter [sampling_rate] is the sampling rate in samples per word (including headers). Usually, with cheap callbacks, a rate of 1e-4 has no visible effect on performance, and 1e-3 causes the program to run a few percent slower. 0.0 <= sampling_rate <= 1.0. The parameter [callstack_size] is the length of the callstack recorded at every sample. Its default is [max_int]. The parameter [tracker] determines how to track sampled blocks over their lifetime in the minor and major heap. Sampling and running callbacks are temporarily disabled on the current thread when calling a callback, so callbacks do not need to be re-entrant if the program is single-threaded and single-domain. However, if threads or multiple domains are used, it is possible that several callbacks will run in parallel. In this case, callback functions must be re-entrant. Note that a callback may be postponed slightly after the actual event. The callstack passed to an allocation callback always accurately reflects the allocation, but the program state may have evolved between the allocation and the call to the callback. If a new thread or domain is created when the current domain is sampling for a profile, the child thread or domain joins that profile (using the same [sampling_rate], [callstack_size], and [tracker] callbacks). An allocation callback is always run by the thread which allocated the block. If the thread exits or the profile is stopped before the callback is called, the allocation callback is not called and the block is not tracked. Each subsequent callback is generally run by the domain which allocated the block. If the domain terminates or the profile is stopped before the callback is called, the callback may be run by a different domain. Different domains may sample for different profiles simultaneously.  * Stop sampling for the current profile. Fails if no profile is sampling in the current domain. Stops sampling in all threads and domains sharing the profile. Promotion and deallocation callbacks from a profile may run after [stop] is called, until [discard] is applied to the profile. A profile is implicitly stopped (but not discarded) if all domains and threads sampling for it are terminated. Š * Discards all profiling state for a stopped profile, which prevents any more callbacks for it. Raises an exception if called on a profile which has not been stopped.  * In general, the OCaml GC assumes that the program runs in a "steady state" where peak memory usage remains constant: for each newly allocated work, it assumes that one work has become unreachable and will try to collect it during the next GC slice. This assumption is incorrect at the points during program execution where the live memory increases instead of remaining stable: the steady-state assumption will make the GC work harder at no benefit as it will not find more memory to collect. [ramp_up f] puts the current domain in a "ramp-up" phase for the duration of the evaluation of [f ()], letting the GC know that the steady-state assumption does not hold; it should be used when you know that the live memory of the program will increase significantly. During a ramp-up phase, the GC will not try to work harder for new allocations: the corresponding collection work is "suspended". The total amount of suspended collection work is returned by [ramp_up] along with the result of the function. If the user discards this suspended work (by doing nothing with it), the GC will never accelerate to recover the corresponding amount of memory. This is appropriate if the ramp-up work allocates long-lived memory that remains live until the end of the program execution. If the user knows that at a certain point in the program the live memory consumption has been reduced by the corresponding amount -- typically, because the memory allocated during [ramp_up] has become unused -- then they should call {!ramp_down} below to have the GC "resume" this collection work. If [f ()] raises an exception, the ramp-up phase terminates, the collection work that was suspended is resumed, and the exception is re-raised. If [f ()] performs an effect, the effect is not handled and an [Effect.Unhandled] exception is thrown instead.  w* Notify the GC about some amount of collection work that was suspended during a ramp-up phase, to be resumed now. i@?)../ocamlc0-strict-sequence(-absname"-w5+a-4-9-41-42-44-45-48"-g+-warn-error"+A*-bin-annot)-nostdlib*-principal"-o.stdlib__Gc.cmi"-c D/builds/workspace/precheck/flambda/false/label/ocaml-linux-32/stdlib @@0`sRmH5(~(3@@@8CamlinternalFormatBasics0%FU(Q/Tu&Stdlib0Lku]8_٠0IK98〢qH~Yd-Stdlib__Int320 u&+Stdlib__Obj0]'kZ<栠0Stdlib__Printexc00@DP,MP$Q1s.@0IK98〢qH~YdAN@ @ $ c@  dN~@@l@0@a_@^@~9R,V@a@@@ @@@аJ@ Gؕ@@@#ڕ@[0u@ t @͐  J@ͰcC@ c 2 q@:@@$ܕ@@R@@@@    @9@@ ݐ @e ɐ /0@@͕h@ 7 qU/@eE@@Iy@@ { @@@R<=ɕ@@@@@@ : y@ ) CH@ϐS  d@@OÕ@   Y@z@@@C@6&x@@P@@