projects
/
oota-llvm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Reimplement discriminator assignment algorithm.
[oota-llvm.git]
/
lib
/
CodeGen
/
OcamlGC.cpp
diff --git
a/lib/CodeGen/OcamlGC.cpp
b/lib/CodeGen/OcamlGC.cpp
index 88499cbd66827c175053f7e993a4d248b1320544..17654a6ac3a20da74caf9e384e4c880df02ab91d 100644
(file)
--- a/
lib/CodeGen/OcamlGC.cpp
+++ b/
lib/CodeGen/OcamlGC.cpp
@@
-1,4
+1,4
@@
-//===-- Ocaml
Collector.cpp - Ocaml frametable emitter
---------------------===//
+//===-- Ocaml
GC.cpp - Ocaml frametable GC strategy ---
---------------------===//
//
// The LLVM Compiler Infrastructure
//
//
// The LLVM Compiler Infrastructure
//
@@
-10,37
+10,27
@@
// This file implements lowering for the llvm.gc* intrinsics compatible with
// Objective Caml 3.10.0, which uses a liveness-accurate static stack map.
//
// 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/GCs.h"
-#include "llvm/CodeGen/AsmPrinter.h"
#include "llvm/CodeGen/GCStrategy.h"
#include "llvm/CodeGen/GCStrategy.h"
-#include "llvm/Module.h"
-#include "llvm/Target/TargetAsmInfo.h"
-#include "llvm/Target/TargetData.h"
-#include "llvm/Target/TargetMachine.h"
using namespace llvm;
namespace {
using namespace llvm;
namespace {
-
- class VISIBILITY_HIDDEN OcamlCollector : public Collector {
- public:
- OcamlCollector();
- };
-
+class OcamlGC : public GCStrategy {
+public:
+ OcamlGC();
+};
}
}
-static CollectorRegistry::Add<OcamlCollector>
-X("ocaml", "ocaml 3.10-compatible collector");
+static GCRegistry::Add<OcamlGC> X("ocaml", "ocaml 3.10-compatible GC");
-// -----------------------------------------------------------------------------
-
-Collector *llvm::createOcamlCollector() {
- return new OcamlCollector();
-}
+void llvm::linkOcamlGC() {}
-Ocaml
Collector::OcamlCollector
() {
+Ocaml
GC::OcamlGC
() {
NeededSafePoints = 1 << GC::PostCall;
UsesMetadata = true;
}
NeededSafePoints = 1 << GC::PostCall;
UsesMetadata = true;
}