← Back to branch summary

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

« back to all changes in this revision

Viewing changes to bytecomp/translmod.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:
bytecomp/translmod.ml
10
10
(*                                                                     *)
11
11
(***********************************************************************)
12
12
 
13
 
(* $Id: translmod.ml 8930 2008-07-24 05:35:22Z frisch $ *)
 
13
(* $Id: translmod.ml 9547 2010-01-22 12:48:24Z doligez $ *)
14
14
 
15
15
(* Translation from typed abstract syntax to lambda terms,
16
16
   for the module language *)
84
84
let record_primitive = function
85
85
  | {val_kind=Val_prim p} -> primitive_declarations := p :: !primitive_declarations
86
86
  | _ -> ()
87
 
 
 
87
 
88
88
(* Keep track of the root path (from the root of the namespace to the
89
89
   currently compiled module expression).  Useful for naming exceptions. *)
90
90
 
266
266
                [transl_module ccarg None arg], mexp.mod_loc))
267
267
  | Tmod_constraint(arg, mty, ccarg) ->
268
268
      transl_module (compose_coercions cc ccarg) rootpath arg
 
269
  | Tmod_unpack(arg, _) ->
 
270
      Translcore.transl_exp arg
269
271
 
270
272
and transl_structure fields cc rootpath = function
271
273
    [] ->