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

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@14194 91177308-0d34-0410-b5e6-96231b3b80d8
---
 lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp b/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
index 456b09f664e..2299874f532 100644
--- a/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
+++ b/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) {