summaryrefslogtreecommitdiff
path: root/testsuite/tests/tool-ocaml/t310-alloc-2.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/tool-ocaml/t310-alloc-2.ml')
-rw-r--r--testsuite/tests/tool-ocaml/t310-alloc-2.ml2313
1 files changed, 2313 insertions, 0 deletions
diff --git a/testsuite/tests/tool-ocaml/t310-alloc-2.ml b/testsuite/tests/tool-ocaml/t310-alloc-2.ml
new file mode 100644
index 0000000000..81034e78ab
--- /dev/null
+++ b/testsuite/tests/tool-ocaml/t310-alloc-2.ml
@@ -0,0 +1,2313 @@
+open Lib;;
+let v = Array.make 200000 2 in
+let t = ref 0 in
+Array.iter (fun x -> t := !t + x) v;
+if !t <> 400000 then raise Not_found
+;;
+
+(**
+ 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 3341
+ 2406 RESTART
+ 2407 GRAB 2
+ 2409 ACC2
+ 2410 PUSHACC2
+ 2411 VECTLENGTH
+ 2412 OFFSETINT -1
+ 2414 PUSHCONST0
+ 2415 PUSH
+ 2416 BRANCH 2433
+ 2418 CHECK_SIGNALS
+ 2419 ACC2
+ 2420 PUSHACC2
+ 2421 PUSHACC6
+ 2422 C_CALL2 array_unsafe_get
+ 2424 PUSHACC5
+ 2425 APPLY2
+ 2426 ASSIGN 2
+ 2428 ACC1
+ 2429 OFFSETINT -1
+ 2431 ASSIGN 1
+ 2433 ACC0
+ 2434 PUSHACC2
+ 2435 GEINT
+ 2436 BRANCHIF 2418
+ 2438 CONST0
+ 2439 POP 2
+ 2441 ACC0
+ 2442 RETURN 4
+ 2444 RESTART
+ 2445 GRAB 2
+ 2447 ACC1
+ 2448 PUSHCONST0
+ 2449 PUSHACC4
+ 2450 VECTLENGTH
+ 2451 OFFSETINT -1
+ 2453 PUSH
+ 2454 BRANCH 2471
+ 2456 CHECK_SIGNALS
+ 2457 ACC1
+ 2458 PUSHACC6
+ 2459 C_CALL2 array_unsafe_get
+ 2461 PUSHACC3
+ 2462 PUSHACC5
+ 2463 APPLY2
+ 2464 ASSIGN 2
+ 2466 ACC1
+ 2467 OFFSETINT 1
+ 2469 ASSIGN 1
+ 2471 ACC0
+ 2472 PUSHACC2
+ 2473 LEINT
+ 2474 BRANCHIF 2456
+ 2476 CONST0
+ 2477 POP 2
+ 2479 ACC0
+ 2480 RETURN 4
+ 2482 RESTART
+ 2483 GRAB 1
+ 2485 ACC1
+ 2486 BRANCHIFNOT 2502
+ 2488 ACC1
+ 2489 GETFIELD0
+ 2490 PUSHACC1
+ 2491 PUSHENVACC1
+ 2492 C_CALL3 array_unsafe_set
+ 2494 ACC1
+ 2495 GETFIELD1
+ 2496 PUSHACC1
+ 2497 OFFSETINT 1
+ 2499 PUSHOFFSETCLOSURE0
+ 2500 APPTERM2 4
+ 2502 ENVACC1
+ 2503 RETURN 2
+ 2505 ACC0
+ 2506 BRANCHIFNOT 2531
+ 2508 ACC0
+ 2509 GETFIELD1
+ 2510 PUSHACC1
+ 2511 GETFIELD0
+ 2512 PUSHACC1
+ 2513 PUSHGETGLOBALFIELD List, 0
+ 2516 APPLY1
+ 2517 OFFSETINT 1
+ 2519 C_CALL2 make_vect
+ 2521 PUSHACC0
+ 2522 CLOSUREREC 1, 2483
+ 2526 ACC2
+ 2527 PUSHCONST1
+ 2528 PUSHACC2
+ 2529 APPTERM2 6
+ 2531 ATOM0
+ 2532 RETURN 1
+ 2534 RESTART
+ 2535 GRAB 1
+ 2537 CONST0
+ 2538 PUSHACC1
+ 2539 LTINT
+ 2540 BRANCHIFNOT 2545
+ 2542 ACC1
+ 2543 RETURN 2
+ 2545 ACC1
+ 2546 PUSHACC1
+ 2547 PUSHENVACC1
+ 2548 C_CALL2 array_unsafe_get
+ 2550 MAKEBLOCK2 0
+ 2552 PUSHACC1
+ 2553 OFFSETINT -1
+ 2555 PUSHOFFSETCLOSURE0
+ 2556 APPTERM2 4
+ 2558 ACC0
+ 2559 CLOSUREREC 1, 2535
+ 2563 CONST0
+ 2564 PUSHACC2
+ 2565 VECTLENGTH
+ 2566 OFFSETINT -1
+ 2568 PUSHACC2
+ 2569 APPTERM2 4
+ 2571 RESTART
+ 2572 GRAB 1
+ 2574 ACC1
+ 2575 VECTLENGTH
+ 2576 PUSHCONST0
+ 2577 PUSHACC1
+ 2578 EQ
+ 2579 BRANCHIFNOT 2584
+ 2581 ATOM0
+ 2582 RETURN 3
+ 2584 CONST0
+ 2585 PUSHACC3
+ 2586 C_CALL2 array_unsafe_get
+ 2588 PUSHCONST0
+ 2589 PUSHACC3
+ 2590 APPLY2
+ 2591 PUSHACC1
+ 2592 C_CALL2 make_vect
+ 2594 PUSHCONST1
+ 2595 PUSHACC2
+ 2596 OFFSETINT -1
+ 2598 PUSH
+ 2599 BRANCH 2618
+ 2601 CHECK_SIGNALS
+ 2602 ACC1
+ 2603 PUSHACC6
+ 2604 C_CALL2 array_unsafe_get
+ 2606 PUSHACC2
+ 2607 PUSHACC6
+ 2608 APPLY2
+ 2609 PUSHACC2
+ 2610 PUSHACC4
+ 2611 C_CALL3 array_unsafe_set
+ 2613 ACC1
+ 2614 OFFSETINT 1
+ 2616 ASSIGN 1
+ 2618 ACC0
+ 2619 PUSHACC2
+ 2620 LEINT
+ 2621 BRANCHIF 2601
+ 2623 CONST0
+ 2624 POP 2
+ 2626 ACC0
+ 2627 RETURN 4
+ 2629 RESTART
+ 2630 GRAB 1
+ 2632 CONST0
+ 2633 PUSHACC2
+ 2634 VECTLENGTH
+ 2635 OFFSETINT -1
+ 2637 PUSH
+ 2638 BRANCH 2653
+ 2640 CHECK_SIGNALS
+ 2641 ACC1
+ 2642 PUSHACC4
+ 2643 C_CALL2 array_unsafe_get
+ 2645 PUSHACC2
+ 2646 PUSHACC4
+ 2647 APPLY2
+ 2648 ACC1
+ 2649 OFFSETINT 1
+ 2651 ASSIGN 1
+ 2653 ACC0
+ 2654 PUSHACC2
+ 2655 LEINT
+ 2656 BRANCHIF 2640
+ 2658 CONST0
+ 2659 RETURN 4
+ 2661 RESTART
+ 2662 GRAB 1
+ 2664 ACC1
+ 2665 VECTLENGTH
+ 2666 PUSHCONST0
+ 2667 PUSHACC1
+ 2668 EQ
+ 2669 BRANCHIFNOT 2674
+ 2671 ATOM0
+ 2672 RETURN 3
+ 2674 CONST0
+ 2675 PUSHACC3
+ 2676 C_CALL2 array_unsafe_get
+ 2678 PUSHACC2
+ 2679 APPLY1
+ 2680 PUSHACC1
+ 2681 C_CALL2 make_vect
+ 2683 PUSHCONST1
+ 2684 PUSHACC2
+ 2685 OFFSETINT -1
+ 2687 PUSH
+ 2688 BRANCH 2706
+ 2690 CHECK_SIGNALS
+ 2691 ACC1
+ 2692 PUSHACC6
+ 2693 C_CALL2 array_unsafe_get
+ 2695 PUSHACC5
+ 2696 APPLY1
+ 2697 PUSHACC2
+ 2698 PUSHACC4
+ 2699 C_CALL3 array_unsafe_set
+ 2701 ACC1
+ 2702 OFFSETINT 1
+ 2704 ASSIGN 1
+ 2706 ACC0
+ 2707 PUSHACC2
+ 2708 LEINT
+ 2709 BRANCHIF 2690
+ 2711 CONST0
+ 2712 POP 2
+ 2714 ACC0
+ 2715 RETURN 4
+ 2717 RESTART
+ 2718 GRAB 1
+ 2720 CONST0
+ 2721 PUSHACC2
+ 2722 VECTLENGTH
+ 2723 OFFSETINT -1
+ 2725 PUSH
+ 2726 BRANCH 2740
+ 2728 CHECK_SIGNALS
+ 2729 ACC1
+ 2730 PUSHACC4
+ 2731 C_CALL2 array_unsafe_get
+ 2733 PUSHACC3
+ 2734 APPLY1
+ 2735 ACC1
+ 2736 OFFSETINT 1
+ 2738 ASSIGN 1
+ 2740 ACC0
+ 2741 PUSHACC2
+ 2742 LEINT
+ 2743 BRANCHIF 2728
+ 2745 CONST0
+ 2746 RETURN 4
+ 2748 RESTART
+ 2749 GRAB 4
+ 2751 CONST0
+ 2752 PUSHACC5
+ 2753 LTINT
+ 2754 BRANCHIF 2782
+ 2756 CONST0
+ 2757 PUSHACC2
+ 2758 LTINT
+ 2759 BRANCHIF 2782
+ 2761 ACC0
+ 2762 VECTLENGTH
+ 2763 PUSHACC5
+ 2764 PUSHACC3
+ 2765 ADDINT
+ 2766 GTINT
+ 2767 BRANCHIF 2782
+ 2769 CONST0
+ 2770 PUSHACC4
+ 2771 LTINT
+ 2772 BRANCHIF 2782
+ 2774 ACC2
+ 2775 VECTLENGTH
+ 2776 PUSHACC5
+ 2777 PUSHACC5
+ 2778 ADDINT
+ 2779 GTINT
+ 2780 BRANCHIFNOT 2789
+ 2782 GETGLOBAL "Array.blit"
+ 2784 PUSHGETGLOBALFIELD Pervasives, 2
+ 2787 APPTERM1 6
+ 2789 ACC3
+ 2790 PUSHACC2
+ 2791 LTINT
+ 2792 BRANCHIFNOT 2827
+ 2794 ACC4
+ 2795 OFFSETINT -1
+ 2797 PUSHCONST0
+ 2798 PUSH
+ 2799 BRANCH 2819
+ 2801 CHECK_SIGNALS
+ 2802 ACC1
+ 2803 PUSHACC4
+ 2804 ADDINT
+ 2805 PUSHACC3
+ 2806 C_CALL2 array_unsafe_get
+ 2808 PUSHACC2
+ 2809 PUSHACC7
+ 2810 ADDINT
+ 2811 PUSHACC6
+ 2812 C_CALL3 array_unsafe_set
+ 2814 ACC1
+ 2815 OFFSETINT -1
+ 2817 ASSIGN 1
+ 2819 ACC0
+ 2820 PUSHACC2
+ 2821 GEINT
+ 2822 BRANCHIF 2801
+ 2824 CONST0
+ 2825 RETURN 7
+ 2827 CONST0
+ 2828 PUSHACC5
+ 2829 OFFSETINT -1
+ 2831 PUSH
+ 2832 BRANCH 2852
+ 2834 CHECK_SIGNALS
+ 2835 ACC1
+ 2836 PUSHACC4
+ 2837 ADDINT
+ 2838 PUSHACC3
+ 2839 C_CALL2 array_unsafe_get
+ 2841 PUSHACC2
+ 2842 PUSHACC7
+ 2843 ADDINT
+ 2844 PUSHACC6
+ 2845 C_CALL3 array_unsafe_set
+ 2847 ACC1
+ 2848 OFFSETINT 1
+ 2850 ASSIGN 1
+ 2852 ACC0
+ 2853 PUSHACC2
+ 2854 LEINT
+ 2855 BRANCHIF 2834
+ 2857 CONST0
+ 2858 RETURN 7
+ 2860 RESTART
+ 2861 GRAB 3
+ 2863 CONST0
+ 2864 PUSHACC2
+ 2865 LTINT
+ 2866 BRANCHIF 2881
+ 2868 CONST0
+ 2869 PUSHACC3
+ 2870 LTINT
+ 2871 BRANCHIF 2881
+ 2873 ACC0
+ 2874 VECTLENGTH
+ 2875 PUSHACC3
+ 2876 PUSHACC3
+ 2877 ADDINT
+ 2878 GTINT
+ 2879 BRANCHIFNOT 2888
+ 2881 GETGLOBAL "Array.fill"
+ 2883 PUSHGETGLOBALFIELD Pervasives, 2
+ 2886 APPTERM1 5
+ 2888 ACC1
+ 2889 PUSHACC3
+ 2890 PUSHACC3
+ 2891 ADDINT
+ 2892 OFFSETINT -1
+ 2894 PUSH
+ 2895 BRANCH 2908
+ 2897 CHECK_SIGNALS
+ 2898 ACC5
+ 2899 PUSHACC2
+ 2900 PUSHACC4
+ 2901 C_CALL3 array_unsafe_set
+ 2903 ACC1
+ 2904 OFFSETINT 1
+ 2906 ASSIGN 1
+ 2908 ACC0
+ 2909 PUSHACC2
+ 2910 LEINT
+ 2911 BRANCHIF 2897
+ 2913 CONST0
+ 2914 RETURN 6
+ 2916 RESTART
+ 2917 GRAB 2
+ 2919 CONST0
+ 2920 PUSHACC2
+ 2921 LTINT
+ 2922 BRANCHIF 2937
+ 2924 CONST0
+ 2925 PUSHACC3
+ 2926 LTINT
+ 2927 BRANCHIF 2937
+ 2929 ACC0
+ 2930 VECTLENGTH
+ 2931 PUSHACC3
+ 2932 PUSHACC3
+ 2933 ADDINT
+ 2934 GTINT
+ 2935 BRANCHIFNOT 2944
+ 2937 GETGLOBAL "Array.sub"
+ 2939 PUSHGETGLOBALFIELD Pervasives, 2
+ 2942 APPTERM1 4
+ 2944 CONST0
+ 2945 PUSHACC3
+ 2946 EQ
+ 2947 BRANCHIFNOT 2952
+ 2949 ATOM0
+ 2950 RETURN 3
+ 2952 ACC1
+ 2953 PUSHACC1
+ 2954 C_CALL2 array_unsafe_get
+ 2956 PUSHACC3
+ 2957 C_CALL2 make_vect
+ 2959 PUSHCONST1
+ 2960 PUSHACC4
+ 2961 OFFSETINT -1
+ 2963 PUSH
+ 2964 BRANCH 2982
+ 2966 CHECK_SIGNALS
+ 2967 ACC1
+ 2968 PUSHACC5
+ 2969 ADDINT
+ 2970 PUSHACC4
+ 2971 C_CALL2 array_unsafe_get
+ 2973 PUSHACC2
+ 2974 PUSHACC4
+ 2975 C_CALL3 array_unsafe_set
+ 2977 ACC1
+ 2978 OFFSETINT 1
+ 2980 ASSIGN 1
+ 2982 ACC0
+ 2983 PUSHACC2
+ 2984 LEINT
+ 2985 BRANCHIF 2966
+ 2987 CONST0
+ 2988 POP 2
+ 2990 ACC0
+ 2991 RETURN 4
+ 2993 ACC0
+ 2994 BRANCHIFNOT 3017
+ 2996 ACC0
+ 2997 GETFIELD0
+ 2998 PUSHCONST0
+ 2999 PUSHACC1
+ 3000 VECTLENGTH
+ 3001 GTINT
+ 3002 BRANCHIFNOT 3012
+ 3004 ENVACC2
+ 3005 PUSHCONST0
+ 3006 PUSHACC2
+ 3007 C_CALL2 array_unsafe_get
+ 3009 PUSHENVACC1
+ 3010 APPTERM2 4
+ 3012 ACC1
+ 3013 GETFIELD1
+ 3014 PUSHOFFSETCLOSURE0
+ 3015 APPTERM1 3
+ 3017 ATOM0
+ 3018 RETURN 1
+ 3020 ACC0
+ 3021 PUSHENVACC1
+ 3022 CLOSUREREC 2, 2993
+ 3026 ACC1
+ 3027 PUSHACC1
+ 3028 APPTERM1 3
+ 3030 CONST0
+ 3031 PUSHACC1
+ 3032 VECTLENGTH
+ 3033 OFFSETINT -1
+ 3035 PUSH
+ 3036 BRANCH 3056
+ 3038 CHECK_SIGNALS
+ 3039 ACC1
+ 3040 PUSHACC3
+ 3041 C_CALL2 array_unsafe_get
+ 3043 PUSHENVACC2
+ 3044 GETFIELD0
+ 3045 PUSHENVACC1
+ 3046 C_CALL3 array_unsafe_set
+ 3048 ENVACC2
+ 3049 OFFSETREF 1
+ 3051 ACC1
+ 3052 OFFSETINT 1
+ 3054 ASSIGN 1
+ 3056 ACC0
+ 3057 PUSHACC2
+ 3058 LEINT
+ 3059 BRANCHIF 3038
+ 3061 CONST0
+ 3062 RETURN 3
+ 3064 RESTART
+ 3065 GRAB 1
+ 3067 ACC1
+ 3068 VECTLENGTH
+ 3069 PUSHACC1
+ 3070 ADDINT
+ 3071 RETURN 2
+ 3073 RESTART
+ 3074 GRAB 1
+ 3076 ACC1
+ 3077 PUSHCONST0
+ 3078 PUSH
+ 3079 CLOSURE 0, 3065
+ 3082 PUSHGETGLOBALFIELD List, 12
+ 3085 APPLY3
+ 3086 PUSHACC1
+ 3087 PUSHACC1
+ 3088 C_CALL2 make_vect
+ 3090 PUSHCONST0
+ 3091 MAKEBLOCK1 0
+ 3093 PUSHACC4
+ 3094 PUSHACC1
+ 3095 PUSHACC3
+ 3096 CLOSURE 2, 3030
+ 3099 PUSHGETGLOBALFIELD List, 9
+ 3102 APPLY2
+ 3103 ACC1
+ 3104 RETURN 5
+ 3106 RESTART
+ 3107 GRAB 1
+ 3109 ACC0
+ 3110 VECTLENGTH
+ 3111 PUSHACC2
+ 3112 VECTLENGTH
+ 3113 PUSHCONST0
+ 3114 PUSHACC2
+ 3115 EQ
+ 3116 BRANCHIFNOT 3126
+ 3118 CONST0
+ 3119 PUSHACC1
+ 3120 EQ
+ 3121 BRANCHIFNOT 3126
+ 3123 ATOM0
+ 3124 RETURN 4
+ 3126 CONST0
+ 3127 PUSHCONST0
+ 3128 PUSHACC3
+ 3129 GTINT
+ 3130 BRANCHIFNOT 3135
+ 3132 ACC3
+ 3133 BRANCH 3136
+ 3135 ACC4
+ 3136 C_CALL2 array_unsafe_get
+ 3138 PUSHACC1
+ 3139 PUSHACC3
+ 3140 ADDINT
+ 3141 C_CALL2 make_vect
+ 3143 PUSHCONST0
+ 3144 PUSHACC3
+ 3145 OFFSETINT -1
+ 3147 PUSH
+ 3148 BRANCH 3164
+ 3150 CHECK_SIGNALS
+ 3151 ACC1
+ 3152 PUSHACC6
+ 3153 C_CALL2 array_unsafe_get
+ 3155 PUSHACC2
+ 3156 PUSHACC4
+ 3157 C_CALL3 array_unsafe_set
+ 3159 ACC1
+ 3160 OFFSETINT 1
+ 3162 ASSIGN 1
+ 3164 ACC0
+ 3165 PUSHACC2
+ 3166 LEINT
+ 3167 BRANCHIF 3150
+ 3169 CONST0
+ 3170 POP 2
+ 3172 CONST0
+ 3173 PUSHACC2
+ 3174 OFFSETINT -1
+ 3176 PUSH
+ 3177 BRANCH 3195
+ 3179 CHECK_SIGNALS
+ 3180 ACC1
+ 3181 PUSHACC7
+ 3182 C_CALL2 array_unsafe_get
+ 3184 PUSHACC5
+ 3185 PUSHACC3
+ 3186 ADDINT
+ 3187 PUSHACC4
+ 3188 C_CALL3 array_unsafe_set
+ 3190 ACC1
+ 3191 OFFSETINT 1
+ 3193 ASSIGN 1
+ 3195 ACC0
+ 3196 PUSHACC2
+ 3197 LEINT
+ 3198 BRANCHIF 3179
+ 3200 CONST0
+ 3201 POP 2
+ 3203 ACC0
+ 3204 RETURN 5
+ 3206 ACC0
+ 3207 VECTLENGTH
+ 3208 PUSHCONST0
+ 3209 PUSHACC1
+ 3210 EQ
+ 3211 BRANCHIFNOT 3216
+ 3213 ATOM0
+ 3214 RETURN 2
+ 3216 CONST0
+ 3217 PUSHACC2
+ 3218 C_CALL2 array_unsafe_get
+ 3220 PUSHACC1
+ 3221 C_CALL2 make_vect
+ 3223 PUSHCONST1
+ 3224 PUSHACC2
+ 3225 OFFSETINT -1
+ 3227 PUSH
+ 3228 BRANCH 3244
+ 3230 CHECK_SIGNALS
+ 3231 ACC1
+ 3232 PUSHACC5
+ 3233 C_CALL2 array_unsafe_get
+ 3235 PUSHACC2
+ 3236 PUSHACC4
+ 3237 C_CALL3 array_unsafe_set
+ 3239 ACC1
+ 3240 OFFSETINT 1
+ 3242 ASSIGN 1
+ 3244 ACC0
+ 3245 PUSHACC2
+ 3246 LEINT
+ 3247 BRANCHIF 3230
+ 3249 CONST0
+ 3250 POP 2
+ 3252 ACC0
+ 3253 RETURN 3
+ 3255 RESTART
+ 3256 GRAB 2
+ 3258 ATOM0
+ 3259 PUSHACC1
+ 3260 C_CALL2 make_vect
+ 3262 PUSHCONST0
+ 3263 PUSHACC2
+ 3264 OFFSETINT -1
+ 3266 PUSH
+ 3267 BRANCH 3282
+ 3269 CHECK_SIGNALS
+ 3270 ACC5
+ 3271 PUSHACC5
+ 3272 C_CALL2 make_vect
+ 3274 PUSHACC2
+ 3275 PUSHACC4
+ 3276 SETVECTITEM
+ 3277 ACC1
+ 3278 OFFSETINT 1
+ 3280 ASSIGN 1
+ 3282 ACC0
+ 3283 PUSHACC2
+ 3284 LEINT
+ 3285 BRANCHIF 3269
+ 3287 CONST0
+ 3288 POP 2
+ 3290 ACC0
+ 3291 RETURN 4
+ 3293 RESTART
+ 3294 GRAB 1
+ 3296 CONST0
+ 3297 PUSHACC1
+ 3298 EQ
+ 3299 BRANCHIFNOT 3304
+ 3301 ATOM0
+ 3302 RETURN 2
+ 3304 CONST0
+ 3305 PUSHACC2
+ 3306 APPLY1
+ 3307 PUSHACC1
+ 3308 C_CALL2 make_vect
+ 3310 PUSHCONST1
+ 3311 PUSHACC2
+ 3312 OFFSETINT -1
+ 3314 PUSH
+ 3315 BRANCH 3330
+ 3317 CHECK_SIGNALS
+ 3318 ACC1
+ 3319 PUSHACC5
+ 3320 APPLY1
+ 3321 PUSHACC2
+ 3322 PUSHACC4
+ 3323 C_CALL3 array_unsafe_set
+ 3325 ACC1
+ 3326 OFFSETINT 1
+ 3328 ASSIGN 1
+ 3330 ACC0
+ 3331 PUSHACC2
+ 3332 LEINT
+ 3333 BRANCHIF 3317
+ 3335 CONST0
+ 3336 POP 2
+ 3338 ACC0
+ 3339 RETURN 3
+ 3341 CLOSURE 0, 3294
+ 3344 PUSH
+ 3345 CLOSURE 0, 3256
+ 3348 PUSH
+ 3349 CLOSURE 0, 3206
+ 3352 PUSH
+ 3353 CLOSURE 0, 3107
+ 3356 PUSH
+ 3357 CLOSURE 0, 3074
+ 3360 PUSHACC0
+ 3361 CLOSURE 1, 3020
+ 3364 PUSH
+ 3365 CLOSURE 0, 2917
+ 3368 PUSH
+ 3369 CLOSURE 0, 2861
+ 3372 PUSH
+ 3373 CLOSURE 0, 2749
+ 3376 PUSH
+ 3377 CLOSURE 0, 2718
+ 3380 PUSH
+ 3381 CLOSURE 0, 2662
+ 3384 PUSH
+ 3385 CLOSURE 0, 2630
+ 3388 PUSH
+ 3389 CLOSURE 0, 2572
+ 3392 PUSH
+ 3393 CLOSURE 0, 2558
+ 3396 PUSH
+ 3397 CLOSURE 0, 2505
+ 3400 PUSH
+ 3401 CLOSURE 0, 2445
+ 3404 PUSH
+ 3405 CLOSURE 0, 2407
+ 3408 PUSHACC0
+ 3409 PUSHACC2
+ 3410 PUSHACC6
+ 3411 PUSHACC 8
+ 3413 PUSHACC 10
+ 3415 PUSHACC 12
+ 3417 PUSHACC 8
+ 3419 PUSHACC 10
+ 3421 PUSHACC 16
+ 3423 PUSHACC 18
+ 3425 PUSHACC 24
+ 3427 PUSHACC 21
+ 3429 PUSHACC 23
+ 3431 PUSHACC 26
+ 3433 PUSHACC 29
+ 3435 PUSHACC 30
+ 3437 PUSHACC 32
+ 3439 MAKEBLOCK 17, 0
+ 3442 POP 17
+ 3444 SETGLOBAL Array
+ 3446 BRANCH 3456
+ 3448 ACC0
+ 3449 PUSHENVACC1
+ 3450 GETFIELD0
+ 3451 ADDINT
+ 3452 PUSHENVACC1
+ 3453 SETFIELD0
+ 3454 RETURN 1
+ 3456 CONST2
+ 3457 PUSHCONSTINT 200000
+ 3459 C_CALL2 make_vect
+ 3461 PUSHCONST0
+ 3462 MAKEBLOCK1 0
+ 3464 PUSHACC1
+ 3465 PUSHACC1
+ 3466 CLOSURE 1, 3448
+ 3469 PUSHGETGLOBALFIELD Array, 11
+ 3472 APPLY2
+ 3473 CONSTINT 400000
+ 3475 PUSHACC1
+ 3476 GETFIELD0
+ 3477 NEQ
+ 3478 BRANCHIFNOT 3485
+ 3480 GETGLOBAL Not_found
+ 3482 MAKEBLOCK1 0
+ 3484 RAISE
+ 3485 POP 2
+ 3487 ATOM0
+ 3488 SETGLOBAL T310-alloc-2
+ 3490 STOP
+**)