From 3b9474ecd72660a354f3b559eb1238ed07de48b6 Mon Sep 17 00:00:00 2001
From: Brian Gaeke <gaeke@uiuc.edu>
Date: Wed, 16 Jun 2004 02:56:40 +0000
Subject: Add int ferror(FILE *)

llvm-svn: 14194
---
 llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp')

diff --git a/llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
index 456b09f664e..2299874f532 100644
--- a/llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
+++ b/llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
@@ -636,6 +636,14 @@ GenericValue lle_X_ungetc(FunctionType *M, const vector<GenericValue> &Args) {
   return GV;
 }
 
+// int ferror (FILE *stream);
+GenericValue lle_X_ferror(FunctionType *M, const vector<GenericValue> &Args) {
+  assert(Args.size() == 1);
+  GenericValue GV;
+  GV.IntVal = ferror (getFILE(GVTOP(Args[0])));
+  return GV;
+}
+
 // int fprintf(FILE *,sbyte *, ...) - a very rough implementation to make output
 // useful.
 GenericValue lle_X_fprintf(FunctionType *M, const vector<GenericValue> &Args) {
-- 
cgit v1.2.3