← Back to branch summary

~ubuntu-branches/debian/sid/ocaml/sid

« back to all changes in this revision

Viewing changes to testsuite/tests/tool-ocaml/t253-offsetclosure2.ml

  • Committer: Bazaar Package Importer
  • Author(s): Stéphane Glondu
  • Date: 2011-04-21 21:35:08 UTC
  • mfrom: (1.1.11 upstream) (12.1.14 sid)
  • Revision ID: james.westby@ubuntu.com-20110421213508-kg34453aqmb0moha
* Fixes related to -output-obj with g++ (in debian/patches):
  - add Declare-primitive-name-table-as-const-char
  - add Avoid-multiple-declarations-in-generated-.c-files-in
  - fix Embed-bytecode-in-C-object-when-using-custom: the closing
    brace for extern "C" { ... } was missing in some cases

Show diffs side-by-side

added added

removed removed

Lines of Context:
testsuite/tests/tool-ocaml/t253-offsetclosure2.ml
 
1
open Lib;;
 
2
let rec f _ = g
 
3
    and g _ = 10
 
4
in
 
5
if f 3 4 <> 10 then raise Not_found
 
6
;;
 
7
 
 
8
(**
 
9
       0 CONSTINT 42
 
10
       2 PUSHACC0 
 
11
       3 MAKEBLOCK1 0
 
12
       5 POP 1
 
13
       7 SETGLOBAL Lib
 
14
       9 BRANCH 18
 
15
      11 OFFSETCLOSURE2 
 
16
      12 RETURN 1
 
17
      14 CONSTINT 10
 
18
      16 RETURN 1
 
19
      18 CLOSUREREC 0, 11, 14
 
20
      23 CONSTINT 10
 
21
      25 PUSHCONSTINT 4
 
22
      27 PUSHCONST3 
 
23
      28 PUSHACC4 
 
24
      29 APPLY2 
 
25
      30 NEQ 
 
26
      31 BRANCHIFNOT 38
 
27
      33 GETGLOBAL Not_found
 
28
      35 MAKEBLOCK1 0
 
29
      37 RAISE 
 
30
      38 POP 2
 
31
      40 ATOM0 
 
32
      41 SETGLOBAL T253-offsetclosure2
 
33
      43 STOP 
 
34
**)