Caml1999I037 H,&Frames-current_frame &Stdlib#ref#intA@@@@@@@3debugger/frames.mliVV@@@@@.selected_event!#ref&optionL&Events*code_event@@@@@@@@@@YCC YCm@@8A@@.selected_point"@$unitF@@@@&stringQ@@@砠@C@@@栠@I@@@@@@@@F]G]@@_B@@8selected_event_is_before#@'@@@$boolE@@@@@@[_\_1@@tC@@,select_frame$@m@@@@@@@@@@ndod@@D@@0try_select_frame%@@@@S@@@@@@ixxix@@E@@+reset_frame&@b@@@f@@@@@@ll@@F@@,do_backtrace'@@*code_event@@@@@@V@@@@@@@@@@@s  s  :@@G@@+stack_depth(@@@@@@@@@@w  w  @@H@@@4&Frames0t{/l.Ho(Warnings0mJɒkgrs-Stdlib__Uchar056uf4[_+Stdlib__Sys0 -ռ鱦s5/.Stdlib__String0*%"e+Outcometree0euWS~d栠$Misc0ob]6>Vê>)Longident0s `7mɕc(Location0a7cK_H%9)Load_path0I@18 ~&Lambda0z1x]&ZT(Instruct0c#G,Identifiable0 {d\FX'`%Ident0">WA+9*X*Format_doc0]mWϓ:Mݠ&Events0.g9] S#Env0zV L{YWI)Debuginfo0PtJ=^w/*Data_types0I'Ue`wq]Ѡ*Cmi_format0c˯7͗ԩmݠ0CamlinternalLazy0&͂7 Pˆ8CamlinternalFormatBasics0%FU(Q/Tu5Build_path_prefix_map0z HkGs(Asttypes0>n{T8cئ@@@Caml1999T037(C&Framesࠐ&Events&Events3debugger/frames.mliSS@@A3@@@@@@#intA;@@#intA@@@@@&_none_@@A@A@$charB;@@$charA@@@@@ @A@&stringQ;@@&stringA@@@@@@@@%bytesC;@@%bytesA@@@@@@@@%floatD;@@%floatA@@@@@@@@$boolE;@@%falsec@@%@$trued@@+@@@A@@@@@,@A@$unitF;@@"()e@@6@@@A@@@@@7@A@ #exnG;@@@A@@@@@;@@@#effH;@@O@A@A@@@@@@D@@@,continuationI;@@Q@@P@B,continuationA@nY@@@@@@T@@@%arrayJ;@@R@A%arrayA@@@@@@_@@@ $listK;@@S@A"[]f@@l@"::g@@@T@@y@ @@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\#$@@@A@'FailureY#,@'@@A@0Invalid_argumentX#5@0@@A $#@-Match_failureV#>@@=@9@;@@a@@A5!4!@)Not_foundZ#O@@@A&=)<)@-Out_of_memoryW#W@@@A.E1D1@.Stack_overflow^#_@@@A6M9L9@.Sys_blocked_io_#g@@@A>UATA@)Sys_error[#o@j@@AG^J]J@:Undefined_recursive_modulea#x@@w@s@u@@h@@AXo[n[@:Continuation_already_takenb#@@@A`wcvc@&Stdlib@AS@@3@@A@-current_frameVV@г#refVV@г#intV V@@ @@@@@@@@@ @@@V@@@@@@@.selected_eventYCGYCU@г?#refYCjYCm@г0&optionYCcYCi@г*code_eventYCXYCb@@ @@@3@S1@A@@@ @@@ @@@(@@@ %@@@YCC(@@A@@*@@.selected_point ] ]@б@г$unit]]@@ @@@3@+R@A@@В@гꠐ&string'](]@@ @@@@@@г#int6]7]@@ @@@"@@@г#intE]F]@@ @@@1@@@@&@@ @@:-@@@@ @@=C@@@Y]@@jB@@@@C8selected_event_is_befored_ e_"@б@г$unito_%p_)@@ @@@3qppqqqqq@\q@A@@г/$bool~_-_1@@ @@@@@@@@@@@_ @@C@@ @@,select_framedd@б@гq#intdd@@ @@@3@1F@A@@гN$unitdd@@ @@@@@@@@@@@d @@D@@ @@0try_select_frameix|ix@б@г#intixix@@ @@@3@1F@A@@г~$unitixix@@ @@@@@@@@@@@ixx @@E@@ @@+reset_framell@б@г$unitll@@ @@@3@1F@A@@г$unitll@@ @@@@@@@@@@@l @@*F@@ @@,do_backtrace$s  %s  @б@б@г&option1s  #2s  )@г>*code_event;s  @@3@+@@A@ H************************************************************************A@@A@L@ H BMMBM@ H OCaml CC@ H DD3@ H Jerome Vouillon, projet Cristal, INRIA Rocquencourt E44E4@ H OCaml port by John Malecki and Xavier Leroy FF@ H GG@ H Copyright 1996 Institut National de Recherche en Informatique et HHg@ H 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************************************************************************ O66 O6@ E***************************** Frames ********************************QQ@6 Current frame number UU@ * Fragment and event at selected position. XXB@ 5 Selected position in source (module, line, column). "[oo#[o@ ' Raise `Not_found' if not on an event. (\)\@1 Select a frame. .a33/a3H@ % Raise `Not_found' if no such frame. 4bII5bIr@ ; --- Assume the currents events have already been updated. :css;cs@1 Select a frame. @fAf@ J Same as `select_frame' but raise no exception if the frame is not found. FgGg7@ ; --- Assume the currents events have already been updated. Lh88Mh8w@ $ Return to default frame (frame 0). RkSk@  Perform a stack backtrace. Call the given function with the events for each stack frame, or None if we've encountered a stack frame with no debugging info attached. Stop when the function returns false, or frame with no debugging info reached, or top of stack reached. XnYr @ | Return the number of frames in the stack, or (-1) if it can't be determined because some frames have no debugging info. ^u < <_v  @@3(./ocamlc)-nostdlib"-I(./stdlib"-g0-strict-sequence*-principal(-absname"-w8+a-4-9-40-41-42-44-45-48+-warn-error"+a*-bin-annot/-strict-formats)-for-pack*ocamldebug"-I(debugger"-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"-I.otherlibs/unix"-I1otherlibs/dynlink"-I.otherlibs/unix"-I1otherlibs/dynlink"-I.otherlibs/unix"-I1otherlibs/dynlink"-I.otherlibs/unix"-I1otherlibs/dynlink"-c 9/builds/workspace/main/flambda/false/label/ocaml-linux-32 NA@?>=<;:9876543210/.-,+*)('&%@@0]r:)am3@@@(Asttypes0>n{T8cئ5Build_path_prefix_map0z HkGs8CamlinternalFormatBasics0%FU(Q/Tu0CamlinternalLazy0&͂7 Pˆ*Cmi_format0c˯7͗ԩmݠ*Data_types0I'Ue`wq]Ѡ)Debuginfo0PtJ=^w/#Env0zV L{YWI0.g9] S*Format_doc0]mWϓ:Mݠ0t{/l.Ho%Ident0">WA+9*X,Identifiable0 {d\FX'`(Instruct0c#G&Lambda0z1x]&ZT)Load_path0I@18 ~(Location0a7cK_H%9)Longident0s `7mɕc$Misc0ob]6>Vê>+Outcometree0euWS~d栠)Parsetree0Uҩ=p>*%"e$Path0Y2kf֯J._Ϡ)Primitive0²~$xzT෠%Shape0oNՄBH&Stdlib0Lku]8_٠.Stdlib__Buffer08APF< t..Stdlib__Digest0l!LHgErζ .Stdlib__Domain0:M;׉<O$Ġ.Stdlib__Either0Vy`u~c à.Stdlib__Format0ܚ#G7m|/Stdlib__Hashtbl0ѱN][/!,Stdlib__Lazy0* -S$.)"0D.Stdlib__Lexing0e<.V +Stdlib__Map0L5xE|O0~,J-.Stdlib__Result06 ]/J+Stdlib__Seq0nwzG&amg+Stdlib__Set0\$;7 .Stdlib__String0s.Type_immediacy0A^abOhՠ%Types0xH+}q)Unit_info0ڀh%((Warnings0mJɒkgr