//
// The LLVM Compiler Infrastructure
//
-// This file was developed by the LLVM research group and is distributed under
-// the University of Illinois Open Source License. See LICENSE.TXT for details.
+// This file is distributed under the University of Illinois Open Source
+// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
//
#include "llvm/CodeGen/IntrinsicLowering.h"
#include "llvm/DerivedTypes.h"
#include "llvm/Module.h"
-#include "llvm/ModuleProvider.h"
+#include <cstring>
using namespace llvm;
+namespace {
+
static struct RegisterInterp {
RegisterInterp() { Interpreter::Register(); }
} InterpRegistrator;
-namespace llvm {
- void LinkInInterpreter() {
- }
}
+extern "C" void LLVMLinkInInterpreter() { }
+
/// create - Create a new interpreter object. This can never fail.
///
-ExecutionEngine *Interpreter::create(ModuleProvider *MP) {
- Module *M;
- try {
- M = MP->materializeModule();
- } catch (...) {
- return 0; // error materializing the module.
- }
-
- if (M->getEndianness() == Module::AnyEndianness) {
- int Test = 0;
- *(char*)&Test = 1; // Return true if the host is little endian
- bool isLittleEndian = (Test == 1);
- M->setEndianness(isLittleEndian ? Module::LittleEndian : Module::BigEndian);
- }
-
- if (M->getPointerSize() == Module::AnyPointerSize) {
- // Follow host.
- bool Ptr64 = sizeof(void*) == 8;
- M->setPointerSize(Ptr64 ? Module::Pointer64 : Module::Pointer32);
- }
+ExecutionEngine *Interpreter::create(Module *M, std::string* ErrStr) {
+ // Tell this Module to materialize everything and release the GVMaterializer.
+ if (M->MaterializeAllPermanently(ErrStr))
+ // We got an error, just return 0
+ return 0;
return new Interpreter(M);
}
//===----------------------------------------------------------------------===//
// Interpreter ctor - Initialize stuff
//
-Interpreter::Interpreter(Module *M) : ExecutionEngine(M), TD(M) {
+Interpreter::Interpreter(Module *M)
+ : ExecutionEngine(M), TD(M) {
- memset(&ExitValue, 0, sizeof(ExitValue));
+ memset(&ExitValue.Untyped, 0, sizeof(ExitValue.Untyped));
setTargetData(&TD);
// Initialize the "backend"
initializeExecutionEngine();
initializeExternalFunctions();
emitGlobals();
- IL = new DefaultIntrinsicLowering();
+ IL = new IntrinsicLowering(TD);
}
Interpreter::~Interpreter() {
return ExitValue;
}
-