|  | //===-- OcamlGC.cpp - Ocaml frametable GC strategy ------------------------===// | 
|  | // | 
|  | //                     The LLVM Compiler Infrastructure | 
|  | // | 
|  | // This file is distributed under the University of Illinois Open Source | 
|  | // License. See LICENSE.TXT for details. | 
|  | // | 
|  | //===----------------------------------------------------------------------===// | 
|  | // | 
|  | // This file implements lowering for the llvm.gc* intrinsics compatible with | 
|  | // Objective Caml 3.10.0, which uses a liveness-accurate static stack map. | 
|  | // | 
|  | // The frametable emitter is in OcamlGCPrinter.cpp. | 
|  | // | 
|  | //===----------------------------------------------------------------------===// | 
|  |  | 
|  | #include "llvm/CodeGen/GCs.h" | 
|  | #include "llvm/CodeGen/GCStrategy.h" | 
|  |  | 
|  | using namespace llvm; | 
|  |  | 
|  | namespace { | 
|  | class OcamlGC : public GCStrategy { | 
|  | public: | 
|  | OcamlGC(); | 
|  | }; | 
|  | } | 
|  |  | 
|  | static GCRegistry::Add<OcamlGC> X("ocaml", "ocaml 3.10-compatible GC"); | 
|  |  | 
|  | void llvm::linkOcamlGC() {} | 
|  |  | 
|  | OcamlGC::OcamlGC() { | 
|  | NeededSafePoints = 1 << GC::PostCall; | 
|  | UsesMetadata = true; | 
|  | } |