Caml1999T036\ZC.Input_handlingР$Unix$Unix:debugger/input_handling.mlSS@@ 3@@@@#intA;@@@A@@@@@&_none_@@A@A@$charB;@@A@@@@@@A@&stringQ;@@ A@@@@@ @@@%bytesC;@@A@@@@@@@@%floatD;@@A@@@@@@@@$boolE;@@%falsec@@@$trued@@#@@@A@@@@@$@A@$unitF;@@"()e@@.@@@A@@@@@/@A@ #exnG;@@@A@@@@@3@@@#effH;@@O@A@A@@@@@@<@@@,continuationI;@@Q@@P@BGA@nY@@@@@@J@@@ %arrayJ;@@R@ARA@@@@@@S@@@$listK;@@S@A"[]f@@`@"::g@@@T@@m@ @@A@Y@@@@@p@@@&optionL;@@V@A$Noneh@@}@$Somei@@@@@A@Y@@@@@@@@)nativeintM;@@A@@@@@@@@%int32N;@@A@@@@@@@@%int64O;@@A@@@@@@@@&lazy_tP;@@X@AA@Y@@@@@@@@5extension_constructorR;@@A@@@@@@@@*floatarrayS;@@A@@@@@@@@&iarrayT;@@Y@AA@Y@@@@@@@@*atomic_locU;@@Z@AA@@@@@@@@@.Assert_failure`#@@@@@J@@@@@@@@[@@A͠=ocaml.warn_on_literal_pattern@0Division_by_zero]#@@@A֠ @+End_of_file\##@@@Aޠ@'FailureY#+@&@@A砰@0Invalid_argumentX#4@/@@A𠰠#@-Match_failureV#=@@<@8@:@@a@@A4@)Not_foundZ#N@@@A <   @-Out_of_memoryW#V@@@AD@.Stack_overflow^#^@@@AL@.Sys_blocked_io_#f@@@A!T$%$@)Sys_error[#n@i@@A*]-.-@:Undefined_recursive_modulea#w@@v@r@t@@h@@A;n>?>@:Continuation_already_takenb#@@@ACvFGF@&Stdlib@@@@A3ssssssss@s@@{Sz@@{@3xxxxxxxx@w@@Р*Primitives*PrimitivesTT@@ 3@@@@@A3@@@T@@ @3@@@@ఠ,active_filesY%)Y%5@@A@@&Stdlib#ref2@*file_descr@@@t@@@E*io_channel@@@x{@@@w@@v@P*io_channel@@@y@@u@@s@@@rA@H@@@MA@D3@H@@@డi#refZ8:Z8=@@!a@D@@@g@@f,%makemutableAA @@@*stdlib.mliddd@@M@@@@MUP@@@G@@F(@@ภ"[] Z8? Z8A@;@@U@@@@AA@A@@@ @гd$listZ8wZ8{@В@гij'Z8E(Z8O@@p@@@NT@@@В@б@гop:Z8T;Z8^@@v@@@Og@@гu$unitFZ8bGZ8f@@}@@@Ps@@@@@Qv@@@гVZ8jWZ8t@@@@@R@@@@@ @@ScZ8S @@@@?@@@TDkZ8u@@@ @@@VqZ8DV@@sZ8>tZ8|@@@@@@@@A@wY%%@@@@ఠ(add_file]]@AA@@@@@@A@{@@@@@@@@@@A@$unitF@@@A@@@A@|@@}A@z3@ @@@@@࣠@$fileA]]@BA@@-3@:]^ @@@@@  @@*controllerA]]@CA@@83@!D@@@@@@@@డb":=^^@@9!a@@@@m@I@@@l@@k@@j*%setfield0BA@@@@@@J@@@@RM@L@@@@@w@@@@@@@@C@@@@@s@@@@@@@3@KW@N@O@@@@ఐ,active_files$^%^@}@@2@@@D@D@@@ภ"::8^9^@;/@B@AA@A@@@ఐ$fileJ^K^@}@@6@%io_fdQ^R^@3%io_fd*Primitives*io_channel@@@<$Unix*file_descr@@@;@@B3%io_in&Stdlib*in_channel@@@9@@@ @A7debugger/primitives.mli| I K| I ^@@K@3&io_out"+out_channel@@@:@@A@A } _ a } _ v@@&L@-@A~ w y~ w @@*M@;3@@D@p@@@ఐΠ*controller^^@}@@@@ఐ$file^^@Ӱ@@@@^^@@C@@@^r@@C@@డ=!!}^@@!a@@@@i@@h'%field0AAӠ@@@@@@@@@&>C@@@@D@D@@@@ @@@@ఐD,active_files/'@<0(@@C@@@E@E@@@1@@@@G2@@C@@@5@@R@?6A@lA@=@A@:@:9@P@ఠ+remove_fileaCGaCR@DA@@@@@@A@p@@@A@@@A@3@n@@@@@࣠@$fileA"aCS#aCW@5EA@@3!!!!!!!!@)*aCC+bZ@@@@@  @@డ\^6bZi7bZk@[@@@@@@@ᠠ@@@@@@@@@@@㠠@@@@@@@@@@@B@@@@@#@@@@@@@3________@?K]@B@C@@@@ఐР,active_filesqbZ\rbZh@ʰ@@Ѡ=@@@C@C@@@డ$List,remove_assocbZlbZp@ bZqbZ}@@@!a@7@$listK@@!b@8@@P@@@O@@@@N@@@M@@L@@K@(list.mli< < < e?e@QFA@@@w@@@A@@@@@@@@@@@A@@@@A@@@A@@@A@3YYYYYYYY@Kb[@\@]@@@࣠@$fileMAleme@GA@@*3kkkkkkkk@7teuf@@@@@  @@*controllerNAee@HA@@53@!A@@@@@@@@ ఐ+remove_fileff@6@@@D@@@@@@@@3@(S@@ @@@@ఐC$fileff@(@@i@@@@b@@@D@@ఐ;(add_fileff @@@@@@@@@@@@@@@@@0@@@@@@@5@@ఐu$filef f@Z@@B@@ఐn*controllerfw@Kx@@N@@/y@@O@[z@@P@{A@A@@A@@~@@ఠ2current_controllerOi`di`v@IA@@@@@@A@@I@@@)G@@@(@@'A@@@A@3@@@@@@࣠@$fileQA#i`w$i`{@6JA@@!3""""""""@.+i``,j~@@@@@  @@డ#fst8j~9j~@@@!a@{@!b@}@@| @@{'%field0AA\@@@[mm\mm@@~@@@@@OB@@@@@*B@@@ @@3^^^^^^^^@=I`@@@A@@@@డ$List%assocvj~wj~@ zj~{j~@@@!a@b@@@!b@_@@2@@@1@@0@@/@6667#@@x@$@@@A@@@C@ @@@@Z@X@@C@.C@@@ @@@  @@@@T@@ఐ$filej~j~@`@@c@%io_fdj~j~@y @@/j@@డ`#%j~j~@#@@@6^@O@A@@@@@D@,D@@@@@@@@ఐX,active_files j~@Q"@@X"@@@!E@+E@"@@, @@$@@j~@@Z@@@@@A@A@0@A@@@@ఠ=execute_with_other_controllerRn n +@)KA@@@@\@@@lZ@@@k@@jA@2@]@@@A@7@@$unitF@@@@@=A@@@A@<@@>A@8@@9A@3@@4A@13>>>>>>>>@/KD@E@F@@@࣠@*controllerTAQn ,Rn 6@dLA@@73PPPPPPPP@DYn  Zr@@@@@  @@$fileUAen 7fn ;@xMA@@=3dddddddd@!N@@@@@@@@%functVAvn <wn A@NA@@E3uuuuuuuu@Q@@@@@@@@@ఠ.old_controllerWoDJoDX@OA@@@@@@R@@@Q@@PE@A3@*e@!@"@@@ఐ2current_controlleroD[oDm@`@@@S@@@G@@@@F@@@E@@D@@C@@ఐ[$fileoDnoDr@C@@)@@@@2*@A@oDF@@ ఐ1change_controllerpvzpv@@@@@@@]@@@@@\@@@[@@Z?@@@Y@@X@@W3@M`Y@Z@[@@@@ఐ$filepvpv@v@@@@ఐ*controllerpvpv@@@@@3@@Q@@@pE@i#@@ఠ'finallyXqq@#PA@@@@@@uE@r@@@E@s@@tE@q3@@@@@࣠@%paramZAĠ"()1q2q@;@@@N@@@@A@@A @@@@@@!344444444@W.=q>q@@@@@@@ఐ 1change_controllerJqKq@5@@@~@@@~@@@@@}@@@|@@{@@@z@@y@@x&@@ఐ$fileiqjq@@@@3@@ఐ.old_controllervq9@:@@@@@@@@@@@G@@7C@@aH@QDA@nE@K@A@H@డ#Fun'protectrr@ rr@@'finally@f@@@j@@@@@@@r@@@!a@@@@@@@@'fun.mliooI@@+Stdlib__FunE@(#@@ @@@@@@@@@@@@@@@@@@@@3@@@@@@4ఐǠ'finallyrr@ @@@@@@>@@@@@@@ఐy%functr@T@@$@@^@@%@@@@#@@@0@@[@A@A@@A@@@@ఠ2continue_main_loopb v   v  ,@ QA@@`@@@A@ @@@A@3        @@@@@@డ#ref w / 1 w / 4@;@@@{@@@ @@ @@ภ$true /w / 5 0w / 9@;&@@@M@@@AB@@A @@@@@-B@(@@ @@3)@A@ ;v   @@ @,@ఠ.exit_main_loopc Hy ; ? Iy ; M@ [RA@@@@@A@@@@'A@@@A@3 T T T T T T T T@I^W@X@Y@@@࣠@8eA@ dy ; N ey ; O@@3 a a a a a a a a@# jy ; ; kz R o@@@@@ @@డ vz R g wz R i@@@@Ԡt@@@*B@@@@@@@@@@@@#@@ఐ2continue_main_loop z R T z R f@:@@@@@(C@+C@)8@@ภ%false z R j=@; `w@@@@B@@A |@@ _@@@@-C@.G@@C@@XH@KDA@cA@0K@A@H@HG@Y@ఠ)main_loopf }   }  @ SA@@@@@@5A@2@@@A@3@@4A@13        @w@@@@@࣠@pAĠ }   }  @@@@@3        @( }   P  @@@@@  @@@ఠ'finallyh ~   ~  @ TA@@@@@@HD@E`@@@XD@F@@GD@7$@@ఠ)old_statei      @ !UA@@@@@CE@87@డjl      @j@@@}E@;@@@<@@:J@@ఐ32continue_main_loop 4  @ڰ@@@@@AF@DF@B^@@  @@_@A@ @   @@࣠@jAĠ L@   M@  @@@@@U3 J J J J J J J J@pG@@A@B@@@@@@డ \@   ]@  !@@@@Z@@@[F@N@@@O@@@@M@@L@@K @@ఐx2continue_main_loop y@   z@  @ @@٠@@@YG@\G@Z5@@ఐ)old_state @  " @  +@?@@-G@]D@@@@E@ @  @@D@`I@Y @@@A@ ~   @@డ .#Fun'protect B 1 5 B 1 8@  B 1 9 B 1 @@@@@@@@@u@@@t@@s@@@@@rC@p@@q@@o@@n3        @@@@@@/ఐࠐ'finally B 1 B B 1 I@ @@@@@@9@@@@@@@4 @@@@@@@"@@"@@ @@࣠@oAĠð B 1 Q B 1 S@@@@@@@@3        @4@@@@@@ డ ,. C W p C W r@+@@@ d@@@G@@@@@u@@@@@@@T@@ఐ"2continue_main_loop #C W ] $C W o@ʰ@@ @@@H@H@i@@ภ 6C W s 7C W w@@@@+H@v@@@@@@@G@|@ డ  KD y  LD y @@@@  @@@F@F@@@@ @@@@ఐe2continue_main_loop fD y @ @@ Š@@@G@G@@@& @@@@@ఠ%inputk F   F  @ VA@@$listK$Unix*file_descr@@@@@@H@@@@ F   F  @@@@@@@@H@@@@ F   F  @@'%@@@@@@H@@@ F   F  @@@8@#@@@@డ &select G   G  @@HF@@@ @@@ @RP@@@ @@@ @\Z@@@ @@@ @%floatD@@@ @pm@@@ @@@ @bv@@@ @@@ @[@@@ @@@ @@ @@ @@ @@ @@ @(unix.mli?EEA@@@LK@@@I@@@@@@@H@@@@@@@G@@@@@@@F@@@@@@@@@@Ӡ@@@@@@@ՠ@@@@@@@@@@@@@@@@@Z@@డ $List#map cG   dG  @  gG   hG  @@@@!a@w!b@u@@V@ݠ@@@U@@@T@@S@@R@@@W@% @@@@@ @@@I@8I@/I@@@@ @@@3 @@@2@@1@ @@@4@@0I@ @@"I@I@ @@@:*@@@ 9 @@@ @@ @@ @@డ L#fst G   G  @@@@@@@J@!@@డ _ " $ G   G  @ "@@@ 5jZ@@@J@6J@%@@@& @@$@@ఐ Q,active_files G  @ J@@ Q@@@+K@5K@,@@& @@@@ G   G  @@5o@@@I@7J@@@ภ  G   G  @ @@@<@@@@@@I@>#@@ภ  $G   %G  @ @@@F@@@@@@I@E7@@#-1. 8G   9G  @@Q@@@I@HI@GH@@x @@@à@@@@II@S@A@ MF  @@డ $List$iter [I   \I  @  _I   `I  $@@@@!a@$unitF@@@I@@H@נ@@@G @@@F@@E@@D@@@U@&!@@@@ @@@G@O@@@Q@@P@ @@@N@@@M@@L@@K3        @@@@@@@@ఠ"fdl J % = J % ?@ WA@@&@@@@@ఠ%functm K C Y K C ^@ XA@@@ @@@ @@@@@J@f3        @2&E@ @!@@@@ఠ&iochann K C ` K C f@ YA@@ @@@J@g@@ K C X K C g@@@%@@@j@డ u$List%assoc K C k K C o@  K C p K C u@@{@@@vG@q@x@ @@R@;@@J@J@n@@p@@@o @@m@@lK@@ఐu"fdK C vK C x@U@@X@@డ  u w*K C y+K C z@ u@@@ @B@8@@{@@@zK@K@~@@@@@}z@@ఐ ,active_files KK C @ "@@ "@@@L@L@@@, @@$@@WK C jXK C @@R@A@ZK C T@@ఐ%functdL  eL  @@@@@@ @@@ @@@@@3kkkkkkkk@ @@@@@@ఐ&iochan~L  L  @ @@ @@@J@J@@@% @@ @@@J@@5@@$@@@d@@AJ % 4@@@J % 3L  @@@2@@@_@@^H@H@3@ @@@@ఐ*%inputM  M  @@@?0@@@]H@H@ @@\ @@ @@@G@\@p@@@Ġ*Unix_errorO  O  @;*Unix_error#exnG@@@ @C%error@@@ &stringQ@@@ @@@ @CS@@A&_none_@@A@@UF@Ġ%EINTRO  O  @;%EINTR"@@@ @@@KDA@Ax  x  @@@hL@@@  @@+@@@@@O  O  @@-@@@ @@ O   O  @@.@@@@@@JO  @@*@@@@@@ภO  O  @@@@fG@$@@@E  @@h&@ D y <@@U(@=@@V)@#B 1 M?@@@@@@j@@D@D@4@@I@@k5@J@@lO@SKA@oA@R@A@O@ON@d@ఠ*interactifq>U E I?U E S@QZA@@ =@@@A@@@@A@3HHHHHHHH@@@@@@డ #refYU E VZU E Y@ w@@@ @@@@@@@ภ<jU E ZkU E ^@;@@@&B@"@@@@,#@A@qU E E@@@&@ఠ.current_promptr~W ` dW ` r@[A@@ ݠ@@@A@@@@A@3@AUN@O@P@@@డ #refW ` uW ` x@ @@@ @@@@@@@ W ` z@@W ` yW ` {@@%!@@@@+"@A@W ` `@@@%@ఠ,user_channelsZ  Z  @\A@@ s@@@A@@@@A@3@@TM@N@O@@@డ_#refZ  Z  @ @@@6@@@@@@@డc&std_ioZ  Z  @ @@@C@ C   C  @@ P@  @@.*@@ @@4+@A@Z   @@@.@ఠ/read_user_inputt\  \  @]A@@@%bytesC@@@!A@@#intA@@@A@@@@A@@@A@@@A@3""""""""@\pi@j@k@@@࣠@&buffervA5\  6\  @H^A@@,344444444@9=\  >^  !@@@@@  @@&lengthwAI\  J\  @\_A@@43HHHHHHHH@!C@@@@@@@@ ఐ)main_loop]]  ^]  @@@@H@@@ @@@@@3cccccccc@(R@@ @@@@ภCs]  t]  @B@@@^@@@E@@@@@ @@@D@@డ%input^  ^  @@*in_channel@@@8@@@@7@@@@6@@@@5@@@4@@3@@2@@1@@0@0##0#W@@@"!@@@@@@ @@@@ @@@@ @@@@ @@@@@@@@@@@[@@డX  ^  ^  @ @@@. @@@1@.E@&@@@'@@%x@@ఐ-,user_channel^  @°@@I@@@,F@/F@-@@% @@@%io_in^  ^  @ ,@@q@@@"D@2D@0@@ఐ۠&buffer ^  ^  @@@@@@^  ^  @@@@@ D@5D@4@@ఐ䠐&length*^  @@@@@@@ @@@ @A@&A@:@A@@@ @ఠ/stop_user_inputx=a B F>a B U@P`A@@@ -@@@?A@<@@@JA@=@@>A@;3JJJJJJJJ@)PI@J@K@@@࣠@ .zAĠ -]a B V^a B X@ ,@@@@3[[[[[[[[@(da B Beb [ v@@@@@  @@ఐ o+remove_fileqb [ ]rb [ h@ @@@!@@@D@@@C@@B@@డ Ҡ ԰b [ ib [ j@ Ұ@@@>@@@KD@XD@N@@@O@@M7@@ఐ䠐,user_channel<@x=@@@@@TE@WE@UJ@@$F@@K@@;G@@`L@PHA@lA@[O@A@L@LK@a@ఠ1resume_user_input{e  e  @aA@@@ @@@`A@] @@@eA@^@@_A@\3@@@@@@࣠@ AĠ e  e  @ @@@@3@(e  l@@@@@  @@డx#notf  f  @@$boolE@@@F@@@E@@D(%boolnotAA@@@LLLt@@\\@@@@@@@e@@@d@@c3@@డ$List)mem_assoc!f  "f  @ %f  &f  @@@!a@G@ @@!b@H@@E@@@D$boolE@@@C@@B@@A@ :: :;@@ |@*%@@@@@@D@s@#@@@@@@@@@@@@@@@@@@D@t@@r@@@q1@@@p@@o@@n@@డ ̠ΰf  f  @̰@@@ߠ8@@@@F@@@@@@@@ఐޠ,user_channelf  @s@@@@@G@G@@@% @@@%io_fdf  f  @Y,@@^@@డ@f  f  @@@@@~@p@@@@@E@E@@@@@@@@ఐ8,active_files f  @1"@@8"@@@F@F@@@, @@$@@f  f  @@@@@l@E@~@@ @@@@@D@k@ డ"&&g g @@@@@K@@@@J@@@I@@H@@G(%sequandBA%@@@@%&@@q]@@@@@@@@@@@@@@@@@@M@@డ6g 7g @@@@<@@@E@E@@@@@@h@@ఐ*interactifPg  @°@@@@@F@F@|@@% @@}@@డfg gg @@@@Ġf@@@E@ E@@@@@@@@డ*Parameters&prompt*Parametersg @ g g #@%@&Stdlib#ref$boolE@@@@@@@7debugger/parameters.mliX<<X<Q@@*ParametersE@<@@<@@@F@ F@ @@F"@@>@@w#@@X@@@E@@ డD,print_stringh/5h/A@@&stringQ@@@'@@@@@@1qq1qr@@$@@@@@@@@@@@@@@డl/1h/Bh/C@/@@@B.@@@F@'F@@@@@@@@ఐ.current_prompth/Q@1@@]@@@#G@&G@$*@@% @@+@@M @@Z@@@(E@1@డ%flushiSYiS^@@v+out_channel@@@@@@@@@2ff3f@@~@@@@@@@,@@@+@@*U@@డ&stdout&StdlibAiS_BiSe@ EiSfFiSl@@,@@@@X%ppY%pp@@@ @@8@@@3E@5E@4z@@A@@@@@7D@6E@2@ag )bjmv@@ @@dg  @@ @ఐꠐ(add_filenkx|okx@Z@@@@@@?@@@@@>@@@=@@<@@@;@@:@@9@@డ٠۰kxkx@ٰ@@@@@@OD@\D@R@@@S@@Q@@ఐ렐,user_channelkx@@@@@@XE@[E@Y@@% @@@@ఐ u.exit_main_loopkxkx@ @@@@@@ND@`&@@@b@@a@@] @@D@K@f  @@@@f  @@@A@A@h@A@@@@:.@Y@{@@ @  @  @  @ .@Z@q@4@@"@<5@6@7@@3@(?@@@;.Input_handlingK@@J@@I@@C H@@ G@@ȱF@@ LE@@ ıD@@ C@@B@@A@@"@@@ H************************************************************************A@@ A@L@ H %BMM&BM@ H OCaml +C,C@ H 1D2D3@ H Jerome Vouillon, projet Cristal, INRIA Rocquencourt 7E448E4@ H OCaml port by John Malecki and Xavier Leroy =F>F@ H CGDG@ H Copyright 1996 Institut National de Recherche en Informatique et IHJHg@ H en Automatique. OIhhPIh@ H UJVJ@ H All rights reserved. This file is distributed under the terms of [K\KN@ H the GNU Lesser General Public License version 2.1, with the aLOObLO@ H special exception on linking described in the file LICENSE. gMhM@ H mNnN5@ H************************************************************************sO66tO6@ E*************************** Input control ***************************yQzQ@4** Actives files. **VV@< List of the actives files. XX$@ * Add a file to the list of actives files. \~~\~@ / Remove a file from the list of actives files. ``B@ + Change the controller for the given file. dd@ = Return the controller currently attached to the given file. hh_@ : Execute a function with `controller' attached to `file'. ll@; ### controller file funct mm @5** The "Main Loop" **tt @ : Handle active files until `continue_main_loop' is false. | q q| q @:** Managing user inputs **R  R  @> Are we in interactive mode ? T " "T " D@ ! Where the user input come from. Y } }Y } @: Stop reading user input. ` # #` # A@< Resume reading user input. d x xd x @@#,./ocamlc.opt)-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"-c ;/builds/workspace/main/flambda/false/label/ocaml-freebsd-64 J=<;:9876543210/.-,+*)('&%$#@@0mzžFO6>3;;;;;;;;@:@@8CamlinternalFormatBasics0oZ2t,ݠX0l LNfNQ8LȐ0:?2J٠ǐ0sQp҉*h|&Stdlib0y{x!O!0Stdlib__Bigarray0M&۩9|HOT/Stdlib__Complex0\lEWN2.Stdlib__Either0FԤ) 4'>+Stdlib__Fun0,Z d",Stdlib__List0n/0+Stdlib__Seq0]h+F&}+Stdlib__Sys0M xIor ~0 8RmZuDq@@AVCAK@ đ ΰ ; Euq{@  @@ԑްԑް  @  @  @@!@eo@@@@fp",@*4@@@P@3@0@@@A@@@@A@>@@@A@@@@BC }@ z@@@@@@@A @ @@@@@@@AB@@@@ @@@@A@@@@B$@!@@@CDE@@