33 lines · c
1/*===-- all_backends_ocaml.c - LLVM OCaml Glue ------------------*- C++ -*-===*\2|* *|3|* Part of the LLVM Project, under the Apache License v2.0 with LLVM *|4|* Exceptions. *|5|* See https://llvm.org/LICENSE.txt for license information. *|6|* SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception *|7|* *|8|*===----------------------------------------------------------------------===*|9|* *|10|* This file glues LLVM's OCaml interface to its C interface. These functions *|11|* are by and large transparent wrappers to the corresponding C functions. *|12|* *|13|* Note that these functions intentionally take liberties with the CAMLparamX *|14|* macros, since most of the parameters are not GC heap objects. *|15|* *|16\*===----------------------------------------------------------------------===*/17 18#include "llvm-c/Target.h"19#include "caml/alloc.h"20#include "caml/fail.h"21#include "caml/memory.h"22#include "caml/custom.h"23 24/* unit -> unit */25value llvm_initialize_all(value Unit) {26 LLVMInitializeAllTargetInfos();27 LLVMInitializeAllTargets();28 LLVMInitializeAllTargetMCs();29 LLVMInitializeAllAsmPrinters();30 LLVMInitializeAllAsmParsers();31 return Val_unit;32}33