(***********************************************************************) (* *) (* Objective Caml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* Automatique. Distributed only by permission. *) (* *) (***********************************************************************) (* $Id$ *) (* Build libraries of .cmo files *) (* Format of a library file: magic number (Config.cma_magic_number) absolute offset of content table blocks of relocatable bytecode content table = list of compilation units *) val create_archive: string list -> string -> unit type error = File_not_found of string | Not_an_object_file of string exception Error of error val report_error: error -> unit