diff options
Diffstat (limited to 'test/testinterp/t340-weak.ml')
| -rw-r--r-- | test/testinterp/t340-weak.ml | 2551 |
1 files changed, 0 insertions, 2551 deletions
diff --git a/test/testinterp/t340-weak.ml b/test/testinterp/t340-weak.ml deleted file mode 100644 index e36dbab503..0000000000 --- a/test/testinterp/t340-weak.ml +++ /dev/null @@ -1,2551 +0,0 @@ -open Lib;; -let x = Array.make 20 "" in -let w = weak_create 20 in -for i = 0 to 19 do - x.(i) <- String.make 20 's'; - weak_set w i (Some x.(i)); -done; -Gc.full_major (); -for i = 0 to 19 do - match weak_get w i with - | None -> raise Not_found - | _ -> () -done; -for i = 0 to 19 do - if i mod 2 = 0 then x.(i) <- "" -done; -Gc.full_major (); -for i = 0 to 19 do - match weak_get w i with - | None when i mod 2 = 0 -> () - | Some s when i mod 2 = 1 -> if s.[5] <> 's' then raise Not_found - | _ -> raise Not_found -done -;; - -(** - 0 CONSTINT 42 - 2 PUSHACC0 - 3 MAKEBLOCK1 0 - 5 POP 1 - 7 SETGLOBAL Lib - 9 BRANCH 746 - 11 RESTART - 12 GRAB 1 - 14 ACC0 - 15 BRANCHIFNOT 28 - 17 ACC1 - 18 PUSHACC1 - 19 GETFIELD1 - 20 PUSHOFFSETCLOSURE0 - 21 APPLY2 - 22 PUSHACC1 - 23 GETFIELD0 - 24 MAKEBLOCK2 0 - 26 RETURN 2 - 28 ACC1 - 29 RETURN 2 - 31 RESTART - 32 GRAB 3 - 34 CONST0 - 35 PUSHACC4 - 36 LEINT - 37 BRANCHIFNOT 42 - 39 CONST0 - 40 RETURN 4 - 42 ACC3 - 43 PUSHACC3 - 44 PUSHACC3 - 45 PUSHACC3 - 46 C_CALL4 caml_input - 48 PUSHCONST0 - 49 PUSHACC1 - 50 EQ - 51 BRANCHIFNOT 58 - 53 GETGLOBAL End_of_file - 55 MAKEBLOCK1 0 - 57 RAISE - 58 ACC0 - 59 PUSHACC5 - 60 SUBINT - 61 PUSHACC1 - 62 PUSHACC5 - 63 ADDINT - 64 PUSHACC4 - 65 PUSHACC4 - 66 PUSHOFFSETCLOSURE0 - 67 APPTERM 4, 9 - 70 ACC0 - 71 C_CALL1 caml_input_scan_line - 73 PUSHCONST0 - 74 PUSHACC1 - 75 EQ - 76 BRANCHIFNOT 83 - 78 GETGLOBAL End_of_file - 80 MAKEBLOCK1 0 - 82 RAISE - 83 CONST0 - 84 PUSHACC1 - 85 GTINT - 86 BRANCHIFNOT 107 - 88 ACC0 - 89 OFFSETINT -1 - 91 C_CALL1 create_string - 93 PUSHACC1 - 94 OFFSETINT -1 - 96 PUSHCONST0 - 97 PUSHACC2 - 98 PUSHACC5 - 99 C_CALL4 caml_input - 101 ACC2 - 102 C_CALL1 caml_input_char - 104 ACC0 - 105 RETURN 3 - 107 ACC0 - 108 NEGINT - 109 C_CALL1 create_string - 111 PUSHACC1 - 112 NEGINT - 113 PUSHCONST0 - 114 PUSHACC2 - 115 PUSHACC5 - 116 C_CALL4 caml_input - 118 CONST0 - 119 PUSHTRAP 130 - 121 ACC6 - 122 PUSHOFFSETCLOSURE0 - 123 APPLY1 - 124 PUSHACC5 - 125 PUSHENVACC1 - 126 APPLY2 - 127 POPTRAP - 128 RETURN 3 - 130 PUSHGETGLOBAL End_of_file - 132 PUSHACC1 - 133 GETFIELD0 - 134 EQ - 135 BRANCHIFNOT 140 - 137 ACC1 - 138 RETURN 4 - 140 ACC0 - 141 RAISE - 142 ACC0 - 143 C_CALL1 caml_flush - 145 RETURN 1 - 147 RESTART - 148 GRAB 1 - 150 ACC1 - 151 PUSHACC1 - 152 C_CALL2 caml_output_char - 154 RETURN 2 - 156 RESTART - 157 GRAB 1 - 159 ACC1 - 160 PUSHACC1 - 161 C_CALL2 caml_output_char - 163 RETURN 2 - 165 RESTART - 166 GRAB 1 - 168 ACC1 - 169 PUSHACC1 - 170 C_CALL2 caml_output_int - 172 RETURN 2 - 174 RESTART - 175 GRAB 1 - 177 ACC1 - 178 PUSHACC1 - 179 C_CALL2 caml_seek_out - 181 RETURN 2 - 183 ACC0 - 184 C_CALL1 caml_pos_out - 186 RETURN 1 - 188 ACC0 - 189 C_CALL1 caml_channel_size - 191 RETURN 1 - 193 RESTART - 194 GRAB 1 - 196 ACC1 - 197 PUSHACC1 - 198 C_CALL2 caml_set_binary_mode - 200 RETURN 2 - 202 ACC0 - 203 C_CALL1 caml_input_char - 205 RETURN 1 - 207 ACC0 - 208 C_CALL1 caml_input_char - 210 RETURN 1 - 212 ACC0 - 213 C_CALL1 caml_input_int - 215 RETURN 1 - 217 ACC0 - 218 C_CALL1 input_value - 220 RETURN 1 - 222 RESTART - 223 GRAB 1 - 225 ACC1 - 226 PUSHACC1 - 227 C_CALL2 caml_seek_in - 229 RETURN 2 - 231 ACC0 - 232 C_CALL1 caml_pos_in - 234 RETURN 1 - 236 ACC0 - 237 C_CALL1 caml_channel_size - 239 RETURN 1 - 241 ACC0 - 242 C_CALL1 caml_close_channel - 244 RETURN 1 - 246 RESTART - 247 GRAB 1 - 249 ACC1 - 250 PUSHACC1 - 251 C_CALL2 caml_set_binary_mode - 253 RETURN 2 - 255 CONST0 - 256 PUSHENVACC1 - 257 APPLY1 - 258 ACC0 - 259 C_CALL1 sys_exit - 261 RETURN 1 - 263 CONST0 - 264 PUSHENVACC1 - 265 GETFIELD0 - 266 APPTERM1 2 - 268 CONST0 - 269 PUSHENVACC1 - 270 APPLY1 - 271 CONST0 - 272 PUSHENVACC2 - 273 APPTERM1 2 - 275 ENVACC1 - 276 GETFIELD0 - 277 PUSHACC0 - 278 PUSHACC2 - 279 CLOSURE 2, 268 - 282 PUSHENVACC1 - 283 SETFIELD0 - 284 RETURN 2 - 286 ENVACC1 - 287 C_CALL1 caml_flush - 289 ENVACC2 - 290 C_CALL1 caml_flush - 292 RETURN 1 - 294 CONST0 - 295 PUSHENVACC1 - 296 APPLY1 - 297 C_CALL1 float_of_string - 299 RETURN 1 - 301 CONST0 - 302 PUSHENVACC1 - 303 APPLY1 - 304 C_CALL1 int_of_string - 306 RETURN 1 - 308 ENVACC2 - 309 C_CALL1 caml_flush - 311 ENVACC1 - 312 PUSHENVACC3 - 313 APPTERM1 2 - 315 CONSTINT 13 - 317 PUSHENVACC1 - 318 C_CALL2 caml_output_char - 320 ENVACC1 - 321 C_CALL1 caml_flush - 323 RETURN 1 - 325 ACC0 - 326 PUSHENVACC1 - 327 PUSHENVACC2 - 328 APPLY2 - 329 CONSTINT 13 - 331 PUSHENVACC1 - 332 C_CALL2 caml_output_char - 334 ENVACC1 - 335 C_CALL1 caml_flush - 337 RETURN 1 - 339 ACC0 - 340 PUSHENVACC1 - 341 APPLY1 - 342 PUSHENVACC2 - 343 PUSHENVACC3 - 344 APPTERM2 3 - 346 ACC0 - 347 PUSHENVACC1 - 348 APPLY1 - 349 PUSHENVACC2 - 350 PUSHENVACC3 - 351 APPTERM2 3 - 353 ACC0 - 354 PUSHENVACC1 - 355 PUSHENVACC2 - 356 APPTERM2 3 - 358 ACC0 - 359 PUSHENVACC1 - 360 C_CALL2 caml_output_char - 362 RETURN 1 - 364 CONSTINT 13 - 366 PUSHENVACC1 - 367 C_CALL2 caml_output_char - 369 ENVACC1 - 370 C_CALL1 caml_flush - 372 RETURN 1 - 374 ACC0 - 375 PUSHENVACC1 - 376 PUSHENVACC2 - 377 APPLY2 - 378 CONSTINT 13 - 380 PUSHENVACC1 - 381 C_CALL2 caml_output_char - 383 RETURN 1 - 385 ACC0 - 386 PUSHENVACC1 - 387 APPLY1 - 388 PUSHENVACC2 - 389 PUSHENVACC3 - 390 APPTERM2 3 - 392 ACC0 - 393 PUSHENVACC1 - 394 APPLY1 - 395 PUSHENVACC2 - 396 PUSHENVACC3 - 397 APPTERM2 3 - 399 ACC0 - 400 PUSHENVACC1 - 401 PUSHENVACC2 - 402 APPTERM2 3 - 404 ACC0 - 405 PUSHENVACC1 - 406 C_CALL2 caml_output_char - 408 RETURN 1 - 410 RESTART - 411 GRAB 3 - 413 CONST0 - 414 PUSHACC3 - 415 LTINT - 416 BRANCHIF 427 - 418 ACC1 - 419 C_CALL1 ml_string_length - 421 PUSHACC4 - 422 PUSHACC4 - 423 ADDINT - 424 GTINT - 425 BRANCHIFNOT 432 - 427 GETGLOBAL "really_input" - 429 PUSHENVACC1 - 430 APPTERM1 5 - 432 ACC3 - 433 PUSHACC3 - 434 PUSHACC3 - 435 PUSHACC3 - 436 PUSHENVACC2 - 437 APPTERM 4, 8 - 440 RESTART - 441 GRAB 3 - 443 CONST0 - 444 PUSHACC3 - 445 LTINT - 446 BRANCHIF 457 - 448 ACC1 - 449 C_CALL1 ml_string_length - 451 PUSHACC4 - 452 PUSHACC4 - 453 ADDINT - 454 GTINT - 455 BRANCHIFNOT 462 - 457 GETGLOBAL "input" - 459 PUSHENVACC1 - 460 APPTERM1 5 - 462 ACC3 - 463 PUSHACC3 - 464 PUSHACC3 - 465 PUSHACC3 - 466 C_CALL4 caml_input - 468 RETURN 4 - 470 ACC0 - 471 PUSHCONST0 - 472 PUSHGETGLOBAL <0>(0, <0>(6, 0)) - 474 PUSHENVACC1 - 475 APPTERM3 4 - 477 ACC0 - 478 PUSHCONST0 - 479 PUSHGETGLOBAL <0>(0, <0>(7, 0)) - 481 PUSHENVACC1 - 482 APPTERM3 4 - 484 RESTART - 485 GRAB 2 - 487 ACC1 - 488 PUSHACC1 - 489 PUSHACC4 - 490 C_CALL3 sys_open - 492 C_CALL1 caml_open_descriptor - 494 RETURN 3 - 496 ACC0 - 497 C_CALL1 caml_flush - 499 ACC0 - 500 C_CALL1 caml_close_channel - 502 RETURN 1 - 504 RESTART - 505 GRAB 1 - 507 CONST0 - 508 PUSHACC2 - 509 PUSHACC2 - 510 C_CALL3 output_value - 512 RETURN 2 - 514 RESTART - 515 GRAB 3 - 517 CONST0 - 518 PUSHACC3 - 519 LTINT - 520 BRANCHIF 531 - 522 ACC1 - 523 C_CALL1 ml_string_length - 525 PUSHACC4 - 526 PUSHACC4 - 527 ADDINT - 528 GTINT - 529 BRANCHIFNOT 536 - 531 GETGLOBAL "output" - 533 PUSHENVACC1 - 534 APPTERM1 5 - 536 ACC3 - 537 PUSHACC3 - 538 PUSHACC3 - 539 PUSHACC3 - 540 C_CALL4 caml_output - 542 RETURN 4 - 544 RESTART - 545 GRAB 1 - 547 ACC1 - 548 C_CALL1 ml_string_length - 550 PUSHCONST0 - 551 PUSHACC3 - 552 PUSHACC3 - 553 C_CALL4 caml_output - 555 RETURN 2 - 557 ACC0 - 558 PUSHCONSTINT 438 - 560 PUSHGETGLOBAL <0>(1, <0>(3, <0>(4, <0>(6, 0)))) - 562 PUSHENVACC1 - 563 APPTERM3 4 - 565 ACC0 - 566 PUSHCONSTINT 438 - 568 PUSHGETGLOBAL <0>(1, <0>(3, <0>(4, <0>(7, 0)))) - 570 PUSHENVACC1 - 571 APPTERM3 4 - 573 RESTART - 574 GRAB 2 - 576 ACC1 - 577 PUSHACC1 - 578 PUSHACC4 - 579 C_CALL3 sys_open - 581 C_CALL1 caml_open_descriptor - 583 RETURN 3 - 585 ACC0 - 586 PUSHGETGLOBAL "%.12g" - 588 C_CALL2 format_float - 590 RETURN 1 - 592 ACC0 - 593 PUSHGETGLOBAL "%d" - 595 C_CALL2 format_int - 597 RETURN 1 - 599 GETGLOBAL "false" - 601 PUSHACC1 - 602 C_CALL2 string_equal - 604 BRANCHIFNOT 609 - 606 CONST0 - 607 RETURN 1 - 609 GETGLOBAL "true" - 611 PUSHACC1 - 612 C_CALL2 string_equal - 614 BRANCHIFNOT 619 - 616 CONST1 - 617 RETURN 1 - 619 GETGLOBAL "bool_of_string" - 621 PUSHENVACC1 - 622 APPTERM1 2 - 624 ACC0 - 625 BRANCHIFNOT 631 - 627 GETGLOBAL "true" - 629 RETURN 1 - 631 GETGLOBAL "false" - 633 RETURN 1 - 635 CONST0 - 636 PUSHACC1 - 637 LTINT - 638 BRANCHIF 646 - 640 CONSTINT 255 - 642 PUSHACC1 - 643 GTINT - 644 BRANCHIFNOT 651 - 646 GETGLOBAL "char_of_int" - 648 PUSHENVACC1 - 649 APPTERM1 2 - 651 ACC0 - 652 RETURN 1 - 654 RESTART - 655 GRAB 1 - 657 ACC0 - 658 C_CALL1 ml_string_length - 660 PUSHACC2 - 661 C_CALL1 ml_string_length - 663 PUSHACC0 - 664 PUSHACC2 - 665 ADDINT - 666 C_CALL1 create_string - 668 PUSHACC2 - 669 PUSHCONST0 - 670 PUSHACC2 - 671 PUSHCONST0 - 672 PUSHACC7 - 673 C_CALL5 blit_string - 675 ACC1 - 676 PUSHACC3 - 677 PUSHACC2 - 678 PUSHCONST0 - 679 PUSHACC 8 - 681 C_CALL5 blit_string - 683 ACC0 - 684 RETURN 5 - 686 CONSTINT -1 - 688 PUSHACC1 - 689 XORINT - 690 RETURN 1 - 692 CONST0 - 693 PUSHACC1 - 694 GEINT - 695 BRANCHIFNOT 700 - 697 ACC0 - 698 RETURN 1 - 700 ACC0 - 701 NEGINT - 702 RETURN 1 - 704 RESTART - 705 GRAB 1 - 707 ACC1 - 708 PUSHACC1 - 709 C_CALL2 greaterequal - 711 BRANCHIFNOT 716 - 713 ACC0 - 714 RETURN 2 - 716 ACC1 - 717 RETURN 2 - 719 RESTART - 720 GRAB 1 - 722 ACC1 - 723 PUSHACC1 - 724 C_CALL2 lessequal - 726 BRANCHIFNOT 731 - 728 ACC0 - 729 RETURN 2 - 731 ACC1 - 732 RETURN 2 - 734 ACC0 - 735 PUSHGETGLOBAL Invalid_argument - 737 MAKEBLOCK2 0 - 739 RAISE - 740 ACC0 - 741 PUSHGETGLOBAL Failure - 743 MAKEBLOCK2 0 - 745 RAISE - 746 CLOSURE 0, 740 - 749 PUSH - 750 CLOSURE 0, 734 - 753 PUSHGETGLOBAL "Pervasives.Exit" - 755 MAKEBLOCK1 0 - 757 PUSHGETGLOBAL "Pervasives.Assert_failure" - 759 MAKEBLOCK1 0 - 761 PUSH - 762 CLOSURE 0, 720 - 765 PUSH - 766 CLOSURE 0, 705 - 769 PUSH - 770 CLOSURE 0, 692 - 773 PUSH - 774 CLOSURE 0, 686 - 777 PUSHCONST0 - 778 PUSHCONSTINT 31 - 780 PUSHCONST1 - 781 LSLINT - 782 EQ - 783 BRANCHIFNOT 789 - 785 CONSTINT 30 - 787 BRANCH 791 - 789 CONSTINT 62 - 791 PUSHCONST1 - 792 LSLINT - 793 PUSHACC0 - 794 OFFSETINT -1 - 796 PUSH - 797 CLOSURE 0, 655 - 800 PUSHACC 9 - 802 CLOSURE 1, 635 - 805 PUSH - 806 CLOSURE 0, 624 - 809 PUSHACC 11 - 811 CLOSURE 1, 599 - 814 PUSH - 815 CLOSURE 0, 592 - 818 PUSH - 819 CLOSURE 0, 585 - 822 PUSH - 823 CLOSUREREC 0, 12 - 827 CONST0 - 828 C_CALL1 caml_open_descriptor - 830 PUSHCONST1 - 831 C_CALL1 caml_open_descriptor - 833 PUSHCONST2 - 834 C_CALL1 caml_open_descriptor - 836 PUSH - 837 CLOSURE 0, 574 - 840 PUSHACC0 - 841 CLOSURE 1, 565 - 844 PUSHACC1 - 845 CLOSURE 1, 557 - 848 PUSH - 849 CLOSURE 0, 545 - 852 PUSHACC 22 - 854 CLOSURE 1, 515 - 857 PUSH - 858 CLOSURE 0, 505 - 861 PUSH - 862 CLOSURE 0, 496 - 865 PUSH - 866 CLOSURE 0, 485 - 869 PUSHACC0 - 870 CLOSURE 1, 477 - 873 PUSHACC1 - 874 CLOSURE 1, 470 - 877 PUSHACC 28 - 879 CLOSURE 1, 441 - 882 PUSH - 883 CLOSUREREC 0, 32 - 887 ACC0 - 888 PUSHACC 31 - 890 CLOSURE 2, 411 - 893 PUSHACC 22 - 895 CLOSUREREC 1, 70 - 899 ACC 15 - 901 CLOSURE 1, 404 - 904 PUSHACC 11 - 906 PUSHACC 17 - 908 CLOSURE 2, 399 - 911 PUSHACC 12 - 913 PUSHACC 18 - 915 PUSHACC 23 - 917 CLOSURE 3, 392 - 920 PUSHACC 13 - 922 PUSHACC 19 - 924 PUSHACC 23 - 926 CLOSURE 3, 385 - 929 PUSHACC 14 - 931 PUSHACC 20 - 933 CLOSURE 2, 374 - 936 PUSHACC 20 - 938 CLOSURE 1, 364 - 941 PUSHACC 20 - 943 CLOSURE 1, 358 - 946 PUSHACC 17 - 948 PUSHACC 22 - 950 CLOSURE 2, 353 - 953 PUSHACC 18 - 955 PUSHACC 23 - 957 PUSHACC 29 - 959 CLOSURE 3, 346 - 962 PUSHACC 19 - 964 PUSHACC 24 - 966 PUSHACC 29 - 968 CLOSURE 3, 339 - 971 PUSHACC 20 - 973 PUSHACC 25 - 975 CLOSURE 2, 325 - 978 PUSHACC 25 - 980 CLOSURE 1, 315 - 983 PUSHACC 12 - 985 PUSHACC 28 - 987 PUSHACC 30 - 989 CLOSURE 3, 308 - 992 PUSHACC0 - 993 CLOSURE 1, 301 - 996 PUSHACC1 - 997 CLOSURE 1, 294 - 1000 PUSHACC 29 - 1002 PUSHACC 31 - 1004 CLOSURE 2, 286 - 1007 MAKEBLOCK1 0 - 1009 PUSHACC0 - 1010 CLOSURE 1, 275 - 1013 PUSHACC1 - 1014 CLOSURE 1, 263 - 1017 PUSHACC0 - 1018 CLOSURE 1, 255 - 1021 PUSHACC1 - 1022 PUSHACC 22 - 1024 PUSHACC4 - 1025 PUSHACC3 - 1026 PUSH - 1027 CLOSURE 0, 247 - 1030 PUSH - 1031 CLOSURE 0, 241 - 1034 PUSH - 1035 CLOSURE 0, 236 - 1038 PUSH - 1039 CLOSURE 0, 231 - 1042 PUSH - 1043 CLOSURE 0, 223 - 1046 PUSH - 1047 CLOSURE 0, 217 - 1050 PUSH - 1051 CLOSURE 0, 212 - 1054 PUSH - 1055 CLOSURE 0, 207 - 1058 PUSHACC 32 - 1060 PUSHACC 35 - 1062 PUSHACC 33 - 1064 PUSH - 1065 CLOSURE 0, 202 - 1068 PUSHACC 41 - 1070 PUSHACC 40 - 1072 PUSHACC 42 - 1074 PUSH - 1075 CLOSURE 0, 194 - 1078 PUSHACC 46 - 1080 PUSH - 1081 CLOSURE 0, 188 - 1084 PUSH - 1085 CLOSURE 0, 183 - 1088 PUSH - 1089 CLOSURE 0, 175 - 1092 PUSHACC 51 - 1094 PUSH - 1095 CLOSURE 0, 166 - 1098 PUSH - 1099 CLOSURE 0, 157 - 1102 PUSHACC 55 - 1104 PUSHACC 57 - 1106 PUSH - 1107 CLOSURE 0, 148 - 1110 PUSH - 1111 CLOSURE 0, 142 - 1114 PUSHACC 63 - 1116 PUSHACC 62 - 1118 PUSHACC 64 - 1120 PUSHACC 38 - 1122 PUSHACC 40 - 1124 PUSHACC 42 - 1126 PUSHACC 44 - 1128 PUSHACC 46 - 1130 PUSHACC 48 - 1132 PUSHACC 50 - 1134 PUSHACC 52 - 1136 PUSHACC 54 - 1138 PUSHACC 56 - 1140 PUSHACC 58 - 1142 PUSHACC 60 - 1144 PUSHACC 62 - 1146 PUSHACC 64 - 1148 PUSHACC 66 - 1150 PUSHACC 82 - 1152 PUSHACC 84 - 1154 PUSHACC 86 - 1156 PUSHACC 88 - 1158 PUSHACC 90 - 1160 PUSHACC 92 - 1162 PUSHACC 94 - 1164 PUSHACC 96 - 1166 PUSHACC 98 - 1168 PUSHACC 100 - 1170 PUSHACC 104 - 1172 PUSHACC 104 - 1174 PUSHACC 104 - 1176 PUSHACC 108 - 1178 PUSHACC 110 - 1180 PUSHACC 112 - 1182 PUSHACC 117 - 1184 PUSHACC 117 - 1186 PUSHACC 117 - 1188 PUSHACC 117 - 1190 MAKEBLOCK 69, 0 - 1193 POP 53 - 1195 SETGLOBAL Pervasives - 1197 BRANCH 2177 - 1199 RESTART - 1200 GRAB 1 - 1202 ACC1 - 1203 BRANCHIFNOT 1213 - 1205 ACC1 - 1206 GETFIELD1 - 1207 PUSHACC1 - 1208 OFFSETINT 1 - 1210 PUSHOFFSETCLOSURE0 - 1211 APPTERM2 4 - 1213 ACC0 - 1214 RETURN 2 - 1216 RESTART - 1217 GRAB 1 - 1219 ACC0 - 1220 BRANCHIFNOT 1251 - 1222 CONST0 - 1223 PUSHACC2 - 1224 EQ - 1225 BRANCHIFNOT 1231 - 1227 ACC0 - 1228 GETFIELD0 - 1229 RETURN 2 - 1231 CONST0 - 1232 PUSHACC2 - 1233 GTINT - 1234 BRANCHIFNOT 1244 - 1236 ACC1 - 1237 OFFSETINT -1 - 1239 PUSHACC1 - 1240 GETFIELD1 - 1241 PUSHOFFSETCLOSURE0 - 1242 APPTERM2 4 - 1244 GETGLOBAL "List.nth" - 1246 PUSHGETGLOBALFIELD Pervasives, 2 - 1249 APPTERM1 3 - 1251 GETGLOBAL "nth" - 1253 PUSHGETGLOBALFIELD Pervasives, 3 - 1256 APPTERM1 3 - 1258 RESTART - 1259 GRAB 1 - 1261 ACC0 - 1262 BRANCHIFNOT 1274 - 1264 ACC1 - 1265 PUSHACC1 - 1266 GETFIELD0 - 1267 MAKEBLOCK2 0 - 1269 PUSHACC1 - 1270 GETFIELD1 - 1271 PUSHOFFSETCLOSURE0 - 1272 APPTERM2 4 - 1274 ACC1 - 1275 RETURN 2 - 1277 ACC0 - 1278 BRANCHIFNOT 1291 - 1280 ACC0 - 1281 GETFIELD1 - 1282 PUSHOFFSETCLOSURE0 - 1283 APPLY1 - 1284 PUSHACC1 - 1285 GETFIELD0 - 1286 PUSHGETGLOBALFIELD Pervasives, 16 - 1289 APPTERM2 3 - 1291 RETURN 1 - 1293 RESTART - 1294 GRAB 1 - 1296 ACC1 - 1297 BRANCHIFNOT 1313 - 1299 ACC1 - 1300 GETFIELD0 - 1301 PUSHACC1 - 1302 APPLY1 - 1303 PUSHACC2 - 1304 GETFIELD1 - 1305 PUSHACC2 - 1306 PUSHOFFSETCLOSURE0 - 1307 APPLY2 - 1308 PUSHACC1 - 1309 MAKEBLOCK2 0 - 1311 POP 1 - 1313 RETURN 2 - 1315 RESTART - 1316 GRAB 1 - 1318 ACC1 - 1319 BRANCHIFNOT 1331 - 1321 ACC1 - 1322 GETFIELD0 - 1323 PUSHACC1 - 1324 APPLY1 - 1325 ACC1 - 1326 GETFIELD1 - 1327 PUSHACC1 - 1328 PUSHOFFSETCLOSURE0 - 1329 APPTERM2 4 - 1331 RETURN 2 - 1333 RESTART - 1334 GRAB 2 - 1336 ACC2 - 1337 BRANCHIFNOT 1350 - 1339 ACC2 - 1340 GETFIELD1 - 1341 PUSHACC3 - 1342 GETFIELD0 - 1343 PUSHACC3 - 1344 PUSHACC3 - 1345 APPLY2 - 1346 PUSHACC2 - 1347 PUSHOFFSETCLOSURE0 - 1348 APPTERM3 6 - 1350 ACC1 - 1351 RETURN 3 - 1353 RESTART - 1354 GRAB 2 - 1356 ACC1 - 1357 BRANCHIFNOT 1370 - 1359 ACC2 - 1360 PUSHACC2 - 1361 GETFIELD1 - 1362 PUSHACC2 - 1363 PUSHOFFSETCLOSURE0 - 1364 APPLY3 - 1365 PUSHACC2 - 1366 GETFIELD0 - 1367 PUSHACC2 - 1368 APPTERM2 5 - 1370 ACC2 - 1371 RETURN 3 - 1373 RESTART - 1374 GRAB 2 - 1376 ACC1 - 1377 BRANCHIFNOT 1400 - 1379 ACC2 - 1380 BRANCHIFNOT 1407 - 1382 ACC2 - 1383 GETFIELD0 - 1384 PUSHACC2 - 1385 GETFIELD0 - 1386 PUSHACC2 - 1387 APPLY2 - 1388 PUSHACC3 - 1389 GETFIELD1 - 1390 PUSHACC3 - 1391 GETFIELD1 - 1392 PUSHACC3 - 1393 PUSHOFFSETCLOSURE0 - 1394 APPLY3 - 1395 PUSHACC1 - 1396 MAKEBLOCK2 0 - 1398 RETURN 4 - 1400 ACC2 - 1401 BRANCHIFNOT 1405 - 1403 BRANCH 1407 - 1405 RETURN 3 - 1407 GETGLOBAL "List.map2" - 1409 PUSHGETGLOBALFIELD Pervasives, 2 - 1412 APPTERM1 4 - 1414 RESTART - 1415 GRAB 2 - 1417 ACC1 - 1418 BRANCHIFNOT 1437 - 1420 ACC2 - 1421 BRANCHIFNOT 1444 - 1423 ACC2 - 1424 GETFIELD0 - 1425 PUSHACC2 - 1426 GETFIELD0 - 1427 PUSHACC2 - 1428 APPLY2 - 1429 ACC2 - 1430 GETFIELD1 - 1431 PUSHACC2 - 1432 GETFIELD1 - 1433 PUSHACC2 - 1434 PUSHOFFSETCLOSURE0 - 1435 APPTERM3 6 - 1437 ACC2 - 1438 BRANCHIFNOT 1442 - 1440 BRANCH 1444 - 1442 RETURN 3 - 1444 GETGLOBAL "List.iter2" - 1446 PUSHGETGLOBALFIELD Pervasives, 2 - 1449 APPTERM1 4 - 1451 RESTART - 1452 GRAB 3 - 1454 ACC2 - 1455 BRANCHIFNOT 1476 - 1457 ACC3 - 1458 BRANCHIFNOT 1482 - 1460 ACC3 - 1461 GETFIELD1 - 1462 PUSHACC3 - 1463 GETFIELD1 - 1464 PUSHACC5 - 1465 GETFIELD0 - 1466 PUSHACC5 - 1467 GETFIELD0 - 1468 PUSHACC5 - 1469 PUSHACC5 - 1470 APPLY3 - 1471 PUSHACC3 - 1472 PUSHOFFSETCLOSURE0 - 1473 APPTERM 4, 8 - 1476 ACC3 - 1477 BRANCHIF 1482 - 1479 ACC1 - 1480 RETURN 4 - 1482 GETGLOBAL "List.fold_left2" - 1484 PUSHGETGLOBALFIELD Pervasives, 2 - 1487 APPTERM1 5 - 1489 RESTART - 1490 GRAB 3 - 1492 ACC1 - 1493 BRANCHIFNOT 1516 - 1495 ACC2 - 1496 BRANCHIFNOT 1522 - 1498 PUSH_RETADDR 1509 - 1500 ACC6 - 1501 PUSHACC6 - 1502 GETFIELD1 - 1503 PUSHACC6 - 1504 GETFIELD1 - 1505 PUSHACC6 - 1506 PUSHOFFSETCLOSURE0 - 1507 APPLY 4 - 1509 PUSHACC3 - 1510 GETFIELD0 - 1511 PUSHACC3 - 1512 GETFIELD0 - 1513 PUSHACC3 - 1514 APPTERM3 7 - 1516 ACC2 - 1517 BRANCHIF 1522 - 1519 ACC3 - 1520 RETURN 4 - 1522 GETGLOBAL "List.fold_right2" - 1524 PUSHGETGLOBALFIELD Pervasives, 2 - 1527 APPTERM1 5 - 1529 RESTART - 1530 GRAB 1 - 1532 ACC1 - 1533 BRANCHIFNOT 1549 - 1535 ACC1 - 1536 GETFIELD0 - 1537 PUSHACC1 - 1538 APPLY1 - 1539 BRANCHIFNOT 1547 - 1541 ACC1 - 1542 GETFIELD1 - 1543 PUSHACC1 - 1544 PUSHOFFSETCLOSURE0 - 1545 APPTERM2 4 - 1547 RETURN 2 - 1549 CONST1 - 1550 RETURN 2 - 1552 RESTART - 1553 GRAB 1 - 1555 ACC1 - 1556 BRANCHIFNOT 1570 - 1558 ACC1 - 1559 GETFIELD0 - 1560 PUSHACC1 - 1561 APPLY1 - 1562 BRANCHIF 1570 - 1564 ACC1 - 1565 GETFIELD1 - 1566 PUSHACC1 - 1567 PUSHOFFSETCLOSURE0 - 1568 APPTERM2 4 - 1570 RETURN 2 - 1572 RESTART - 1573 GRAB 2 - 1575 ACC1 - 1576 BRANCHIFNOT 1599 - 1578 ACC2 - 1579 BRANCHIFNOT 1605 - 1581 ACC2 - 1582 GETFIELD0 - 1583 PUSHACC2 - 1584 GETFIELD0 - 1585 PUSHACC2 - 1586 APPLY2 - 1587 BRANCHIFNOT 1597 - 1589 ACC2 - 1590 GETFIELD1 - 1591 PUSHACC2 - 1592 GETFIELD1 - 1593 PUSHACC2 - 1594 PUSHOFFSETCLOSURE0 - 1595 APPTERM3 6 - 1597 RETURN 3 - 1599 ACC2 - 1600 BRANCHIF 1605 - 1602 CONST1 - 1603 RETURN 3 - 1605 GETGLOBAL "List.for_all2" - 1607 PUSHGETGLOBALFIELD Pervasives, 2 - 1610 APPTERM1 4 - 1612 RESTART - 1613 GRAB 2 - 1615 ACC1 - 1616 BRANCHIFNOT 1639 - 1618 ACC2 - 1619 BRANCHIFNOT 1646 - 1621 ACC2 - 1622 GETFIELD0 - 1623 PUSHACC2 - 1624 GETFIELD0 - 1625 PUSHACC2 - 1626 APPLY2 - 1627 BRANCHIF 1637 - 1629 ACC2 - 1630 GETFIELD1 - 1631 PUSHACC2 - 1632 GETFIELD1 - 1633 PUSHACC2 - 1634 PUSHOFFSETCLOSURE0 - 1635 APPTERM3 6 - 1637 RETURN 3 - 1639 ACC2 - 1640 BRANCHIFNOT 1644 - 1642 BRANCH 1646 - 1644 RETURN 3 - 1646 GETGLOBAL "List.exists2" - 1648 PUSHGETGLOBALFIELD Pervasives, 2 - 1651 APPTERM1 4 - 1653 RESTART - 1654 GRAB 1 - 1656 ACC1 - 1657 BRANCHIFNOT 1672 - 1659 ACC0 - 1660 PUSHACC2 - 1661 GETFIELD0 - 1662 C_CALL2 equal - 1664 BRANCHIF 1672 - 1666 ACC1 - 1667 GETFIELD1 - 1668 PUSHACC1 - 1669 PUSHOFFSETCLOSURE0 - 1670 APPTERM2 4 - 1672 RETURN 2 - 1674 RESTART - 1675 GRAB 1 - 1677 ACC1 - 1678 BRANCHIFNOT 1692 - 1680 ACC0 - 1681 PUSHACC2 - 1682 GETFIELD0 - 1683 EQ - 1684 BRANCHIF 1692 - 1686 ACC1 - 1687 GETFIELD1 - 1688 PUSHACC1 - 1689 PUSHOFFSETCLOSURE0 - 1690 APPTERM2 4 - 1692 RETURN 2 - 1694 RESTART - 1695 GRAB 1 - 1697 ACC1 - 1698 BRANCHIFNOT 1719 - 1700 ACC1 - 1701 GETFIELD0 - 1702 PUSHACC1 - 1703 PUSHACC1 - 1704 GETFIELD0 - 1705 C_CALL2 equal - 1707 BRANCHIFNOT 1713 - 1709 ACC0 - 1710 GETFIELD1 - 1711 RETURN 3 - 1713 ACC2 - 1714 GETFIELD1 - 1715 PUSHACC2 - 1716 PUSHOFFSETCLOSURE0 - 1717 APPTERM2 5 - 1719 GETGLOBAL Not_found - 1721 MAKEBLOCK1 0 - 1723 RAISE - 1724 RESTART - 1725 GRAB 1 - 1727 ACC1 - 1728 BRANCHIFNOT 1748 - 1730 ACC1 - 1731 GETFIELD0 - 1732 PUSHACC1 - 1733 PUSHACC1 - 1734 GETFIELD0 - 1735 EQ - 1736 BRANCHIFNOT 1742 - 1738 ACC0 - 1739 GETFIELD1 - 1740 RETURN 3 - 1742 ACC2 - 1743 GETFIELD1 - 1744 PUSHACC2 - 1745 PUSHOFFSETCLOSURE0 - 1746 APPTERM2 5 - 1748 GETGLOBAL Not_found - 1750 MAKEBLOCK1 0 - 1752 RAISE - 1753 RESTART - 1754 GRAB 1 - 1756 ACC1 - 1757 BRANCHIFNOT 1773 - 1759 ACC0 - 1760 PUSHACC2 - 1761 GETFIELD0 - 1762 GETFIELD0 - 1763 C_CALL2 equal - 1765 BRANCHIF 1773 - 1767 ACC1 - 1768 GETFIELD1 - 1769 PUSHACC1 - 1770 PUSHOFFSETCLOSURE0 - 1771 APPTERM2 4 - 1773 RETURN 2 - 1775 RESTART - 1776 GRAB 1 - 1778 ACC1 - 1779 BRANCHIFNOT 1794 - 1781 ACC0 - 1782 PUSHACC2 - 1783 GETFIELD0 - 1784 GETFIELD0 - 1785 EQ - 1786 BRANCHIF 1794 - 1788 ACC1 - 1789 GETFIELD1 - 1790 PUSHACC1 - 1791 PUSHOFFSETCLOSURE0 - 1792 APPTERM2 4 - 1794 RETURN 2 - 1796 RESTART - 1797 GRAB 1 - 1799 ACC1 - 1800 BRANCHIFNOT 1825 - 1802 ACC1 - 1803 GETFIELD0 - 1804 PUSHACC2 - 1805 GETFIELD1 - 1806 PUSHACC2 - 1807 PUSHACC2 - 1808 GETFIELD0 - 1809 C_CALL2 equal - 1811 BRANCHIFNOT 1816 - 1813 ACC0 - 1814 RETURN 4 - 1816 ACC0 - 1817 PUSHACC3 - 1818 PUSHOFFSETCLOSURE0 - 1819 APPLY2 - 1820 PUSHACC2 - 1821 MAKEBLOCK2 0 - 1823 POP 2 - 1825 RETURN 2 - 1827 RESTART - 1828 GRAB 1 - 1830 ACC1 - 1831 BRANCHIFNOT 1855 - 1833 ACC1 - 1834 GETFIELD0 - 1835 PUSHACC2 - 1836 GETFIELD1 - 1837 PUSHACC2 - 1838 PUSHACC2 - 1839 GETFIELD0 - 1840 EQ - 1841 BRANCHIFNOT 1846 - 1843 ACC0 - 1844 RETURN 4 - 1846 ACC0 - 1847 PUSHACC3 - 1848 PUSHOFFSETCLOSURE0 - 1849 APPLY2 - 1850 PUSHACC2 - 1851 MAKEBLOCK2 0 - 1853 POP 2 - 1855 RETURN 2 - 1857 RESTART - 1858 GRAB 1 - 1860 ACC1 - 1861 BRANCHIFNOT 1879 - 1863 ACC1 - 1864 GETFIELD0 - 1865 PUSHACC0 - 1866 PUSHACC2 - 1867 APPLY1 - 1868 BRANCHIFNOT 1873 - 1870 ACC0 - 1871 RETURN 3 - 1873 ACC2 - 1874 GETFIELD1 - 1875 PUSHACC2 - 1876 PUSHOFFSETCLOSURE0 - 1877 APPTERM2 5 - 1879 GETGLOBAL Not_found - 1881 MAKEBLOCK1 0 - 1883 RAISE - 1884 RESTART - 1885 GRAB 2 - 1887 ACC2 - 1888 BRANCHIFNOT 1917 - 1890 ACC2 - 1891 GETFIELD0 - 1892 PUSHACC3 - 1893 GETFIELD1 - 1894 PUSHACC1 - 1895 PUSHENVACC2 - 1896 APPLY1 - 1897 BRANCHIFNOT 1908 - 1899 ACC0 - 1900 PUSHACC4 - 1901 PUSHACC4 - 1902 PUSHACC4 - 1903 MAKEBLOCK2 0 - 1905 PUSHOFFSETCLOSURE0 - 1906 APPTERM3 8 - 1908 ACC0 - 1909 PUSHACC4 - 1910 PUSHACC3 - 1911 MAKEBLOCK2 0 - 1913 PUSHACC4 - 1914 PUSHOFFSETCLOSURE0 - 1915 APPTERM3 8 - 1917 ACC1 - 1918 PUSHENVACC1 - 1919 APPLY1 - 1920 PUSHACC1 - 1921 PUSHENVACC1 - 1922 APPLY1 - 1923 MAKEBLOCK2 0 - 1925 RETURN 3 - 1927 RESTART - 1928 GRAB 1 - 1930 ACC0 - 1931 PUSHENVACC1 - 1932 CLOSUREREC 2, 1885 - 1936 ACC2 - 1937 PUSHCONST0 - 1938 PUSHCONST0 - 1939 PUSHACC3 - 1940 APPTERM3 6 - 1942 ACC0 - 1943 BRANCHIFNOT 1967 - 1945 ACC0 - 1946 GETFIELD0 - 1947 PUSHACC1 - 1948 GETFIELD1 - 1949 PUSHOFFSETCLOSURE0 - 1950 APPLY1 - 1951 PUSHACC0 - 1952 GETFIELD1 - 1953 PUSHACC2 - 1954 GETFIELD1 - 1955 MAKEBLOCK2 0 - 1957 PUSHACC1 - 1958 GETFIELD0 - 1959 PUSHACC3 - 1960 GETFIELD0 - 1961 MAKEBLOCK2 0 - 1963 MAKEBLOCK2 0 - 1965 RETURN 3 - 1967 GETGLOBAL <0>(0, 0) - 1969 RETURN 1 - 1971 RESTART - 1972 GRAB 1 - 1974 ACC0 - 1975 BRANCHIFNOT 1996 - 1977 ACC1 - 1978 BRANCHIFNOT 2003 - 1980 ACC1 - 1981 GETFIELD1 - 1982 PUSHACC1 - 1983 GETFIELD1 - 1984 PUSHOFFSETCLOSURE0 - 1985 APPLY2 - 1986 PUSHACC2 - 1987 GETFIELD0 - 1988 PUSHACC2 - 1989 GETFIELD0 - 1990 MAKEBLOCK2 0 - 1992 MAKEBLOCK2 0 - 1994 RETURN 2 - 1996 ACC1 - 1997 BRANCHIFNOT 2001 - 1999 BRANCH 2003 - 2001 RETURN 2 - 2003 GETGLOBAL "List.combine" - 2005 PUSHGETGLOBALFIELD Pervasives, 2 - 2008 APPTERM1 3 - 2010 RESTART - 2011 GRAB 1 - 2013 ACC1 - 2014 BRANCHIFNOT 2038 - 2016 ACC1 - 2017 GETFIELD0 - 2018 PUSHACC2 - 2019 GETFIELD1 - 2020 PUSHACC1 - 2021 PUSHENVACC2 - 2022 APPLY1 - 2023 BRANCHIFNOT 2033 - 2025 ACC0 - 2026 PUSHACC3 - 2027 PUSHACC3 - 2028 MAKEBLOCK2 0 - 2030 PUSHOFFSETCLOSURE0 - 2031 APPTERM2 6 - 2033 ACC0 - 2034 PUSHACC3 - 2035 PUSHOFFSETCLOSURE0 - 2036 APPTERM2 6 - 2038 ACC0 - 2039 PUSHENVACC1 - 2040 APPTERM1 3 - 2042 ACC0 - 2043 PUSHENVACC1 - 2044 CLOSUREREC 2, 2011 - 2048 CONST0 - 2049 PUSHACC1 - 2050 APPTERM1 3 - 2052 RESTART - 2053 GRAB 2 - 2055 ACC1 - 2056 BRANCHIFNOT 2077 - 2058 ACC2 - 2059 BRANCHIFNOT 2084 - 2061 ACC2 - 2062 GETFIELD1 - 2063 PUSHACC2 - 2064 GETFIELD1 - 2065 PUSHACC2 - 2066 PUSHACC5 - 2067 GETFIELD0 - 2068 PUSHACC5 - 2069 GETFIELD0 - 2070 PUSHENVACC1 - 2071 APPLY2 - 2072 MAKEBLOCK2 0 - 2074 PUSHOFFSETCLOSURE0 - 2075 APPTERM3 6 - 2077 ACC2 - 2078 BRANCHIFNOT 2082 - 2080 BRANCH 2084 - 2082 RETURN 3 - 2084 GETGLOBAL "List.rev_map2" - 2086 PUSHGETGLOBALFIELD Pervasives, 2 - 2089 APPTERM1 4 - 2091 RESTART - 2092 GRAB 2 - 2094 ACC0 - 2095 CLOSUREREC 1, 2053 - 2099 ACC3 - 2100 PUSHACC3 - 2101 PUSHCONST0 - 2102 PUSHACC3 - 2103 APPTERM3 7 - 2105 RESTART - 2106 GRAB 1 - 2108 ACC1 - 2109 BRANCHIFNOT 2123 - 2111 ACC1 - 2112 GETFIELD1 - 2113 PUSHACC1 - 2114 PUSHACC3 - 2115 GETFIELD0 - 2116 PUSHENVACC1 - 2117 APPLY1 - 2118 MAKEBLOCK2 0 - 2120 PUSHOFFSETCLOSURE0 - 2121 APPTERM2 4 - 2123 ACC0 - 2124 RETURN 2 - 2126 RESTART - 2127 GRAB 1 - 2129 ACC0 - 2130 CLOSUREREC 1, 2106 - 2134 ACC2 - 2135 PUSHCONST0 - 2136 PUSHACC2 - 2137 APPTERM2 5 - 2139 CONST0 - 2140 PUSHACC1 - 2141 PUSHENVACC1 - 2142 APPTERM2 3 - 2144 ACC0 - 2145 BRANCHIFNOT 2151 - 2147 ACC0 - 2148 GETFIELD1 - 2149 RETURN 1 - 2151 GETGLOBAL "tl" - 2153 PUSHGETGLOBALFIELD Pervasives, 3 - 2156 APPTERM1 2 - 2158 ACC0 - 2159 BRANCHIFNOT 2165 - 2161 ACC0 - 2162 GETFIELD0 - 2163 RETURN 1 - 2165 GETGLOBAL "hd" - 2167 PUSHGETGLOBALFIELD Pervasives, 3 - 2170 APPTERM1 2 - 2172 ACC0 - 2173 PUSHCONST0 - 2174 PUSHENVACC1 - 2175 APPTERM2 3 - 2177 CLOSUREREC 0, 1200 - 2181 ACC0 - 2182 CLOSURE 1, 2172 - 2185 PUSH - 2186 CLOSURE 0, 2158 - 2189 PUSH - 2190 CLOSURE 0, 2144 - 2193 PUSH - 2194 CLOSUREREC 0, 1217 - 2198 GETGLOBALFIELD Pervasives, 16 - 2201 PUSH - 2202 CLOSUREREC 0, 1259 - 2206 ACC0 - 2207 CLOSURE 1, 2139 - 2210 PUSH - 2211 CLOSUREREC 0, 1277 - 2215 CLOSUREREC 0, 1294 - 2219 CLOSURE 0, 2127 - 2222 PUSH - 2223 CLOSUREREC 0, 1316 - 2227 CLOSUREREC 0, 1334 - 2231 CLOSUREREC 0, 1354 - 2235 CLOSUREREC 0, 1374 - 2239 CLOSURE 0, 2092 - 2242 PUSH - 2243 CLOSUREREC 0, 1415 - 2247 CLOSUREREC 0, 1452 - 2251 CLOSUREREC 0, 1490 - 2255 CLOSUREREC 0, 1530 - 2259 CLOSUREREC 0, 1553 - 2263 CLOSUREREC 0, 1573 - 2267 CLOSUREREC 0, 1613 - 2271 CLOSUREREC 0, 1654 - 2275 CLOSUREREC 0, 1675 - 2279 CLOSUREREC 0, 1695 - 2283 CLOSUREREC 0, 1725 - 2287 CLOSUREREC 0, 1754 - 2291 CLOSUREREC 0, 1776 - 2295 CLOSUREREC 0, 1797 - 2299 CLOSUREREC 0, 1828 - 2303 CLOSUREREC 0, 1858 - 2307 ACC 24 - 2309 CLOSURE 1, 2042 - 2312 PUSHACC 25 - 2314 CLOSUREREC 1, 1928 - 2318 CLOSUREREC 0, 1942 - 2322 CLOSUREREC 0, 1972 - 2326 ACC0 - 2327 PUSHACC2 - 2328 PUSHACC7 - 2329 PUSHACC 9 - 2331 PUSHACC 11 - 2333 PUSHACC 13 - 2335 PUSHACC 15 - 2337 PUSHACC 17 - 2339 PUSHACC 10 - 2341 PUSHACC 12 - 2343 PUSHACC 13 - 2345 PUSHACC 15 - 2347 PUSHACC 23 - 2349 PUSHACC 25 - 2351 PUSHACC 27 - 2353 PUSHACC 29 - 2355 PUSHACC 31 - 2357 PUSHACC 33 - 2359 PUSHACC 35 - 2361 PUSHACC 37 - 2363 PUSHACC 40 - 2365 PUSHACC 42 - 2367 PUSHACC 41 - 2369 PUSHACC 45 - 2371 PUSHACC 47 - 2373 PUSHACC 50 - 2375 PUSHACC 52 - 2377 PUSHACC 51 - 2379 PUSHACC 55 - 2381 PUSHACC 56 - 2383 PUSHACC 59 - 2385 PUSHACC 61 - 2387 PUSHACC 60 - 2389 PUSHACC 64 - 2391 PUSHACC 66 - 2393 PUSHACC 68 - 2395 PUSHACC 70 - 2397 MAKEBLOCK 37, 0 - 2400 POP 36 - 2402 SETGLOBAL List - 2404 BRANCH 2622 - 2406 CONSTINT 97 - 2408 PUSHACC1 - 2409 GEINT - 2410 BRANCHIFNOT 2418 - 2412 CONSTINT 122 - 2414 PUSHACC1 - 2415 LEINT - 2416 BRANCHIF 2442 - 2418 CONSTINT 224 - 2420 PUSHACC1 - 2421 GEINT - 2422 BRANCHIFNOT 2430 - 2424 CONSTINT 246 - 2426 PUSHACC1 - 2427 LEINT - 2428 BRANCHIF 2442 - 2430 CONSTINT 248 - 2432 PUSHACC1 - 2433 GEINT - 2434 BRANCHIFNOT 2447 - 2436 CONSTINT 254 - 2438 PUSHACC1 - 2439 LEINT - 2440 BRANCHIFNOT 2447 - 2442 ACC0 - 2443 OFFSETINT -32 - 2445 RETURN 1 - 2447 ACC0 - 2448 RETURN 1 - 2450 CONSTINT 65 - 2452 PUSHACC1 - 2453 GEINT - 2454 BRANCHIFNOT 2462 - 2456 CONSTINT 90 - 2458 PUSHACC1 - 2459 LEINT - 2460 BRANCHIF 2486 - 2462 CONSTINT 192 - 2464 PUSHACC1 - 2465 GEINT - 2466 BRANCHIFNOT 2474 - 2468 CONSTINT 214 - 2470 PUSHACC1 - 2471 LEINT - 2472 BRANCHIF 2486 - 2474 CONSTINT 216 - 2476 PUSHACC1 - 2477 GEINT - 2478 BRANCHIFNOT 2491 - 2480 CONSTINT 222 - 2482 PUSHACC1 - 2483 LEINT - 2484 BRANCHIFNOT 2491 - 2486 ACC0 - 2487 OFFSETINT 32 - 2489 RETURN 1 - 2491 ACC0 - 2492 RETURN 1 - 2494 CONSTINT 39 - 2496 PUSHACC1 - 2497 LTINT - 2498 BRANCHIFNOT 2520 - 2500 CONSTINT 9 - 2502 PUSHACC1 - 2503 EQ - 2504 BRANCHIFNOT 2510 - 2506 GETGLOBAL "\\t" - 2508 RETURN 1 - 2510 CONSTINT 13 - 2512 PUSHACC1 - 2513 EQ - 2514 BRANCHIFNOT 2540 - 2516 GETGLOBAL "\\n" - 2518 RETURN 1 - 2520 CONSTINT 39 - 2522 PUSHACC1 - 2523 EQ - 2524 BRANCHIFNOT 2530 - 2526 GETGLOBAL "\\'" - 2528 RETURN 1 - 2530 CONSTINT 92 - 2532 PUSHACC1 - 2533 EQ - 2534 BRANCHIFNOT 2540 - 2536 GETGLOBAL "\\\\" - 2538 RETURN 1 - 2540 ACC0 - 2541 C_CALL1 is_printable - 2543 BRANCHIFNOT 2555 - 2545 CONST1 - 2546 C_CALL1 create_string - 2548 PUSHACC1 - 2549 PUSHCONST0 - 2550 PUSHACC2 - 2551 SETSTRINGCHAR - 2552 ACC0 - 2553 RETURN 2 - 2555 ACC0 - 2556 PUSHCONSTINT 4 - 2558 C_CALL1 create_string - 2560 PUSHCONSTINT 92 - 2562 PUSHCONST0 - 2563 PUSHACC2 - 2564 SETSTRINGCHAR - 2565 CONSTINT 100 - 2567 PUSHACC2 - 2568 DIVINT - 2569 PUSHCONSTINT 48 - 2571 ADDINT - 2572 PUSHCONST1 - 2573 PUSHACC2 - 2574 SETSTRINGCHAR - 2575 CONSTINT 10 - 2577 PUSHCONSTINT 10 - 2579 PUSHACC3 - 2580 DIVINT - 2581 MODINT - 2582 PUSHCONSTINT 48 - 2584 ADDINT - 2585 PUSHCONST2 - 2586 PUSHACC2 - 2587 SETSTRINGCHAR - 2588 CONSTINT 10 - 2590 PUSHACC2 - 2591 MODINT - 2592 PUSHCONSTINT 48 - 2594 ADDINT - 2595 PUSHCONST3 - 2596 PUSHACC2 - 2597 SETSTRINGCHAR - 2598 ACC0 - 2599 RETURN 3 - 2601 CONST0 - 2602 PUSHACC1 - 2603 LTINT - 2604 BRANCHIF 2612 - 2606 CONSTINT 255 - 2608 PUSHACC1 - 2609 GTINT - 2610 BRANCHIFNOT 2619 - 2612 GETGLOBAL "Char.chr" - 2614 PUSHGETGLOBALFIELD Pervasives, 2 - 2617 APPTERM1 2 - 2619 ACC0 - 2620 RETURN 1 - 2622 CLOSURE 0, 2601 - 2625 PUSH - 2626 CLOSURE 0, 2494 - 2629 PUSH - 2630 CLOSURE 0, 2450 - 2633 PUSH - 2634 CLOSURE 0, 2406 - 2637 PUSHACC0 - 2638 PUSHACC2 - 2639 PUSHACC4 - 2640 PUSHACC6 - 2641 MAKEBLOCK 4, 0 - 2644 POP 4 - 2646 SETGLOBAL Char - 2648 BRANCH 3540 - 2650 RESTART - 2651 GRAB 3 - 2653 ACC1 - 2654 PUSHACC3 - 2655 GEINT - 2656 BRANCHIFNOT 2663 - 2658 GETGLOBAL Not_found - 2660 MAKEBLOCK1 0 - 2662 RAISE - 2663 ACC3 - 2664 PUSHACC3 - 2665 PUSHACC2 - 2666 GETSTRINGCHAR - 2667 EQ - 2668 BRANCHIFNOT 2673 - 2670 ACC2 - 2671 RETURN 4 - 2673 ACC3 - 2674 PUSHACC3 - 2675 OFFSETINT 1 - 2677 PUSHACC3 - 2678 PUSHACC3 - 2679 PUSHOFFSETCLOSURE0 - 2680 APPTERM 4, 8 - 2683 RESTART - 2684 GRAB 2 - 2686 CONST0 - 2687 PUSHACC2 - 2688 LTINT - 2689 BRANCHIFNOT 2696 - 2691 GETGLOBAL Not_found - 2693 MAKEBLOCK1 0 - 2695 RAISE - 2696 ACC2 - 2697 PUSHACC2 - 2698 PUSHACC2 - 2699 GETSTRINGCHAR - 2700 EQ - 2701 BRANCHIFNOT 2706 - 2703 ACC1 - 2704 RETURN 3 - 2706 ACC2 - 2707 PUSHACC2 - 2708 OFFSETINT -1 - 2710 PUSHACC2 - 2711 PUSHOFFSETCLOSURE0 - 2712 APPTERM3 6 - 2714 RESTART - 2715 GRAB 1 - 2717 ACC1 - 2718 PUSHCONST0 - 2719 PUSHACC2 - 2720 PUSHENVACC1 - 2721 APPTERM3 5 - 2723 RESTART - 2724 GRAB 2 - 2726 CONST0 - 2727 PUSHACC2 - 2728 LTINT - 2729 BRANCHIF 2738 - 2731 ACC0 - 2732 C_CALL1 ml_string_length - 2734 PUSHACC2 - 2735 GEINT - 2736 BRANCHIFNOT 2745 - 2738 GETGLOBAL "String.rcontains_from" - 2740 PUSHGETGLOBALFIELD Pervasives, 2 - 2743 APPTERM1 4 - 2745 PUSHTRAP 2756 - 2747 ACC6 - 2748 PUSHACC6 - 2749 PUSHACC6 - 2750 PUSHENVACC1 - 2751 APPLY3 - 2752 CONST1 - 2753 POPTRAP - 2754 RETURN 3 - 2756 PUSHGETGLOBAL Not_found - 2758 PUSHACC1 - 2759 GETFIELD0 - 2760 EQ - 2761 BRANCHIFNOT 2766 - 2763 CONST0 - 2764 RETURN 4 - 2766 ACC0 - 2767 RAISE - 2768 RESTART - 2769 GRAB 2 - 2771 CONST0 - 2772 PUSHACC2 - 2773 LTINT - 2774 BRANCHIF 2783 - 2776 ACC0 - 2777 C_CALL1 ml_string_length - 2779 PUSHACC2 - 2780 GTINT - 2781 BRANCHIFNOT 2790 - 2783 GETGLOBAL "String.contains_from" - 2785 PUSHGETGLOBALFIELD Pervasives, 2 - 2788 APPTERM1 4 - 2790 PUSHTRAP 2811 - 2792 PUSH_RETADDR 2807 - 2794 ACC 9 - 2796 PUSHACC 9 - 2798 PUSHACC 9 - 2800 C_CALL1 ml_string_length - 2802 PUSHACC 10 - 2804 PUSHENVACC1 - 2805 APPLY 4 - 2807 CONST1 - 2808 POPTRAP - 2809 RETURN 3 - 2811 PUSHGETGLOBAL Not_found - 2813 PUSHACC1 - 2814 GETFIELD0 - 2815 EQ - 2816 BRANCHIFNOT 2821 - 2818 CONST0 - 2819 RETURN 4 - 2821 ACC0 - 2822 RAISE - 2823 RESTART - 2824 GRAB 2 - 2826 CONST0 - 2827 PUSHACC2 - 2828 LTINT - 2829 BRANCHIF 2838 - 2831 ACC0 - 2832 C_CALL1 ml_string_length - 2834 PUSHACC2 - 2835 GEINT - 2836 BRANCHIFNOT 2845 - 2838 GETGLOBAL "String.rindex_from" - 2840 PUSHGETGLOBALFIELD Pervasives, 2 - 2843 APPTERM1 4 - 2845 ACC2 - 2846 PUSHACC2 - 2847 PUSHACC2 - 2848 PUSHENVACC1 - 2849 APPTERM3 6 - 2851 RESTART - 2852 GRAB 1 - 2854 ACC1 - 2855 PUSHACC1 - 2856 C_CALL1 ml_string_length - 2858 OFFSETINT -1 - 2860 PUSHACC2 - 2861 PUSHENVACC1 - 2862 APPTERM3 5 - 2864 RESTART - 2865 GRAB 2 - 2867 CONST0 - 2868 PUSHACC2 - 2869 LTINT - 2870 BRANCHIF 2879 - 2872 ACC0 - 2873 C_CALL1 ml_string_length - 2875 PUSHACC2 - 2876 GTINT - 2877 BRANCHIFNOT 2886 - 2879 GETGLOBAL "String.index_from" - 2881 PUSHGETGLOBALFIELD Pervasives, 2 - 2884 APPTERM1 4 - 2886 ACC2 - 2887 PUSHACC2 - 2888 PUSHACC2 - 2889 C_CALL1 ml_string_length - 2891 PUSHACC3 - 2892 PUSHENVACC1 - 2893 APPTERM 4, 7 - 2896 RESTART - 2897 GRAB 1 - 2899 ACC1 - 2900 PUSHCONST0 - 2901 PUSHACC2 - 2902 C_CALL1 ml_string_length - 2904 PUSHACC3 - 2905 PUSHENVACC1 - 2906 APPTERM 4, 6 - 2909 ACC0 - 2910 PUSHGETGLOBALFIELD Char, 2 - 2913 PUSHENVACC1 - 2914 APPTERM2 3 - 2916 ACC0 - 2917 PUSHGETGLOBALFIELD Char, 3 - 2920 PUSHENVACC1 - 2921 APPTERM2 3 - 2923 RESTART - 2924 GRAB 1 - 2926 CONST0 - 2927 PUSHACC2 - 2928 C_CALL1 ml_string_length - 2930 EQ - 2931 BRANCHIFNOT 2936 - 2933 ACC1 - 2934 RETURN 2 - 2936 ACC1 - 2937 PUSHENVACC1 - 2938 APPLY1 - 2939 PUSHCONST0 - 2940 PUSHACC3 - 2941 GETSTRINGCHAR - 2942 PUSHACC2 - 2943 APPLY1 - 2944 PUSHCONST0 - 2945 PUSHACC2 - 2946 SETSTRINGCHAR - 2947 ACC0 - 2948 RETURN 3 - 2950 ACC0 - 2951 PUSHGETGLOBALFIELD Char, 2 - 2954 PUSHENVACC1 - 2955 APPTERM2 3 - 2957 ACC0 - 2958 PUSHGETGLOBALFIELD Char, 3 - 2961 PUSHENVACC1 - 2962 APPTERM2 3 - 2964 RESTART - 2965 GRAB 1 - 2967 ACC1 - 2968 C_CALL1 ml_string_length - 2970 PUSHCONST0 - 2971 PUSHACC1 - 2972 EQ - 2973 BRANCHIFNOT 2978 - 2975 ACC2 - 2976 RETURN 3 - 2978 ACC0 - 2979 C_CALL1 create_string - 2981 PUSHCONST0 - 2982 PUSHACC2 - 2983 OFFSETINT -1 - 2985 PUSH - 2986 BRANCH 3002 - 2988 CHECK_SIGNALS - 2989 ACC1 - 2990 PUSHACC6 - 2991 GETSTRINGCHAR - 2992 PUSHACC5 - 2993 APPLY1 - 2994 PUSHACC2 - 2995 PUSHACC4 - 2996 SETSTRINGCHAR - 2997 ACC1 - 2998 OFFSETINT 1 - 3000 ASSIGN 1 - 3002 ACC0 - 3003 PUSHACC2 - 3004 LEINT - 3005 BRANCHIF 2988 - 3007 CONST0 - 3008 POP 2 - 3010 ACC0 - 3011 RETURN 4 - 3013 CONST0 - 3014 PUSHCONST0 - 3015 PUSHACC2 - 3016 C_CALL1 ml_string_length - 3018 OFFSETINT -1 - 3020 PUSH - 3021 BRANCH 3059 - 3023 CHECK_SIGNALS - 3024 ACC1 - 3025 PUSHACC4 - 3026 GETSTRINGCHAR - 3027 PUSHACC0 - 3028 PUSHGETGLOBAL "\000\"\000\000\004\000\000\000\000\000\000\016\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000" - 3030 C_CALL2 bitvect_test - 3032 BRANCHIFNOT 3038 - 3034 CONST0 - 3035 CONST2 - 3036 BRANCH 3048 - 3038 ACC0 - 3039 C_CALL1 is_printable - 3041 BRANCHIFNOT 3046 - 3043 CONST1 - 3044 BRANCH 3048 - 3046 CONSTINT 4 - 3048 POP 1 - 3050 PUSHACC3 - 3051 ADDINT - 3052 ASSIGN 2 - 3054 ACC1 - 3055 OFFSETINT 1 - 3057 ASSIGN 1 - 3059 ACC0 - 3060 PUSHACC2 - 3061 LEINT - 3062 BRANCHIF 3023 - 3064 CONST0 - 3065 POP 2 - 3067 ACC1 - 3068 C_CALL1 ml_string_length - 3070 PUSHACC1 - 3071 EQ - 3072 BRANCHIFNOT 3077 - 3074 ACC1 - 3075 RETURN 2 - 3077 ACC0 - 3078 C_CALL1 create_string - 3080 PUSHCONST0 - 3081 ASSIGN 1 - 3083 CONST0 - 3084 PUSHACC3 - 3085 C_CALL1 ml_string_length - 3087 OFFSETINT -1 - 3089 PUSH - 3090 BRANCH 3245 - 3092 CHECK_SIGNALS - 3093 ACC1 - 3094 PUSHACC5 - 3095 GETSTRINGCHAR - 3096 PUSHACC0 - 3097 PUSHGETGLOBAL "\000\000\000\000\004\000\000\000\000\000\000\016\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000" - 3099 C_CALL2 bitvect_test - 3101 BRANCHIFNOT 3120 - 3103 CONST0 - 3104 CONSTINT 92 - 3106 PUSHACC5 - 3107 PUSHACC5 - 3108 SETSTRINGCHAR - 3109 ACC4 - 3110 OFFSETINT 1 - 3112 ASSIGN 4 - 3114 ACC0 - 3115 PUSHACC5 - 3116 PUSHACC5 - 3117 SETSTRINGCHAR - 3118 BRANCH 3233 - 3120 CONSTINT 9 - 3122 PUSHACC1 - 3123 EQ - 3124 BRANCHIFNOT 3143 - 3126 CONSTINT 92 - 3128 PUSHACC5 - 3129 PUSHACC5 - 3130 SETSTRINGCHAR - 3131 ACC4 - 3132 OFFSETINT 1 - 3134 ASSIGN 4 - 3136 CONSTINT 116 - 3138 PUSHACC5 - 3139 PUSHACC5 - 3140 SETSTRINGCHAR - 3141 BRANCH 3233 - 3143 CONSTINT 13 - 3145 PUSHACC1 - 3146 EQ - 3147 BRANCHIFNOT 3166 - 3149 CONSTINT 92 - 3151 PUSHACC5 - 3152 PUSHACC5 - 3153 SETSTRINGCHAR - 3154 ACC4 - 3155 OFFSETINT 1 - 3157 ASSIGN 4 - 3159 CONSTINT 110 - 3161 PUSHACC5 - 3162 PUSHACC5 - 3163 SETSTRINGCHAR - 3164 BRANCH 3233 - 3166 ACC0 - 3167 C_CALL1 is_printable - 3169 BRANCHIFNOT 3177 - 3171 ACC0 - 3172 PUSHACC5 - 3173 PUSHACC5 - 3174 SETSTRINGCHAR - 3175 BRANCH 3233 - 3177 ACC0 - 3178 PUSHCONSTINT 92 - 3180 PUSHACC6 - 3181 PUSHACC6 - 3182 SETSTRINGCHAR - 3183 ACC5 - 3184 OFFSETINT 1 - 3186 ASSIGN 5 - 3188 CONSTINT 100 - 3190 PUSHACC1 - 3191 DIVINT - 3192 PUSHCONSTINT 48 - 3194 ADDINT - 3195 PUSHACC6 - 3196 PUSHACC6 - 3197 SETSTRINGCHAR - 3198 ACC5 - 3199 OFFSETINT 1 - 3201 ASSIGN 5 - 3203 CONSTINT 10 - 3205 PUSHCONSTINT 10 - 3207 PUSHACC2 - 3208 DIVINT - 3209 MODINT - 3210 PUSHCONSTINT 48 - 3212 ADDINT - 3213 PUSHACC6 - 3214 PUSHACC6 - 3215 SETSTRINGCHAR - 3216 ACC5 - 3217 OFFSETINT 1 - 3219 ASSIGN 5 - 3221 CONSTINT 10 - 3223 PUSHACC1 - 3224 MODINT - 3225 PUSHCONSTINT 48 - 3227 ADDINT - 3228 PUSHACC6 - 3229 PUSHACC6 - 3230 SETSTRINGCHAR - 3231 POP 1 - 3233 POP 1 - 3235 ACC3 - 3236 OFFSETINT 1 - 3238 ASSIGN 3 - 3240 ACC1 - 3241 OFFSETINT 1 - 3243 ASSIGN 1 - 3245 ACC0 - 3246 PUSHACC2 - 3247 LEINT - 3248 BRANCHIF 3092 - 3250 CONST0 - 3251 POP 2 - 3253 ACC0 - 3254 RETURN 3 - 3256 ENVACC1 - 3257 C_CALL1 ml_string_length - 3259 PUSHENVACC3 - 3260 GETFIELD0 - 3261 PUSHENVACC2 - 3262 PUSHCONST0 - 3263 PUSHENVACC1 - 3264 C_CALL5 blit_string - 3266 ENVACC1 - 3267 C_CALL1 ml_string_length - 3269 PUSHENVACC3 - 3270 GETFIELD0 - 3271 ADDINT - 3272 PUSHENVACC3 - 3273 SETFIELD0 - 3274 ACC0 - 3275 C_CALL1 ml_string_length - 3277 PUSHENVACC3 - 3278 GETFIELD0 - 3279 PUSHENVACC2 - 3280 PUSHCONST0 - 3281 PUSHACC4 - 3282 C_CALL5 blit_string - 3284 ACC0 - 3285 C_CALL1 ml_string_length - 3287 PUSHENVACC3 - 3288 GETFIELD0 - 3289 ADDINT - 3290 PUSHENVACC3 - 3291 SETFIELD0 - 3292 RETURN 1 - 3294 ENVACC1 - 3295 OFFSETREF 1 - 3297 ACC0 - 3298 C_CALL1 ml_string_length - 3300 PUSHENVACC2 - 3301 GETFIELD0 - 3302 ADDINT - 3303 PUSHENVACC2 - 3304 SETFIELD0 - 3305 RETURN 1 - 3307 RESTART - 3308 GRAB 1 - 3310 ACC1 - 3311 BRANCHIFNOT 3374 - 3313 ACC1 - 3314 GETFIELD0 - 3315 PUSHCONST0 - 3316 MAKEBLOCK1 0 - 3318 PUSHCONST0 - 3319 MAKEBLOCK1 0 - 3321 PUSHACC4 - 3322 PUSHACC1 - 3323 PUSHACC3 - 3324 CLOSURE 2, 3294 - 3327 PUSHGETGLOBALFIELD List, 9 - 3330 APPLY2 - 3331 ACC1 - 3332 GETFIELD0 - 3333 OFFSETINT -1 - 3335 PUSHACC4 - 3336 C_CALL1 ml_string_length - 3338 MULINT - 3339 PUSHACC1 - 3340 GETFIELD0 - 3341 ADDINT - 3342 C_CALL1 create_string - 3344 PUSHACC3 - 3345 C_CALL1 ml_string_length - 3347 PUSHCONST0 - 3348 PUSHACC2 - 3349 PUSHCONST0 - 3350 PUSHACC7 - 3351 C_CALL5 blit_string - 3353 ACC3 - 3354 C_CALL1 ml_string_length - 3356 MAKEBLOCK1 0 - 3358 PUSHACC6 - 3359 GETFIELD1 - 3360 PUSHACC1 - 3361 PUSHACC3 - 3362 PUSHACC 8 - 3364 CLOSURE 3, 3256 - 3367 PUSHGETGLOBALFIELD List, 9 - 3370 APPLY2 - 3371 ACC1 - 3372 RETURN 7 - 3374 GETGLOBAL "" - 3376 RETURN 2 - 3378 RESTART - 3379 GRAB 4 - 3381 CONST0 - 3382 PUSHACC5 - 3383 LTINT - 3384 BRANCHIF 3414 - 3386 CONST0 - 3387 PUSHACC2 - 3388 LTINT - 3389 BRANCHIF 3414 - 3391 ACC0 - 3392 C_CALL1 ml_string_length - 3394 PUSHACC5 - 3395 PUSHACC3 - 3396 ADDINT - 3397 GTINT - 3398 BRANCHIF 3414 - 3400 CONST0 - 3401 PUSHACC4 - 3402 LTINT - 3403 BRANCHIF 3414 - 3405 ACC2 - 3406 C_CALL1 ml_string_length - 3408 PUSHACC5 - 3409 PUSHACC5 - 3410 ADDINT - 3411 GTINT - 3412 BRANCHIFNOT 3421 - 3414 GETGLOBAL "String.blit" - 3416 PUSHGETGLOBALFIELD Pervasives, 2 - 3419 APPTERM1 6 - 3421 ACC4 - 3422 PUSHACC4 - 3423 PUSHACC4 - 3424 PUSHACC4 - 3425 PUSHACC4 - 3426 C_CALL5 blit_string - 3428 RETURN 5 - 3430 RESTART - 3431 GRAB 3 - 3433 CONST0 - 3434 PUSHACC2 - 3435 LTINT - 3436 BRANCHIF 3452 - 3438 CONST0 - 3439 PUSHACC3 - 3440 LTINT - 3441 BRANCHIF 3452 - 3443 ACC0 - 3444 C_CALL1 ml_string_length - 3446 PUSHACC3 - 3447 PUSHACC3 - 3448 ADDINT - 3449 GTINT - 3450 BRANCHIFNOT 3459 - 3452 GETGLOBAL "String.fill" - 3454 PUSHGETGLOBALFIELD Pervasives, 2 - 3457 APPTERM1 5 - 3459 ACC3 - 3460 PUSHACC3 - 3461 PUSHACC3 - 3462 PUSHACC3 - 3463 C_CALL4 fill_string - 3465 RETURN 4 - 3467 RESTART - 3468 GRAB 2 - 3470 CONST0 - 3471 PUSHACC2 - 3472 LTINT - 3473 BRANCHIF 3489 - 3475 CONST0 - 3476 PUSHACC3 - 3477 LTINT - 3478 BRANCHIF 3489 - 3480 ACC0 - 3481 C_CALL1 ml_string_length - 3483 PUSHACC3 - 3484 PUSHACC3 - 3485 ADDINT - 3486 GTINT - 3487 BRANCHIFNOT 3496 - 3489 GETGLOBAL "String.sub" - 3491 PUSHGETGLOBALFIELD Pervasives, 2 - 3494 APPTERM1 4 - 3496 ACC2 - 3497 C_CALL1 create_string - 3499 PUSHACC3 - 3500 PUSHCONST0 - 3501 PUSHACC2 - 3502 PUSHACC5 - 3503 PUSHACC5 - 3504 C_CALL5 blit_string - 3506 ACC0 - 3507 RETURN 4 - 3509 ACC0 - 3510 C_CALL1 ml_string_length - 3512 PUSHACC0 - 3513 C_CALL1 create_string - 3515 PUSHACC1 - 3516 PUSHCONST0 - 3517 PUSHACC2 - 3518 PUSHCONST0 - 3519 PUSHACC6 - 3520 C_CALL5 blit_string - 3522 ACC0 - 3523 RETURN 3 - 3525 RESTART - 3526 GRAB 1 - 3528 ACC0 - 3529 C_CALL1 create_string - 3531 PUSHACC2 - 3532 PUSHACC2 - 3533 PUSHCONST0 - 3534 PUSHACC3 - 3535 C_CALL4 fill_string - 3537 ACC0 - 3538 RETURN 3 - 3540 CLOSURE 0, 3526 - 3543 PUSH - 3544 CLOSURE 0, 3509 - 3547 PUSH - 3548 CLOSURE 0, 3468 - 3551 PUSH - 3552 CLOSURE 0, 3431 - 3555 PUSH - 3556 CLOSURE 0, 3379 - 3559 PUSH - 3560 CLOSURE 0, 3308 - 3563 PUSH - 3564 CLOSURE 0, 3013 - 3567 PUSH - 3568 CLOSURE 0, 2965 - 3571 PUSHACC0 - 3572 CLOSURE 1, 2957 - 3575 PUSHACC1 - 3576 CLOSURE 1, 2950 - 3579 PUSHACC 8 - 3581 CLOSURE 1, 2924 - 3584 PUSHACC0 - 3585 CLOSURE 1, 2916 - 3588 PUSHACC1 - 3589 CLOSURE 1, 2909 - 3592 PUSH - 3593 CLOSUREREC 0, 2651 - 3597 ACC0 - 3598 CLOSURE 1, 2897 - 3601 PUSHACC1 - 3602 CLOSURE 1, 2865 - 3605 PUSH - 3606 CLOSUREREC 0, 2684 - 3610 ACC0 - 3611 CLOSURE 1, 2852 - 3614 PUSHACC1 - 3615 CLOSURE 1, 2824 - 3618 PUSHACC5 - 3619 CLOSURE 1, 2769 - 3622 PUSHACC3 - 3623 CLOSURE 1, 2724 - 3626 PUSHACC1 - 3627 CLOSURE 1, 2715 - 3630 PUSHACC 9 - 3632 PUSHACC 11 - 3634 PUSHACC 14 - 3636 PUSHACC 16 - 3638 PUSHACC5 - 3639 PUSHACC7 - 3640 PUSHACC6 - 3641 PUSHACC 10 - 3643 PUSHACC 14 - 3645 PUSHACC 13 - 3647 PUSHACC 17 - 3649 PUSHACC 26 - 3651 PUSHACC 28 - 3653 PUSHACC 30 - 3655 PUSHACC 32 - 3657 PUSHACC 34 - 3659 PUSHACC 36 - 3661 PUSHACC 38 - 3663 MAKEBLOCK 18, 0 - 3666 POP 22 - 3668 SETGLOBAL String - 3670 GETGLOBAL "" - 3672 PUSHCONSTINT 20 - 3674 C_CALL2 make_vect - 3676 PUSHCONSTINT 20 - 3678 C_CALL1 weak_create - 3680 PUSHCONST0 - 3681 PUSHCONSTINT 19 - 3683 PUSH - 3684 BRANCH 3712 - 3686 CHECK_SIGNALS - 3687 CONSTINT 115 - 3689 PUSHCONSTINT 20 - 3691 PUSHGETGLOBALFIELD String, 0 - 3694 APPLY2 - 3695 PUSHACC2 - 3696 PUSHACC5 - 3697 SETVECTITEM - 3698 ACC1 - 3699 PUSHACC4 - 3700 GETVECTITEM - 3701 MAKEBLOCK1 0 - 3703 PUSHACC2 - 3704 PUSHACC4 - 3705 C_CALL3 weak_set - 3707 ACC1 - 3708 OFFSETINT 1 - 3710 ASSIGN 1 - 3712 ACC0 - 3713 PUSHACC2 - 3714 LEINT - 3715 BRANCHIF 3686 - 3717 CONST0 - 3718 POP 2 - 3720 CONST0 - 3721 C_CALL1 gc_full_major - 3723 CONST0 - 3724 PUSHCONSTINT 19 - 3726 PUSH - 3727 BRANCH 3750 - 3729 CHECK_SIGNALS - 3730 ACC1 - 3731 PUSHACC3 - 3732 C_CALL2 weak_get - 3734 PUSHACC0 - 3735 BRANCHIF 3742 - 3737 GETGLOBAL Not_found - 3739 MAKEBLOCK1 0 - 3741 RAISE - 3742 CONST0 - 3743 POP 1 - 3745 ACC1 - 3746 OFFSETINT 1 - 3748 ASSIGN 1 - 3750 ACC0 - 3751 PUSHACC2 - 3752 LEINT - 3753 BRANCHIF 3729 - 3755 CONST0 - 3756 POP 2 - 3758 CONST0 - 3759 PUSHCONSTINT 19 - 3761 PUSH - 3762 BRANCH 3782 - 3764 CHECK_SIGNALS - 3765 CONST0 - 3766 PUSHCONST2 - 3767 PUSHACC3 - 3768 MODINT - 3769 EQ - 3770 BRANCHIFNOT 3777 - 3772 GETGLOBAL "" - 3774 PUSHACC2 - 3775 PUSHACC5 - 3776 SETVECTITEM - 3777 ACC1 - 3778 OFFSETINT 1 - 3780 ASSIGN 1 - 3782 ACC0 - 3783 PUSHACC2 - 3784 LEINT - 3785 BRANCHIF 3764 - 3787 CONST0 - 3788 POP 2 - 3790 CONST0 - 3791 C_CALL1 gc_full_major - 3793 CONST0 - 3794 PUSHCONSTINT 19 - 3796 PUSH - 3797 BRANCH 3851 - 3799 CHECK_SIGNALS - 3800 ACC1 - 3801 PUSHACC3 - 3802 C_CALL2 weak_get - 3804 PUSHACC0 - 3805 BRANCHIFNOT 3829 - 3807 CONST1 - 3808 PUSHCONST2 - 3809 PUSHACC4 - 3810 MODINT - 3811 EQ - 3812 BRANCHIFNOT 3839 - 3814 CONSTINT 115 - 3816 PUSHCONSTINT 5 - 3818 PUSHACC2 - 3819 GETFIELD0 - 3820 GETSTRINGCHAR - 3821 NEQ - 3822 BRANCHIFNOT 3844 - 3824 GETGLOBAL Not_found - 3826 MAKEBLOCK1 0 - 3828 RAISE - 3829 CONST0 - 3830 PUSHCONST2 - 3831 PUSHACC4 - 3832 MODINT - 3833 EQ - 3834 BRANCHIFNOT 3839 - 3836 CONST0 - 3837 BRANCH 3844 - 3839 GETGLOBAL Not_found - 3841 MAKEBLOCK1 0 - 3843 RAISE - 3844 POP 1 - 3846 ACC1 - 3847 OFFSETINT 1 - 3849 ASSIGN 1 - 3851 ACC0 - 3852 PUSHACC2 - 3853 LEINT - 3854 BRANCHIF 3799 - 3856 CONST0 - 3857 POP 4 - 3859 ATOM0 - 3860 SETGLOBAL T340-weak - 3862 STOP -**) |