Caml1999I0377r#Dll0extract_dll_name$@@$boolE@@@Š@&stringQ@@@@@@@@@@@@@0bytecomp/dll.mliSS@@%@@@(dll_mode%;@@,For_checking@@VV@@4B@-For_execution@@XnpXn@@=C@@@A@@@@@U@@A@@A@A@)open_dlls&@%@@@@@@$listKA@@@@@@@@$unitF@@@@@@@@B]ooC]o@@fD@@.close_all_dlls'@@@@@@@@@@@@W`X`@@{E@@+dll_address(;@@@A@@@@@acbc@@@@F@A@1primitive_address);@@+Prim_loaded@@@@@uf:<vf:X@@H@+Prim_exists@@~hh@@I@@@A@@@@@e!!@@@@G@A@.find_primitive*@@@@@@&optionL4@@@@@@@@@lssls@@J@@5synchronize_primitive+@#intA@@@@@@C@@@@@{@@@@@@@@r  r  @@K@@(add_path,@@@@@@@@@@@@@@@u  u  -@@L@@+remove_path-@@@@@@@@@@@@@@@x p px p @@M@@+search_path.@@@@@@Ϡ@@@@@@@@@ {   {  @@-N@@,init_compile/@(@@@@@@@@@@@A  A  @@BO@@-init_toplevel0@9@@@@@@@@@@@@@@8H G G9H G m@@\P@@%reset1@ @@@@@ @@@@@@MJ o oNJ o @@qQ@@@a7-#Dll00Ya,xh~Ġ&Stdlib0t0VoS%{<F:8CamlinternalFormatBasics0|.e1R$|o@@@Caml1999T037-C-C#Dll0extract_dll_name0bytecomp/dll.mliSS@б@В@г$boolE$boolSS@@ @@@{3@@@@@@#intA;@@#intA@@@@@&_none_@@A@A@$charB;@@$charA@@@@@ @A@&stringQ;@@&stringA@@@@@@@@%bytesC;@@%bytesA@@@@@@@@%floatD;@@%floatA@@@@@@@@R;@@%falsec@@#@$trued@@)@@@A@@@@@*@A@`$unitF;@@"()e@@4@@@A@@@@@5@A@ #exnG;@@@A@@@@@9@@@#effH;@@O@A@A@@@@@@B@@@,continuationI;@@Q@@P@B,continuationA@nY@@@@@@R@@@%arrayJ;@@R@A%arrayA@@@@@@]@@@ $listK;@@S@A"[]f@@j@"::g@@@T@@w@ @@A@Y@@@@@z@@@&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\#$@@@A@'FailureY#,@'@@A@0Invalid_argumentX#5@0@@A $#@-Match_failureV#>@@=@9@;@@a@@A54@)Not_foundZ#O@@@A$='<'@-Out_of_memoryW#W@@@A,E/D/@.Stack_overflow^#_@@@A4M7L7@.Sys_blocked_io_#g@@@A<U?T?@)Sys_error[#o@j@@AE^H]H@:Undefined_recursive_modulea#x@@w@s@u@@h@@AVoYnY@:Continuation_already_takenb#@@@A^wava@&Stdlib@A@@@гa&stringSS@@ @@@|@@@@@ @@} @@гu&stringSS@@ @@@~@@@@@@@ @@@S @@@@@@@A+(dll_modeAUU@@;@@,For_checking@@VV@@B@-For_execution@@XnpXn@@C@@@A@@@@@U@@A@A@@#V@@@@@#Xnr@@@@@@A@@@3@ 6@A@)open_dlls]os]o|@б@г<(dll_mode]o~]o@@ @@@3@GA@A@@б@г$list+]o,]o@г堐&string5]o6]o@@ @@@@@@@@@  @@г֠$unitG]oH]o@@ @@@-@@@@@@@2 @@@:@@ @@7=@@@Y]oo@@fD@@@@=.close_all_dllsd`e`@б@г$unito`p`@@ @@@3]\\]]]]]@Vk@A@@г $unit~``@@ @@@@@@@@@@ @@@` @@E@@@@A++dll_addressBcc@@;@@@A@@@@@c@@@@F@@@A@@@3@+@@A @A+1primitive_addressCe!&e!7@@;@@+Prim_loaded$@@@@@f:<f:X@@H@+Prim_exists@@hh@@I@@@A@@@@@e!!@@@@G@@#f:>f:I@@г+dll_addressf:M@@$3@<HB5;@@@A@@@@@@@@@A$@@@@&@#""h @@@@#@@A@@@3@ @A #@.find_primitivelswls@б@г&stringlsls@@ @@@3@&ZT@A@@гG&optionls ls@гh1primitive_addresslsls@@ @@@@@@@@@ @@@&@@ @@#)@@@$lss@@1J@@@@)5synchronize_primitive/r  0r  @б@г#int:r  ;r  @@ @@@3(''(((((@BW@A@@б@г+dll_addressKr  Lr  @@ @@@@@г砐$unitXr  Yr  @@ @@@@@@@@@@# @@@+@@ @@(.@@@jr  @@wK@@@@.(add_pathuu  vu  @б@гܠ$listu  !u  %@г:&stringu  u  @@ @@@3xwwxxxxx@Qf)@A@@@ @@@ @@г-$unitu  )u  -@@ @@@@@@@@@@ @@@u   @@L@@@@+remove_pathx p tx p @б@г$listx p x p @г{&stringx p x p @@ @@@3@Ba)@A@@@ @@@ @@гn$unitx p x p @@ @@@@@@@@@@ @@@x p p @@M@@@@+search_path {  {  @б@г$unit{  {  @@ @@@3@8W@A@@гm$list{  {  @гˠ&string{  {  @@ @@@@@@@@@ @@@&@@ @@#)@@@-{  @@:N@@@@),init_compile!8A  9A  @б@г3$boolCA  DA  @@ @@@310011111@BW@A@@г᠐$unitRA  SA  @@ @@@@@@@@@@ @@@_A   @@lO@@@@-init_toplevel"jH G KkH G X@б@гѠ$listuH G avH G e@г/&stringH G ZH G `@@ @@@3mllmmmmm@=R)@A@@@ @@@ @@г"$unitH G iH G m@@ @@@@@@@@@@ @@@H G G @@P@@@@%reset#J o sJ o x@б@гE$unitJ o zJ o ~@@ @@@3@8W@A@@гT$unitJ o J o @@ @@@@@@@@@@ @@@J o o @@Q@@@@@@A@@}T@LFA@;5A@@}@v>@7@@@Q@J!@@3@7L#@A@ H************************************************************************A@@A@L@ H BMMBM@ H OCaml CC@ H  D D3@ H Xavier Leroy, projet Cristal, INRIA Rocquencourt E44E4@ H FF@ H Copyright 2001 Institut National de Recherche en Informatique et GG@ H en Automatique. !H"Hg@ H 'Ihh(Ih@ H All rights reserved. This file is distributed under the terms of -J.J@ H the GNU Lesser General Public License version 2.1, with the 3K4KN@ H special exception on linking described in the file LICENSE. 9LOO:LO@ H ?M@M@ H************************************************************************ENFN5@ * Handling of dynamically-linked libraries KP77LP7e@ E Extract the name of a DLLs from its external name (xxx.so or -lxxx) QRggRRg@ d will just check existence of symbols; no need to do full symbol resolution WVXW.m@ \ will call functions from this DLL; must resolve symbols completely ]Xn^Y@ Open a list of DLLs. First argument indicates whether to perform full symbol resolution. Raise [Failure msg] in case of error. c[d\*n@0 Close all DLLs i_j_@ 4 The abstract type representing C function pointers obpb@ S Primitive found in a DLL opened "for execution" uf:Yvg|@ 0 Primitive found in a DLL opened "for checking" {h|h@ w Find a primitive in the currently opened DLLs and return its address. Return [None] if the primitive is not found. jk@r@ If linking in core (dynlink or toplevel), synchronize the VM table of primitive with the linker's table of primitive by storing the given primitive function at the given position in the VM table of primitives. nq g @ C Add the given directories at the head of the search path for DLLs t  t  @ < Remove the given directories from the search path for DLLs w / /w / o@ ) Return the current search path for DLLs z  z  @ Initialization for separate compilation. Initialize the DLL search path to the directories given in the environment variable CAML_LD_LIBRARY_PATH, plus contents of ld.conf file if argument is [false]. If argument is [true], ignore ld.conf. }  @  @ 8 Initialization for linking in core (dynlink or toplevel). Initialize the search path to the same path that was used to start the running program (CAML_LD_LIBRARY_PATH + directories in executable + contents of ld.conf file). Take note of the DLLs that were opened when starting the running program. C  G  F@@-./boot/ocamlc)-nostdlib"-I&./boot*-use-prims2runtime/primitives"-g0-strict-sequence*-principal(-absname"-w8+a-4-9-40-41-42-44-45-48+-warn-error"+a*-bin-annot/-strict-formats"-I(bytecomp"-I%utils"-I'parsing"-I&typing"-I(bytecomp"-I,file_formats"-I&lambda"-I*middle_end"-I2middle_end/closure"-I2middle_end/flambda"-I=middle_end/flambda/base_types"-I'asmcomp"-I&driver"-I(toplevel"-I%tools"-I'runtime"-I1otherlibs/dynlink"-I-otherlibs/str"-I4otherlibs/systhreads"-I.otherlibs/unix"-I8otherlibs/runtime_events"-c C/home/ci/builds/workspace/precheck/flambda/false/label/ocaml-alpine >10/.-,+*)('&%$#"! @@05,NN *j~)3@@@8CamlinternalFormatBasics0|.e1R$|o00Ya,xh~Ġ&Stdlib0t0VoS%{<F:@00Ya,xh~ARCAo,@+h2@@aSĐ@Y|@@İQ*@@@Ȑ@@@98V@nT@@C8@@P@@