Implement fputc and ungetc to allow burg to run in lli

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@4584 91177308-0d34-0410-b5e6-96231b3b80d8

diff --git a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
index bde32bd269176980009282e28c9e6f6284ecfb26..c0230c32f79bc6f6a8145bfc1579234e0d4173cb 100644 (file)
--- a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
+++ b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
@@ -549,6 +549,22 @@ GenericValue lle_X_getc(FunctionType *M, const vector<GenericValue> &Args) {
   return GV;
 }
 
+// int fputc(int C, FILE *stream);
+GenericValue lle_X_fputc(FunctionType *M, const vector<GenericValue> &Args) {
+  assert(Args.size() == 2);
+  GenericValue GV;
+  GV.IntVal = fputc(Args[0].IntVal, getFILE(Args[1].PointerVal));
+  return GV;
+}
+
+// int ungetc(int C, FILE *stream);
+GenericValue lle_X_ungetc(FunctionType *M, const vector<GenericValue> &Args) {
+  assert(Args.size() == 2);
+  GenericValue GV;
+  GV.IntVal = ungetc(Args[0].IntVal, getFILE(Args[1].PointerVal));
+  return GV;
+}
+
 } // End extern "C"
 
 
@@ -596,5 +612,8 @@ void Interpreter::initializeExternalMethods() {
   FuncNames["lle_X_fwrite"]       = lle_X_fwrite;
   FuncNames["lle_X_fgets"]        = lle_X_fgets;
   FuncNames["lle_X_fflush"]       = lle_X_fflush;
+  FuncNames["lle_X_fgetc"]        = lle_X_getc;
   FuncNames["lle_X_getc"]         = lle_X_getc;
+  FuncNames["lle_X_fputc"]        = lle_X_fputc;
+  FuncNames["lle_X_ungetc"]       = lle_X_ungetc;
 }