Caml1999I037נ.Stdlib__Buffer!t;@@@A@@@@@*buffer.mlimm@@@@ @@A@&create@#intA@@@-@@@.@@/@p<<p<Q@@!A@@(contents@@@@0&stringQ@@@1@@2@*~ H H+~ H b@@5B@@(to_bytes@#@@@3%bytesC@@@4@@5@>B  ?B  @@IC@@#sub@7@@@6@B@@@7@H@@@84@@@9@@:@@;@@<@\G O O]G O r@@gD@@$blit@U@@@=@`@@@>@:@@@?@l@@@@@r@@@A$unitF@@@B@@C@@D@@E@@F@@G@M U UM U @@E@@#nth@@@@H@@@@I$charB@@@J@@K@@L@W  W @@F@@&length@@@@M@@@N@@O@\~~\~@@G@@%clear@@@@P@@@@Q@@R@__@@H@@%reset@@@@SR@@@T@@U@bb$@@I@@-output_buffer@&Stdlib+out_channel@@@V@@@@Wn@@@X@@Y@@Z@iuuiu@@J@@(truncate@@@@[@@@@\@@@]@@^@@_@ m m'@@K@@(add_char@@@@`@@@@a@@@b@@c@@d@$y%y@@/L@@/add_utf_8_uchar@@@@e@R%Uchar!t@@@f@@@g@@h@@i@?|@|.@@JM@@2add_utf_16le_uchar@8@@@j@m%Uchar!t@@@k@@@l@@m@@n@Z[@@eN@@2add_utf_16be_uchar@S@@@o@%Uchar!t@@@p@@@q@@r@@s@uv@@O@@*add_string@n@@@t@a@@@u@@@v@@w@@x@eee@@P@@)add_bytes@@@@y@e@@@z@@@{@@|@@}@@@Q@@-add_substring@@@@~@@@@@@@@@@@@C@@@@@@@@@@@@WWW@@R@@,add_subbytes@@@@@@@@@@@@@@@@g@@@@@@@@@@@@qqq@@S@@.add_substitute@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@T@@*add_buffer@ @@@@@@@@@@@@@@@()@@3U@@+add_channel@!@@@@U*in_channel@@@@3@@@@@@@@@@@@@GssHs@@RV@@&to_seq@@@@@s#Seq!t@@@@@@@@@a==b=Y@@lW@@'to_seqi@Z@@@#Seq!t@n@@@@@@@@@@@@@@@@@X@@'add_seq@~@@@@#Seq!t@@@@@@@@@@@@@@@@Y@@&of_seq@#Seq!t@@@@@@@@@@@@    6@@Z@@)add_uint8@@@@@@@@Q@@@@@@@@#q#q#q#@@[@@(add_int8@@@@@@@@i@@@@@@@@###$@@\@@-add_uint16_ne@@@@@@@@@@@@@@@@$o$o$o$@@]@@-add_uint16_be@@@@@ @@@@@@@@@@@%% %%+@@*^@@-add_uint16_le@@@@@#@@@@@@@@@@@7%%8%%@@B_@@,add_int16_ne@0@@@@;@@@@@@@@@@@O &4&4P &4&W@@Z`@@,add_int16_be@H@@@@S@@@@@@@@@@@g&&h&&@@ra@@,add_int16_le@`@@@@k@@@@@@@@@@@'Y'Y'Y'|@@b@@,add_int32_ne@x@@@@%int32N@@@@@@@@@@@'''(@@c@@,add_int32_be@@@@@@@@+@@@@@@@@#(|(|#(|(@@d@@,add_int32_le@@@@@2@@@C@@@@@@@@))))))-@@e@@,add_int64_ne@@@@@%int64O@@@]@@@@@@@@/))/))@@f@@,add_int64_be@@@@@@@@u@@@@@@@@5*'*'5*'*L@@g@@,add_int64_le@@@@@2@@@@@@@@@@@;**;**@@h@@@r[.Stdlib__Buffer08APF< t.-Stdlib__Uchar056uf4[_+Stdlib__Seq0nwzG&amg.Stdlib__Either0Vy`u~c à&Stdlib0Lku]8_٠8CamlinternalFormatBasics0%FU(Q/Tu@Z"@5unsynchronized_access ;Unsynchronized accesses to buffers are a programming error.@A@Caml1999T0371ZQjC.Stdlib__Buffer*ocaml.text&_none_@@A  Extensible buffers. This module implements buffers that automatically expand as necessary. It provides accumulative concatenation of strings in linear time (instead of quadratic time when strings are concatenated pairwise). For example: {[ let concat_strings ss = let b = Buffer.create 16 in List.iter (Buffer.add_string b) ss; Buffer.contents b ]} *buffer.mliP77_@@@@@@3@@@@@@#intA;@@#intA@@@@@;@A@$charB;@@$charA@@@@@A@A@&stringQ;@@&stringA@@@@@G@@@%bytesC;@@%bytesA@@@@@M@@@%floatD;@@%floatA@@@@@S@@@$boolE;@@%falsec@@]@$trued@@c@@@A@@@@@d@A@$unitF;@@"()e@@n@@@A@@@@@o@A@ #exnG;@@@A@@@@@s@@@#effH;@@O@A@A@@@@@@|@@@,continuationI;@@Q@@P@B,continuationA@nY@@@@@@@@@%arrayJ;@@R@A%arrayA@@@@@@@@@ $listK;@@S@A"[]f@@@"::g@@@T@@@ @@A@Y@@@@@@@@&optionL;@@V@A$Noneh@@@$Somei@@@@@A@Y@@@@@@@@)nativeintM;@@)nativeintA@@@@@@@@%int32N;@@%int32A@@@@@@@@%int64O;@@%int64A@@@@@@@@&lazy_tP;@@X@A&lazy_tA@Y@@@@@@@@ 5extension_constructorR;@@5extension_constructorA@@@@@@@@*floatarrayS;@@*floatarrayA@@@@@@@@&iarrayT;@@Y@A&iarrayA@Y@@@@@@@@ *atomic_locU;@@Z@A*atomic_locA@@@@@@ @@@ .Assert_failure`#@@@@@J@@@@@@@@[@@A!=ocaml.warn_on_literal_pattern%@&@0Division_by_zero]#@@@A+ . .@+End_of_file\#$@@@A366@'FailureY#,@'@@A<??@0Invalid_argumentX#5@0@@AE$H#H@-Match_failureV#>@@=@9@;@@a@@AV5Y4Y@)Not_foundZ#O@@@A^=a<a@-Out_of_memoryW#W@@@AfEiDi@.Stack_overflow^#_@@@AnMqLq@.Sys_blocked_io_#g@@@AvUyTy@)Sys_error[#o@j@@A^]@:Undefined_recursive_modulea#x@@w@s@u@@h@@Aon@:Continuation_already_takenb#@@@Awv@&Stdlib@A= {b Unsynchronized accesses} aa@@@@@@%alertcc@5unsynchronized_accesscc@@@@@ ;Unsynchronized accesses to buffers are a programming error.ddO@@ddP@@@@@@@@@@ceQR@ʰ@ Unsynchronized accesses to a buffer may lead to an invalid buffer state. Thus, concurrent accesses to a buffer must be synchronized (for instance with a {!Mutex.t}). gTUk  @@@@@@A+!tAmm@@;@@@A@@@@@m@)ocaml.doc? The abstract type of buffers. nn:@@@@@@@@@@@@@A@@@@@@@@"@&createp<@p<F@б@г#intp<Ip<L@@ @@@3      @A;@A@@гE!t-p<P.p<Q@@ @@@@@@@@@@@8p<< @K  [create n] returns a fresh buffer, initially empty. The [n] parameter is the initial size of the internal byte sequence that holds the buffer contents. That byte sequence is automatically reallocated when more than [n] characters are stored in the buffer, but shrinks back to [n] characters when [reset] is called. For best performance, [n] should be of the same order of magnitude as the number of characters that are expected to be stored in the buffer (for instance, 80 for a buffer that holds one output line). Nothing bad will happen if the buffer grows beyond that limit, however. In doubt, take [n = 16] for instance. If [n] is not between 1 and {!Sys.max_string_length}, it will be clipped to that interval. EqRRF| $ F@@@@@@@^A@@@[Y@@@@@@1(contents\~ H L]~ H T@б@г!tg~ H Wh~ H X@@ @@@3ihhiiiii@J_8@A@@г=&stringv~ H \w~ H b@@ @@@@@@@@@@@~ H H @ Z Return a copy of the current contents of the buffer. The buffer itself is unchanged.  c c@  @@@@@@@B@@@@@@@@@1(to_bytesB  B  @б@гȠ!tB  B  @@ @@@3@J_8@A@@г%bytesB  B  @@ @@@@@@@@@@@B   @ݐ j Return a copy of the current contents of the buffer. The buffer itself is unchanged. @since 4.02 C  E ; M@@@@@@@C@@@될@@@@@@1#subG O SG O V@б@г!tG O YG O Z@@ @@@3@J_8@A@@б@гݠ#int G O ^ G O a@@ @@@@@б@г점#intG O eG O h@@ @@@ @@г&string&G O l'G O r@@ @@@-@@@@@0@@@%@@3( @@@9@@6<@@@7G O O@J [Buffer.sub b off len] returns a copy of [len] bytes from the current contents of the buffer [b], starting at offset [off]. @raise Invalid_argument if [off] and [len] do not designate a valid range of [b]. DH s sEK ? S@@@@@@@]D@@!@ZX@@@@@@U$blit[M U Y\M U ]@б@г~!tfM U `gM U a@@ @@@3hgghhhhh@n8@A@@б@гJ#intwM U exM U h@@ @@@@@б@гG%bytesM U lM U q@@ @@@ @@б@гh#intM U uM U x@@ @@@/@@б@гw#intM U |M U @@ @@@>@@гU$unitM U M U @@ @@@K@@@@@N@@@%@@Q( @@@7@@T:@@@I@@WL@@@]@@Z`@@@M U U@ې o [Buffer.blit src srcoff dst dstoff len] copies [len] characters from the current contents of the buffer [src], starting at offset [srcoff] to [dst], starting at character [dstoff]. @raise Invalid_argument if [srcoff] and [len] do not designate a valid range of [src], or if [dstoff] and [len] do not designate a valid range of [dst]. @since 3.11.2 N  U  @@@@@@@E@@'@鐠@@@@@@y#nthW W @б@г!tW W  @@ @@@3@8@A@@б@г۠#intW   W @@ @@@@@г⠐$charW W @@ @@@@@@@@!@@@'@@$* @@@#W  @6 ^ Get the n-th character of the buffer. @raise Invalid_argument if index out of bounds 0X1Zb|@@@@@@@IF@@@FD@@@@@@C&lengthG\~H\~@б@гj!tR\~S\~@@ @@@3TSSTTTTT@\q8@A@@г4#inta\~b\~@@ @@@@@@@@@@@l\~~ @ D Return the number of characters currently contained in the buffer. y]z]@@@@@@@G@@@@@@@@@1%clear__@б@г!t__@@ @@@3@J_8@A@@гN$unit__@@ @@@@@@@@@@@_ @Ȑ3 Empty the buffer. `` @@@@@@@H@@@֐@@@@@@1%resetbb@б@г!tbb@@ @@@3@J_8@A@@г$unitb b$@@ @@@@@@@@@@@b @ I Empty the buffer and deallocate the internal byte sequence holding the buffer contents, replacing it with the initial internal byte sequence of length [n] that was allocated by {!Buffer.create} [n]. For long-lived buffers that may have grown a lot, [reset] allows faster reclamation of the space used by the buffer.  c%% g:s@@@@@@@$I@@@!@@@@@@1-output_buffer"iuy#iu@б@г+out_channel-iu.iu@@ @@@3/../////@J_8@A@@б@гV!t>iu?iu@@ @@@@@г$unitKiuLiu@@ @@@@@@@@!@@@'@@$* @@@Yiuu@l _ [output_buffer oc b] writes the current contents of buffer [b] on the output channel [oc]. fjgk@@@@@@@J@@@|z@@@@@@C(truncate}m ~m@б@г!tmm@@ @@@3@\q8@A@@б@гl#intmm@@ @@@@@гJ$unitm#m'@@ @@@@@@@@!@@@'@@$* @@@m@ǐ [truncate b len] truncates the length of [b] to [len] Note: the internal byte sequence is not shortened. @raise Invalid_argument if [len < 0] or [len > length b]. @since 4.05 n((q@@@@@@@K@@@Ր@@@@@@C␠/ {1 Appending} ss@@@@@@3@Uj1@A Note: all [add_*] operations can raise [Failure] if the internal byte sequence of the buffer would need to grow beyond {!Sys.max_string_length}. uw@@@@@@(add_charyy@б@г!tyy@@ @@@+@@б@г㠐$charyy@@ @@@:@@гǠ$unit#y$y@@ @@@G@@@@@J@@@%@@M( @@@1y@D D [add_char b c] appends the character [c] at the end of buffer [b]. >z?z@@@@@@@WL@@@TR@@@@@@l/add_utf_8_uchar<U|V|@б@гx!t`|a|@@ @@@3baabbbbb@o8@A@@б@г%Uchar!tu|v|$@ y|%z|&@@@@@@z @@г+$unit|*|.@@ @@@{'@@@@@|*@@@0@@}-3 @@@|@ [add_utf_8_uchar b u] appends the {{:https://tools.ietf.org/html/rfc3629} UTF-8} encoding of [u] at the end of buffer [b]. @since 4.06 }//@@@@@@@M@@@@@@@@@L2add_utf_16le_uchar=@б@гܠ!t@@ @@@~3@ez8@A@@б@гC%Uchar!t@ @@@@@@ @@г$unit@@ @@@'@@@@@*@@@0@@-3 @@@@ [add_utf_16le_uchar b u] appends the {{:https://tools.ietf.org/html/rfc2781}UTF-16LE} encoding of [u] at the end of buffer [b]. @since 4.06 @@@@@@@N@@@@@@@@@L2add_utf_16be_uchar>@б@г@!t()@@ @@@3*))*****@ez8@A@@б@г%Uchar!t=>@ AB@@@@@@ @@г$unitOP@@ @@@'@@@@@*@@@0@@-3 @@@]@p [add_utf_16be_uchar b u] appends the {{:https://tools.ietf.org/html/rfc2781}UTF-16BE} encoding of [u] at the end of buffer [b]. @since 4.06 jkQc@@@@@@@O@@@~@@@@@@L*add_string?eies@б@г!tevew@@ @@@3@ez8@A@@б@гd&stringe{e@@ @@@@@гN$unitee@@ @@@@@@@@!@@@'@@$* @@@ee@ː C [add_string b s] appends the string [s] at the end of buffer [b]. @@@@@@@P@@@ِ@@@@@@C)add_bytes@@б@г!t@@ @@@3@\q8@A@@б@г%bytes@@ @@@@@г$unit@@ @@@@@@@@!@@@'@@$* @@@@& Y [add_bytes b s] appends the byte sequence [s] at the end of buffer [b]. @since 4.02  !CU@@@@@@@9Q@@@64@@@@@@C-add_substringA7W[8Wh@б@гZ!tBWkCWl@@ @@@3DCCDDDDD@\q8@A@@б@г&stringSWpTWv@@ @@@@@б@г5#intbWzcW}@@ @@@ @@б@гD#intqWrW@@ @@@/@@г"$unit~WW@@ @@@<@@@@@?@@@%@@B( @@@7@@E:@@@K@@HN@@@WW@ [add_substring b s ofs len] takes [len] characters from offset [ofs] in string [s] and appends them at the end of buffer [b]. @raise Invalid_argument if [ofs] and [len] do not designate a valid range of [s]. [o@@@@@@@R@@$@@@@@@@g,add_subbytesBquq@б@г٠!tqq@@ @@@3@8@A@@б@г%bytesqq@@ @@@@@б@г#intqq@@ @@@ @@б@гà#intqq@@ @@@/@@г$unitqq@@ @@@<@@@@@?@@@%@@B( @@@7@@E:@@@K@@HN@@@ qq@$ [add_subbytes b s ofs len] takes [len] characters from offset [ofs] in byte sequence [s] and appends them at the end of buffer [b]. @raise Invalid_argument if [ofs] and [len] do not designate a valid range of [s]. @since 4.02   @@@@@@@ 7S@@$@4 2@@@@@@g.add_substituteC 5 6@б@гX!t @ A@@ @@@3 B A A B B B B B@8@A@@б@б@г &string S T@@ @@@@@г '&string ` a@@ @@@ @@@@@#@@б@г 9&string r s@@ @@@2@@г #$unit  @@ @@@?@@@@@B@@@$@@E  @@@L@@IO@@@ @  [add_substitute b f s] appends the string pattern [s] at the end of buffer [b] with substitution. The substitution process looks for variable references in the pattern and substitutes each variable reference with its value, as obtained by applying the mapping [f] to the variable name. Inside the string pattern, a variable reference is a non-escaped [$] immediately followed by a variable name, which is one of the following: - a non empty sequence of alphanumeric or [_] characters, - an arbitrary sequence of characters enclosed by a pair of matching parentheses or curly brackets. An escaped [$] character is a [$] that immediately follows a backslash character; the two characters together stand for a plain [$].   @@@@@@@ T@@"@ @@@@@@h*add_bufferD  @б@гؠ!t  @@ @@@3        @8@A@@б@г預!t  @@ @@@@@г $unit  @@ @@@@@@@@!@@@'@@$* @@@ @ u [add_buffer b1 b2] appends the current contents of buffer [b2] at the end of buffer [b1]. [b2] is not modified.   :q@@@@@@@ U@@@ @@@@@@C+add_channelE sw s@б@г3!t s s@@ @@@3        @\q8@A@@б@г*in_channel ,s -s@@ @@@@@б@г #int ;s <s@@ @@@ @@г 점$unit Hs Is@@ @@@-@@@@@0@@@%@@3( @@@9@@6<@@@ Yss@l p [add_channel b ic n] reads at most [n] characters from the input channel [ic] and stores them at the end of buffer [b]. @raise End_of_file if the channel contains fewer than [n] characters. In this case, the characters are still added to the buffer, so as to avoid loss of data. @raise Invalid_argument if [len < 0] or [len > Sys.max_string_length].  f g@@@@@@@ V@@!@| z@@@@@@U  ; {1 Buffers and Sequences}   ;@@@@@@3        @g|1@A&to_seq =A =G@б@г!t =J =K@@ @@@@@г #Seq!t =T =W@  =X =Y@@г $char =O =S@@ @@@ :@@@ @@@ ? @@@+@@ B.@@@ ==@ސ Iterate on the buffer, in increasing order. The behavior is not specified if the buffer is modified during iteration. @since 4.07  ZZ @@@@@@@ W@@+@ 쐠@@@@@@a'to_seqi  @б@г !t  @@ @@@ 3        @zu8@A@@г w#Seq!t   @   @@В@г #int  !@@ @@@ &@@@г $char / 0 @@ @@@ 5@@@@@ @@ < @@@: @@@ A A0@@@H@@ EK3@@@ G6@ Z Iterate on the buffer, in increasing order, yielding indices along chars. The behavior is not specified if the buffer is modified during iteration. @since 4.07  T U@@@@@@@ mX@@F@ j h@@@@@@d'add_seq k l@б@г !t v w@@ @@@ 3 x w w x x x x x@}8@A@@б@г #Seq!t  @   @@г g$char  @@ @@@ $@@@ @@@ ) @@г P$unit  @@ @@@ 6@@@@@ 9@@@?@@ <B @@@ @ ͐ ) Add chars to the buffer @since 4.07     @@@@@@@ Y@@@  ې@@@@@@[&of_seq      $@б@г W#Seq!t   ,   /@    0   1@@г ɠ$char   '   +@@ @@@ 3        @K@A@@@" @@@  @@г (!t   5   6@@ @@@ @@@@@ @@@    @ . 4 Create a buffer from the generator @since 4.07  ( 7 7 ) ^ p@@@@@@@ AZ@@@ > <@@@@@@6 J I ! {1 Binary encoding of integers}  F r r G r @@@@@@3 E D D E E E E E@Hp1@A ] \  The functions in this section append binary encodings of integers to buffers. Little-endian (resp. big-endian) encoding means that least (resp. most) significant bytes are stored first. Big-endian is also known as network byte order. Native-endian encoding is either little-endian or big-endian depending on {!Sys.big_endian}. 32-bit and 64-bit integers are represented by the [int32] and [int64] types, which can be interpreted either as signed or unsigned numbers. 8-bit and 16-bit integers are represented by the [int] type, which has more bits than the binary encoding. Functions that encode these values truncate their inputs to their least significant bytes.  Y   Z#m#o@@@@@@)add_uint8 c#q#u d#q#~@б@г !t n#q# o#q#@@ @@@ +@@б@г P#int }#q# ~#q#@@ @@@ :@@г .$unit #q# #q#@@ @@@ G@@@@@ J@@@%@@ M( @@@ #q#q@ Y [add_uint8 b i] appends a binary unsigned 8-bit integer [i] to [b]. @since 4.08  ## ##@@@@@@@ [@@@  @@@@@@l(add_int8 ## ##@б@г ߠ!t #$ #$@@ @@@ 3        @o8@A@@б@г #int #$ #$ @@ @@@ @@г $unit #$  #$@@ @@@ @@@@@ !@@@'@@ $* @@@ ##@  V [add_int8 b i] appends a binary signed 8-bit integer [i] to [b]. @since 4.08  $$ $k$m@@@@@@@ \@@@  @@@@@@C-add_uint16_ne $o$s $o$@б@г :!t "$o$ #$o$@@ @@@ 3 $ # # $ $ $ $ $@\q8@A@@б@г #int 3$o$ 4$o$@@ @@@ @@г 䠐$unit @$o$ A$o$@@ @@@ @@@@@ !@@@'@@ $* @@@ N$o$o@ a l [add_uint16_ne b i] appends a binary native-endian unsigned 16-bit integer [i] to [b]. @since 4.08  [$$ \%%@@@@@@@ t]@@@ q o@@@@@@C-add_uint16_be r%%  s%%@б@г !t }%% ~%%@@ @@@ 3  ~ ~     @\q8@A@@б@г a#int %%  %%#@@ @@@ @@г ?$unit %%' %%+@@ @@@ @@@@@ !@@@'@@ $* @@@ %%@ i [add_uint16_be b i] appends a binary big-endian unsigned 16-bit integer [i] to [b]. @since 4.08  %,%, %%@@@@@@@ ^@@@  ʐ@@@@@@C-add_uint16_le %% %%@б@г !t %% %%@@ @@@ 3        @\q8@A@@б@г #int %% %%@@ @@@ @@г $unit %% %%@@ @@@ @@@@@ !@@@'@@ $* @@@%%@  l [add_uint16_le b i] appends a binary little-endian unsigned 16-bit integer [i] to [b]. @since 4.08 %% &0&2@@@@@@@*_@@@ '%@@@@@@C,add_int16_ne( &4&8) &4&D@б@г K!t3 &4&G4 &4&H@@ @@@ 354455555@\q8@A@@б@г#intD &4&LE &4&O@@ @@@ @@г $unitQ &4&SR &4&W@@ @@@ @@@@@ !@@@'@@ $* @@@_ &4&4@ r i [add_int16_ne b i] appends a binary native-endian signed 16-bit integer [i] to [b]. @since 4.08 l &X&Xm&&@@@@@@@`@@@ @@@@@@C,add_int16_be&&&&@б@г !t&&&&@@ @@@ 3@\q8@A@@б@гr#int&&&&@@ @@@ @@гP$unit&&&&@@ @@@ @@@@@ !@@@'@@ $* @@@&&@ ͐ f [add_int16_be b i] appends a binary big-endian signed 16-bit integer [i] to [b]. @since 4.08 &&'U'W@@@@@@@a@@@ ې@@@@@@C,add_int16_le'Y']'Y'i@б@г !t'Y'l'Y'm@@ @@@ 3@\q8@A@@б@г͠#int'Y'q'Y't@@ @@@ @@г$unit'Y'x'Y'|@@ @@@ @@@@@ !@@@'@@ $* @@@'Y'Y@ ( i [add_int16_le b i] appends a binary little-endian signed 16-bit integer [i] to [b]. @since 4.08 "'}'}#''@@@@@@@;b@@@ 86@@@@@@C,add_int32_ne9'':''@б@г \!tD'(E'(@@ @@@ 3FEEFFFFF@\q8@A@@б@г%int32U'(V'( @@ @@@ @@г$unitb'(c'(@@ @@@ @@@@@ !@@@'@@ $* @@@p''@ b [add_int32_ne b i] appends a binary native-endian 32-bit integer [i] to [b]. @since 4.08 }((~!(x(z@@@@@@@c@@@ @@@@@@C,add_int32_be#(|(#(|(@б@г !t#(|(#(|(@@ @@@ !3@\q8@A@@б@г砐%int32#(|(#(|(@@ @@@ "@@гa$unit#(|(#(|(@@ @@@ #@@@@@ $!@@@'@@ %$* @@@#(|(|@ ސ _ [add_int32_be b i] appends a binary big-endian 32-bit integer [i] to [b]. @since 4.08 $(('))@@@@@@@d@@@ 쐠@@@@@@C,add_int32_le))) )))@б@г!t))))))@@ @@@ &3@\q8@A@@б@гB%int32 )))  )))%@@ @@@ '@@г$unit)))))))-@@ @@@ (@@@@@ )!@@@'@@ *$* @@@&)))@9 b [add_int32_le b i] appends a binary little-endian 32-bit integer [i] to [b]. @since 4.08 3*).).4-))@@@@@@@Le@@@IG@@@@@@C,add_int64_neJ/))K/))@б@гm!tU/))V/))@@ @@@ +3WVVWWWWW@\q8@A@@б@г%int64f/))g/))@@ @@@ ,@@г$units/))t/))@@ @@@ -@@@@@ .!@@@'@@ /$* @@@/))@ b [add_int64_ne b i] appends a binary native-endian 64-bit integer [i] to [b]. @since 4.08 0))3*#*%@@@@@@@f@@@@@@@@@C,add_int64_be5*'*+5*'*7@б@гȠ!t5*'*:5*'*;@@ @@@ 03@\q8@A@@б@г%int645*'*?5*'*D@@ @@@ 1@@гr$unit5*'*H5*'*L@@ @@@ 2@@@@@ 3!@@@'@@ 4$* @@@5*'*'@ _ [add_int64_be b i] appends a binary big-endian 64-bit integer [i] to [b]. @since 4.08 6*M*M9**@@@@@@@g@@@@@@@@@C,add_int64_le;**;**@б@г#!t ;** ;**@@ @@@ 53        @\q8@A@@б@гM%int64;**;**@@ @@@ 6@@г͠$unit);***;**@@ @@@ 7@@@@@ 8!@@@'@@ 9$* @@@7;**@J b [add_int64_ne b i] appends a binary little-endian 64-bit integer [i] to [b]. @since 4.08 D<**E?+>+@@@@@@@@]h@@@ZX@@@@@@C@qkA@H!@@@s(@ @ y @@  @  @  k@ K @  @ u >@  @  z@ Z @  @  f@ F@l@L@@u*@@@@ @p@,@@|C@#@@q8@@@f-@ @{@["@@p@@3@r@A@ H************************************************************************A@@A@L@ H BMMBM@ H OCaml CC@ H DD3@ H Pierre Weis and Xavier Leroy, projet Cristal, INRIA Rocquencourt E44E4@ H FF@ H Copyright 1999 Institut National de Recherche en Informatique et GG@ H en Automatique. HHg@ H IhhIh@ H All rights reserved. This file is distributed under the terms of JJ@ H the GNU Lesser General Public License version 2.1, with the KKN@ H special exception on linking described in the file LICENSE. LOOLO@ H MM@ H************************************************************************NN5@ * Extensible buffers. This module implements buffers that automatically expand as necessary. It provides accumulative concatenation of strings in linear time (instead of quadratic time when strings are concatenated pairwise). For example: {[ let concat_strings ss = let b = Buffer.create 16 in List.iter (Buffer.add_string b) ss; Buffer.contents b ]} >* {b Unsynchronized accesses} a * Unsynchronized accesses to a buffer may lead to an invalid buffer state. Thus, concurrent accesses to a buffer must be synchronized (for instance with a {!Mutex.t}). ( * The abstract type of buffers.  * [create n] returns a fresh buffer, initially empty. The [n] parameter is the initial size of the internal byte sequence that holds the buffer contents. That byte sequence is automatically reallocated when more than [n] characters are stored in the buffer, but shrinks back to [n] characters when [reset] is called. For best performance, [n] should be of the same order of magnitude as the number of characters that are expected to be stored in the buffer (for instance, 80 for a buffer that holds one output line). Nothing bad will happen if the buffer grows beyond that limit, however. In doubt, take [n = 16] for instance. If [n] is not between 1 and {!Sys.max_string_length}, it will be clipped to that interval. Ơ [* Return a copy of the current contents of the buffer. The buffer itself is unchanged.  k* Return a copy of the current contents of the buffer. The buffer itself is unchanged. @since 4.02 : * [Buffer.sub b off len] returns a copy of [len] bytes from the current contents of the buffer [b], starting at offset [off]. @raise Invalid_argument if [off] and [len] do not designate a valid range of [b]. Р p* [Buffer.blit src srcoff dst dstoff len] copies [len] characters from the current contents of the buffer [src], starting at offset [srcoff] to [dst], starting at character [dstoff]. @raise Invalid_argument if [srcoff] and [len] do not designate a valid range of [src], or if [dstoff] and [len] do not designate a valid range of [dst]. @since 3.11.2 B _* Get the n-th character of the buffer. @raise Invalid_argument if index out of bounds  ꠠ E* Return the number of characters currently contained in the buffer.  4* Empty the buffer.  ^ J* Empty the buffer and deallocate the internal byte sequence holding the buffer contents, replacing it with the initial internal byte sequence of length [n] that was allocated by {!Buffer.create} [n]. For long-lived buffers that may have grown a lot, [reset] allows faster reclamation of the space used by the buffer.   `* [output_buffer oc b] writes the current contents of buffer [b] on the output channel [oc].  * [truncate b len] truncates the length of [b] to [len] Note: the internal byte sequence is not shortened. @raise Invalid_argument if [len < 0] or [len > length b]. @since 4.05  h0* {1 Appending}  M * Note: all [add_*] operations can raise [Failure] if the internal byte sequence of the buffer would need to grow beyond {!Sys.max_string_length}.  = E* [add_char b c] appends the character [c] at the end of buffer [b].  * [add_utf_8_uchar b u] appends the {{:https://tools.ietf.org/html/rfc3629} UTF-8} encoding of [u] at the end of buffer [b]. @since 4.06  * [add_utf_16le_uchar b u] appends the {{:https://tools.ietf.org/html/rfc2781}UTF-16LE} encoding of [u] at the end of buffer [b]. @since 4.06  2 * [add_utf_16be_uchar b u] appends the {{:https://tools.ietf.org/html/rfc2781}UTF-16BE} encoding of [u] at the end of buffer [b]. @since 4.06  Ѡ D* [add_string b s] appends the string [s] at the end of buffer [b].  y Z* [add_bytes b s] appends the byte sequence [s] at the end of buffer [b]. @since 4.02  ! * [add_substring b s ofs len] takes [len] characters from offset [ofs] in string [s] and appends them at the end of buffer [b]. @raise Invalid_argument if [ofs] and [len] do not designate a valid range of [s].  * [add_subbytes b s ofs len] takes [len] characters from offset [ofs] in byte sequence [s] and appends them at the end of buffer [b]. @raise Invalid_argument if [ofs] and [len] do not designate a valid range of [s]. @since 4.02  ) * [add_substitute b f s] appends the string pattern [s] at the end of buffer [b] with substitution. The substitution process looks for variable references in the pattern and substitutes each variable reference with its value, as obtained by applying the mapping [f] to the variable name. Inside the string pattern, a variable reference is a non-escaped [$] immediately followed by a variable name, which is one of the following: - a non empty sequence of alphanumeric or [_] characters, - an arbitrary sequence of characters enclosed by a pair of matching parentheses or curly brackets. An escaped [$] character is a [$] that immediately follows a backslash character; the two characters together stand for a plain [$].  v* [add_buffer b1 b2] appends the current contents of buffer [b2] at the end of buffer [b1]. [b2] is not modified. T q* [add_channel b ic n] reads at most [n] characters from the input channel [ic] and stores them at the end of buffer [b]. @raise End_of_file if the channel contains fewer than [n] characters. In this case, the characters are still added to the buffer, so as to avoid loss of data. @raise Invalid_argument if [len < 0] or [len > Sys.max_string_length]. ꠠ<* {1 Buffers and Sequences} Ϡ * Iterate on the buffer, in increasing order. The behavior is not specified if the buffer is modified during iteration. @since 4.07 ~ * Iterate on the buffer, in increasing order, yielding indices along chars. The behavior is not specified if the buffer is modified during iteration. @since 4.07  ** Add chars to the buffer @since 4.07  5* Create a buffer from the generator @since 4.07 7 "* {1 Binary encoding of integers}  * The functions in this section append binary encodings of integers to buffers. Little-endian (resp. big-endian) encoding means that least (resp. most) significant bytes are stored first. Big-endian is also known as network byte order. Native-endian encoding is either little-endian or big-endian depending on {!Sys.big_endian}. 32-bit and 64-bit integers are represented by the [int32] and [int64] types, which can be interpreted either as signed or unsigned numbers. 8-bit and 16-bit integers are represented by the [int] type, which has more bits than the binary encoding. Functions that encode these values truncate their inputs to their least significant bytes.  Z* [add_uint8 b i] appends a binary unsigned 8-bit integer [i] to [b]. @since 4.08 à W* [add_int8 b i] appends a binary signed 8-bit integer [i] to [b]. @since 4.08 k m* [add_uint16_ne b i] appends a binary native-endian unsigned 16-bit integer [i] to [b]. @since 4.08  j* [add_uint16_be b i] appends a binary big-endian unsigned 16-bit integer [i] to [b]. @since 4.08  m* [add_uint16_le b i] appends a binary little-endian unsigned 16-bit integer [i] to [b]. @since 4.08 c j* [add_int16_ne b i] appends a binary native-endian signed 16-bit integer [i] to [b]. @since 4.08  g* [add_int16_be b i] appends a binary big-endian signed 16-bit integer [i] to [b]. @since 4.08  j* [add_int16_le b i] appends a binary little-endian signed 16-bit integer [i] to [b]. @since 4.08 [ c* [add_int32_ne b i] appends a binary native-endian 32-bit integer [i] to [b]. @since 4.08  `* [add_int32_be b i] appends a binary big-endian 32-bit integer [i] to [b]. @since 4.08  c* [add_int32_le b i] appends a binary little-endian 32-bit integer [i] to [b]. @since 4.08 S c* [add_int64_ne b i] appends a binary native-endian 64-bit integer [i] to [b]. @since 4.08  `* [add_int64_be b i] appends a binary big-endian 64-bit integer [i] to [b]. @since 4.08  c* [add_int64_ne b i] appends a binary little-endian 64-bit integer [i] to [b]. @since 4.08 K@G)../ocamlc0-strict-sequence(-absname"-w5+a-4-9-41-42-44-45-48"-g+-warn-error"+A*-bin-annot)-nostdlib*-principal"-w"+A"-o2stdlib__Buffer.cmi"-c Z/home/teraram/ci/builds/workspace/parallel-build/flambda/true/label/ocaml-manycores/stdlib @@0NZS^RN3@@@8CamlinternalFormatBasics0%FU(Q/Tu&Stdlib0Lku]8_٠ɐ08APF< t..Stdlib__Either0Vy`u~c à+Stdlib__Seq0nwzG&amg-Stdlib__Uchar056uf4[_@08APF< t.Aiǐ@  @y@gK@r@Z@@@@@F ߐ 4 ܐ@@@]F K   @  ܰ  @Ӑ2@@4 8 @@@=w@@s d @0j@@@@@ǐ@  b s  R @  g@@@P@@