Caml1999I031 @s M2Stdlib__In_channel!t*8@@@A&Stdlib*in_channel@@@@@@@.in_channel.mliTbbTbu@@@@@A@)open_flag+8@@+Open_rdonly @@XX@@#B+Open_wronly@@YY@@,C+Open_append@@"Z#Z(@@5D*Open_creat@@+[fh,[ft@@>E*Open_trunc@@4\5\@@GF)Open_excl@@=]>]@@PG+Open_binary@@F^57G^5D@@YH)Open_text@@O_vxP_v@@bI-Open_nonblock@@X`Y`@@kJ@@Ae)open_flag@@@@@@@cW @@A@uAA@%stdin,z@@@@ocpc*@@K@(open_bin-@&stringO@@@@@@@@@fWWfWq@@L@)open_text.@@@@'@@@@@@jj@@M@(open_gen/@$listI@@@@@@@#intA@@@@;@@@N@@@@@@@@@@p  p  @@@N@-with_open_bin0@M@@@@@d@@@!a@@@@@@@@v @ @v @ m@@O@.with_open_text1@g@@@@@~@@@!a@@@@@@@@{ - -{ - [@@P@-with_open_gen2@[Y@@@@@@@X@@@@@@@@@@@@!a@@@@@@@@@@@@    @@-Q@$seek3@@@@@%int64M@@@$unitF@@@@@@@@6C  7C  @@IR@#pos4@@@@@@@@@@HH d dIH d x@@[S@&length5@@@@,@@@@@@ZP[P6@@mT@%close6@@@@8@@@@@@lWmW@@U@+close_noerr7@ @@@J@@@@@@~\\@@V@*input_char8@@@@&optionJ$charB@@@@@@@@@__@@W@*input_byte9@9@@@@@@@@@@@@cppcp@@X@*input_line:@P@@@2H@@@@@@@@@gg?@@Y@%input;@g@@@@%bytesC@@@@2@@@@8@@@<@@@@@@@@@@@@qqI@@Z@,really_input<@@@@@&@@@@V@@@@\@@@@@@@@@@@@@@@@@@||X@@)[@3really_input_string=@@@@@y@@@@@@@@@@@@@@34@@F\@)input_all>@@@@@@@@@@EF@@X]@/set_binary_mode?@@@@@$boolE@@@+@@@@@@@@_  ` 1@@r^@@p;/2Stdlib__In_channel0m1!~ &Stdlib0yӶ~*8CamlinternalFormatBasics0cEXyTbg?Tbh@@8@@@A*in_channel@@@@@@@HTbbITbu@)ocaml.docZ< The type of input channel. WUvvXUv@@@@@@@@@o@@@Aг`Tbk@@0^]]^^^^^@])8@@@A0@@B@B@@@@@$!@@@A #@@%"@i%$@A()open_flag BvWwW@@8@@+Open_rdonly @@XX@83 open for reading. XX@@@@@@@B+Open_wronly@@YY@N3 open for writing. YY@@@@@@@C+Open_append@@ZZ(@d 2 open for appending: always write at end of file. Z.Ze@@@@@@@D*Open_creat@@[fh[ft@z ' create the file if it does not exist. [f{[f@@@@@@@E*Open_trunc@@\\@ & empty the file if it already exists. \\@@@@@@@F)Open_excl@@]]@ 1 fail if Open_creat and the file already exists. ]]4@@@@@@@G+Open_binary@@^57^5D@ & open in binary mode (no conversion). ^5J^5u@@@@@@@)H)Open_text@@_vx_v@Ґ . open in text mode (may perform conversions). '_v(_v@@@@@@@?I-Open_nonblock@@0`1`@萠< open in non-blocking mode. =`>`@@@@@@@UJ@@A)open_flag@@@@@@@HW@ Opening modes for {!open_gen}. TaUa@@@@@@@A@lA@ޠް\X@@@@ܠΠΰbY@@@@̠hZ@@@@n[fj@@@@t\@@@@z]@@@@~~^59|@@@@|nn_vzl@@@@ol^^`\@@@@_\@AгN&StdlibPWW@@W0@a[)8@@@A0@@C@C@@@@@\Z@@M@A @@][@0@ @A^u@%stdinc!c&@гy!tc)c*@@ @@@0@$LF@A@@@c @x % The standard input for the process. d++d+U@@@@@@@K@@(open_binfW[fWc@б@гA&stringfWffWl@@ @@@0@.A,@A@@г!tfWpfWq@@ @@@@@@@@@@@fWW @ | Open the named file for reading, and return a new input channel on that file, positioned at the beginning of the file.  grr h@@@@@@@"L@@%)open_textjj@б@г~&string!j"j @@ @@@0#""#####@>S,@A@@г!t0j1j@@ @@@@@@@@@@@;j @򐠠 Same as {!open_bin}, but the file is opened in text mode, so that newline translation takes place during reads. On operating systems that do not distinguish between text mode and binary mode, this function behaves like {!open_bin}. GkHn @@@@@@@_M@@%(open_genSp  Tp  @б@г$list^p  &_p  *@г)open_flaghp  ip  %@@ @@@0jiijjjjj@H]6@A@@@ @@@ @@б@г(#int~p  .p  1@@ @@@@@б@гꠐ&stringp  5p  ;@@ @@@%@@г\!tp  ?p  @@@ @@@2@@@@@5@@@%@@8( @@@8@@;A@@@p  @b [open_gen mode perm filename] opens the named file for reading, as described above. The extra arguments [mode] and [perm] specify the opening mode and file permissions. {!open_text} and {!open_bin} are special cases of this function. q A At . >@@@@@@@N@ @N-with_open_binv @ Dv @ Q@б@г+&stringv @ Tv @ Z@@ @@@0@g,@A@@б@б@г!tv @ _v @ `@@ @@@@@А!a@C@v @ dv @ f@@@ @@!@@А!a%v @ kv @ m@@@ @@*v @ ^@@@1@@.4@@@v @ @ @ [with_open_bin fn f] opens a channel [ic] on file [fn] and returns [f ic]. After [f] returns, either with a value or by raising an exception, [ic] is guaranteed to be closed. w n ny  +@@@@@@@(O@@A.with_open_text{ - 1{ - ?@б@г&string'{ - B({ - H@@ @@@0)(()))))@Zo,@A@@б@б@г!t:{ - M;{ - N@@ @@@@@А!a@C@I{ - RJ{ - T@@@ @@!@@А!a%R{ - YS{ - [@@@ @@*W{ - L@@@1@@.4@@@]{ - - @ W Like {!with_open_bin}, but the channel is opened in text mode (see {!open_text}). i| \ \j}  @@@@@@@P@@A-with_open_genu  v  @б@г$list    @г)open_flag    @@ @@@0@dy6@A@@@ @@@ @@б@гJ#int    @@ @@@@@б@г &string    @@ @@@%@@б@б@г!t    @@ @@@6@@А!a@C@?    @@@ @@D@@А!aH    @@@ @@M  @@@/@@Q2@@@A@@TD @@@T@@W]@@@  @ Like {!with_open_bin}, but can specify the opening mode and file permission, in case the file must be created (see {!open_gen}). @  A R @@@@@@@ Q@ @j$seekC  C  @б@гΠ!t C   C  @@ @@@0  @,@A@@б@г%int64C  C  @@ @@@@@г$unit*C  +C  @@ @@@@@@@@!@@@'@@$* @@@8C  @ [seek chan pos] sets the current reading position to [pos] for channel [chan]. This works only for regular files. On files of other kinds, the behavior is unspecified. DD  EF C b@@@@@@@\R@@7#posPH d hQH d k@б@г!t[H d n\H d o@@ @@@0]\\]]]]]@Pe,@A@@г %int64jH d skH d x@@ @@@@@@@@@@@uH d d @,  Return the current reading position for the given channel. For files opened in text mode under Windows, the returned position is approximate (owing to end-of-line conversion); in particular, saving the current position with {!pos}, then going back to this position using {!seek} will not work. For this programming idiom to work reliably and portably, the file must be opened in binary mode. I y yN@@@@@@@S@@%&lengthP#P)@б@гZ!tP,P-@@ @@@0@>S,@A@@гI%int64P1P6@@ @@@@@@@@@@@P @i _ Return the size (number of characters) of the regular file on which the given channel is opened. If the channel is opened on a file that is not a regular file, the result is meaningless. The returned size does not take into account the end-of-line translations that can be performed when reading from a channel opened in text mode. Q77Uq@@@@@@@T@@%%close WW@б@г!tWW@@ @@@0@>S,@A@@г=$unitWW@@ @@@@@@@@@@@W @ Close the given channel. Input functions raise a [Sys_error] exception when they are applied to a closed input channel, except {!close}, which does nothing when applied to an already closed channel. XZP@@@@@@@U@@%+close_noerr!\\@б@гԠ!t\\@@ @@@0@>S,@A@@гz$unit!\"\@@ @@@@@@@@@@@,\ @㐠 * Same as {!close}, but ignore all errors. 8]9]@@@@@@@PV@@%*input_char"D_E_@б@г!tO_P_@@ @@@0QPPQQQQQ@>S,@A@@гҠ&option^___@г&$charh_i_@@ @@@@@@@@@ @@@$@@!'@@@x_@/ o Read one character from the given input channel. Returns [None] if there are no more characters to read. `aHn@@@@@@@W@)@4*input_byte#cptcp~@б@г]!tcpcp@@ @@@0@Mb,@A@@г&optioncpcp@г^#intcpcp@@ @@@@@@@@@ @@@$@@ !'@@@cpp@{ Same as {!input_char}, but return the 8-bit integer representing the character. Returns [None] if the end of file was reached. de@@@@@@@X@)@4*input_line$g g*@б@г!tg-g.@@ @@@ 0@Mb,@A@@гj&optiong9g?@г]&stringg2g8@@ @@@ @@@@@@  @@@$@@!'@@@g@ǐ  [input_line ic] reads characters from [ic] until a newline or the end of file is reached. Returns the string of all characters read, without the newline (if any). Returns [None] if the end of the file has been reached. In particular, this will be the case if the last line of input is empty. A newline is the character [\n] unless the file is open in text mode and {!Sys.win32} is [true] in which case it is the sequence of characters [\r\n]. h@@o@@@@@@@4Y@)@4%input%(q")q'@б@г!t3q*4q+@@ @@@054455555@Mb,@A@@б@г%bytesDq/Eq4@@ @@@@@б@г#intSq8Tq;@@ @@@ @@б@г #intbq?cqB@@ @@@/@@г#intoqFpqI@@ @@@<@@@@@?@@@%@@B( @@@7@@E:@@@K@@HN@@@q@:  [input ic buf pos len] reads up to [len] characters from the given channel [ic], storing them in byte sequence [buf], starting at character number [pos]. It returns the actual number of characters read, between 0 and [len] (inclusive). A return value of 0 means that the end of file was reached. Use {!really_input} to read exactly [len] characters. @raise Invalid_argument if [pos] and [len] do not designate a valid range of [buf]. rJJz@@@@@@@Z@#@[,really_input&|"|.@б@гh!t|1|2@@ @@@0@t,@A@@б@г%bytes|6|;@@ @@@@@б@гp#int|?|B@@ @@@ @@б@г#int|F|I@@ @@@/@@гV&option|R|X@гE$unit|M|Q@@ @@@F@@@@@@K @@@"@@N%@@@4@@ Q7@@@F@@!TI@@@Z@@"W] @@@|#@ Q [really_input ic buf pos len] reads [len] characters from channel [ic], storing them in byte sequence [buf], starting at character number [pos]. Returns [None] if the end of file is reached before [len] characters have been read. @raise Invalid_argument if [pos] and [len] do not designate a valid range of [buf]. }YY@@@@@@@)[@2@j3really_input_string'@б@гꠐ!t()@@ @@@#0*))*****@,@A@@б@г㠐#int9:@@ @@@$@@г&optionFG@г&stringPQ@@ @@@%(@@@@@@'- @@@"@@(0%@@@6@@)39@@@c@ [really_input_string ic len] reads [len] characters from channel [ic] and returns them in a new string. Returns [None] if the end of file is reached before [len] characters have been read. op@@@@@@@\@,@F)input_all({|@б@гH!t@@ @@@*0@_t,@A@@г&string@@ @@@+@@@@@,@@@ @W 4 [input_all ic] reads all remaining data from [ic]. @@@@@@@]@@%/set_binary_mode)  @б@г!t   !@@ @@@-0@>S,@A@@б@г$bool % )@@ @@@.@@г:$unit - 1@@ @@@/@@@@@0!@@@'@@1$* @@@  @  [set_binary_mode ic true] sets the channel [ic] to binary mode: no translations take place during input. [set_binary_mode ic false] sets the channel [ic] to text mode: depending on the operating system, some translations may take place during input. For instance, under Windows, end-of-lines will be translated from [\r\n] to [\n]. This function has no effect under operating systems that do not distinguish between text mode and binary mode. 22@@@@@@@ ^@@7@A@A@[F@2 @@b@N @@*@@@g@S,@@@]@I@@"@@@w>@@0 ( ' ' ( ( ( ( (@dy@@A@ H************************************************************************ 1A@@ 2A@L@ H  7BMM 8BM@ H OCaml  =C >C@ H  CD DD3@ H Xavier Leroy, projet Cristal, INRIA Rocquencourt  IE44 JE4@ H  OF PF@ H Copyright 2021 Institut National de Recherche en Informatique et  UG VG@ H en Automatique.  [H \Hg@ H  aIhh bIh@ H All rights reserved. This file is distributed under the terms of  gJ hJ@ H the GNU Lesser General Public License version 2.1, with the  mK nKN@ H special exception on linking described in the file LICENSE.  sLOO tLO@ H  yM zM@ H************************************************************************ N N5@ %* Input channels. @since 4.14.0  =* The type of input channel. 14* open for reading. 4* open for writing. 렠 3* open for appending: always write at end of file. ؠ (* create the file if it does not exist. Š '* empty the file if it already exists.  2* fail if Open_creat and the file already exists.  '* open in binary mode (no conversion).  /* open in text mode (may perform conversions). y=* open in non-blocking mode. f !* Opening modes for {!open_gen}. R &* The standard input for the process. ܠ }* Open the named file for reading, and return a new input channel on that file, positioned at the beginning of the file.  * Same as {!open_bin}, but the file is opened in text mode, so that newline translation takes place during reads. On operating systems that do not distinguish between text mode and binary mode, this function behaves like {!open_bin}. h * [open_gen mode perm filename] opens the named file for reading, as described above. The extra arguments [mode] and [perm] specify the opening mode and file permissions. {!open_text} and {!open_bin} are special cases of this function.  * [with_open_bin fn f] opens a channel [ic] on file [fn] and returns [f ic]. After [f] returns, either with a value or by raising an exception, [ic] is guaranteed to be closed.  X* Like {!with_open_bin}, but the channel is opened in text mode (see {!open_text}). O * Like {!with_open_bin}, but can specify the opening mode and file permission, in case the file must be created (see {!open_gen}). Ơ * [seek chan pos] sets the current reading position to [pos] for channel [chan]. This works only for regular files. On files of other kinds, the behavior is unspecified. z * Return the current reading position for the given channel. For files opened in text mode under Windows, the returned position is approximate (owing to end-of-line conversion); in particular, saving the current position with {!pos}, then going back to this position using {!seek} will not work. For this programming idiom to work reliably and portably, the file must be opened in binary mode. @ `* Return the size (number of characters) of the regular file on which the given channel is opened. If the channel is opened on a file that is not a regular file, the result is meaningless. The returned size does not take into account the end-of-line translations that can be performed when reading from a channel opened in text mode.  * Close the given channel. Input functions raise a [Sys_error] exception when they are applied to a closed input channel, except {!close}, which does nothing when applied to an already closed channel. ̠ +* Same as {!close}, but ignore all errors.  p* Read one character from the given input channel. Returns [None] if there are no more characters to read. I * Same as {!input_char}, but return the 8-bit integer representing the character. Returns [None] if the end of file was reached.  * [input_line ic] reads characters from [ic] until a newline or the end of file is reached. Returns the string of all characters read, without the newline (if any). Returns [None] if the end of the file has been reached. In particular, this will be the case if the last line of input is empty. A newline is the character [\n] unless the file is open in text mode and {!Sys.win32} is [true] in which case it is the sequence of characters [\r\n].  * [input ic buf pos len] reads up to [len] characters from the given channel [ic], storing them in byte sequence [buf], starting at character number [pos]. It returns the actual number of characters read, between 0 and [len] (inclusive). A return value of 0 means that the end of file was reached. Use {!really_input} to read exactly [len] characters. @raise Invalid_argument if [pos] and [len] do not designate a valid range of [buf]. G R* [really_input ic buf pos len] reads [len] characters from channel [ic], storing them in byte sequence [buf], starting at character number [pos]. Returns [None] if the end of file is reached before [len] characters have been read. @raise Invalid_argument if [pos] and [len] do not designate a valid range of [buf]. Ƞ * [really_input_string ic len] reads [len] characters from channel [ic] and returns them in a new string. Returns [None] if the end of file is reached before [len] characters have been read. m 5* [input_all ic] reads all remaining data from [ic]. 3 * [set_binary_mode ic true] sets the channel [ic] to binary mode: no translations take place during input. [set_binary_mode ic false] sets the channel [ic] to text mode: depending on the operating system, some translations may take place during input. For instance, under Windows, end-of-lines will be translated from [\r\n] to [\n]. This function has no effect under operating systems that do not distinguish between text mode and binary mode. @D)../ocamlc0-strict-sequence(-absname"-w8+a-4-9-41-42-44-45-48-70"-g+-warn-error"+A*-bin-annot)-nostdlib*-principal,-safe-string/-strict-formats"-o6stdlib__In_channel.cmi"-c  2/home/barsac/ci/builds/workspace/sanitizers/stdlib @0TdpI~^ 1}L70        @ @@8CamlinternalFormatBasics0cEXy