diff options
Diffstat (limited to 'ocaml-binary-annot/testsuite/tests/tool-ocaml/t164-apply2.ml')
| -rw-r--r-- | ocaml-binary-annot/testsuite/tests/tool-ocaml/t164-apply2.ml | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/ocaml-binary-annot/testsuite/tests/tool-ocaml/t164-apply2.ml b/ocaml-binary-annot/testsuite/tests/tool-ocaml/t164-apply2.ml new file mode 100644 index 0000000000..7fbe7d9974 --- /dev/null +++ b/ocaml-binary-annot/testsuite/tests/tool-ocaml/t164-apply2.ml @@ -0,0 +1,24 @@ +open Lib;; +let f _ _ = 0 in f 0 0;; + +(** + 0 CONSTINT 42 + 2 PUSHACC0 + 3 MAKEBLOCK1 0 + 5 POP 1 + 7 SETGLOBAL Lib + 9 BRANCH 17 + 11 RESTART + 12 GRAB 1 + 14 CONST0 + 15 RETURN 2 + 17 CLOSURE 0, 12 + 20 PUSHCONST0 + 21 PUSHCONST0 + 22 PUSHACC2 + 23 APPLY2 + 24 POP 1 + 26 ATOM0 + 27 SETGLOBAL T164-apply2 + 29 STOP +**) |