From: Chris Lattner Date: Wed, 6 Nov 2002 23:05:03 +0000 (+0000) Subject: Implement fprintf X-Git-Url: http://demsky.eecs.uci.edu/git/?a=commitdiff_plain;h=cf9b4f0f41242d8a7d4079ab9e6b163f54b621f1;p=oota-llvm.git Implement fprintf git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@4585 91177308-0d34-0410-b5e6-96231b3b80d8 --- diff --git a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp index c0230c32f79..b8f7786f6a8 100644 --- a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp +++ b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp @@ -565,6 +565,21 @@ GenericValue lle_X_ungetc(FunctionType *M, const vector &Args) { return GV; } +// int fprintf(FILE *,sbyte *, ...) - a very rough implementation to make output +// useful. +GenericValue lle_X_fprintf(FunctionType *M, const vector &Args) { + assert(Args.size() > 2); + char Buffer[10000]; + vector NewArgs; + GenericValue GV; GV.PointerVal = (PointerTy)Buffer; + NewArgs.push_back(GV); + NewArgs.insert(NewArgs.end(), Args.begin()+1, Args.end()); + GV = lle_X_sprintf(M, NewArgs); + + fputs(Buffer, getFILE(Args[0].PointerVal)); + return GV; +} + } // End extern "C" @@ -616,4 +631,5 @@ void Interpreter::initializeExternalMethods() { FuncNames["lle_X_getc"] = lle_X_getc; FuncNames["lle_X_fputc"] = lle_X_fputc; FuncNames["lle_X_ungetc"] = lle_X_ungetc; + FuncNames["lle_X_fprintf"] = lle_X_fprintf; }