Implement varargs support for LLI!
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@6043 91177308-0d34-0410-b5e6-96231b3b80d8
diff --git a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
index ef81c12..88b994c 100644
--- a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
+++ b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
@@ -695,6 +695,35 @@
return GV;
}
+//===----------------------------------------------------------------------===//
+// LLVM Intrinsic Functions...
+//===----------------------------------------------------------------------===//
+
+// void llvm.va_start(<va_list> *) - Implement the va_start operation...
+GenericValue llvm_va_start(FunctionType *F, const vector<GenericValue> &Args) {
+ assert(Args.size() == 1);
+ GenericValue *VAListP = (GenericValue *)GVTOP(Args[0]);
+ GenericValue Val;
+ Val.UIntVal = 0; // Start at the first '...' argument...
+ TheInterpreter->StoreValueToMemory(Val, VAListP, Type::UIntTy);
+ return GenericValue();
+}
+
+// void llvm.va_end(<va_list> *) - Implement the va_end operation...
+GenericValue llvm_va_end(FunctionType *F, const vector<GenericValue> &Args) {
+ assert(Args.size() == 1);
+ return GenericValue(); // Noop!
+}
+
+// void llvm.va_copy(<va_list> *, <va_list>) - Implement the va_copy
+// operation...
+GenericValue llvm_va_copy(FunctionType *F, const vector<GenericValue> &Args) {
+ assert(Args.size() == 2);
+ GenericValue *DestVAList = (GenericValue*)GVTOP(Args[0]);
+ TheInterpreter->StoreValueToMemory(Args[1], DestVAList, Type::UIntTy);
+ return GenericValue();
+}
+
} // End extern "C"
@@ -748,4 +777,8 @@
FuncNames["lle_X_ungetc"] = lle_X_ungetc;
FuncNames["lle_X_fprintf"] = lle_X_fprintf;
FuncNames["lle_X_freopen"] = lle_X_freopen;
+
+ FuncNames["lle_X_llvm.va_start"]= llvm_va_start;
+ FuncNames["lle_X_llvm.va_end"] = llvm_va_end;
+ FuncNames["lle_X_llvm.va_copy"] = llvm_va_copy;
}