projects
/
oota-llvm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
This reapplies r207130 with an additional testcase+and a missing check for
[oota-llvm.git]
/
lib
/
CodeGen
/
OcamlGC.cpp
diff --git
a/lib/CodeGen/OcamlGC.cpp
b/lib/CodeGen/OcamlGC.cpp
index 88499cbd66827c175053f7e993a4d248b1320544..48db200c513cd2a54d6767d017848e97d5e03897 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,28
@@
// 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 {
+ class OcamlGC : public GCStrategy {
public:
public:
- Ocaml
Collector
();
+ Ocaml
GC
();
};
};
-
}
}
-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;
}