6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2024-07-19 03:29:22 +00:00
Code Issues Projects Releases Wiki Activity

Implement freopen for burg

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@4606 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner 2002-11-07 19:33:50 +00:00
parent ab2dea5687
commit a4479cd946
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
View File

@ -531,11 +531,20 @@ GenericValue lle_X_fgets(FunctionType *M, const vector<GenericValue> &Args) {
return GV; return GV;
} }
// FILE *freopen(const char *path, const char *mode, FILE *stream);
GenericValue lle_X_freopen(FunctionType *M, const vector<GenericValue> &Args) {
assert(Args.size() == 3);
GenericValue GV;
GV.PointerVal = (PointerTy)freopen((char*)Args[0].PointerVal,
(char*)Args[1].PointerVal,
getFILE(Args[2].PointerVal));
return GV;
}
// int fflush(FILE *stream); // int fflush(FILE *stream);
GenericValue lle_X_fflush(FunctionType *M, const vector<GenericValue> &Args) { GenericValue lle_X_fflush(FunctionType *M, const vector<GenericValue> &Args) {
assert(Args.size() == 1); assert(Args.size() == 1);
GenericValue GV; GenericValue GV;
GV.IntVal = fflush(getFILE(Args[0].PointerVal)); GV.IntVal = fflush(getFILE(Args[0].PointerVal));
return GV; return GV;
} }
@ -544,7 +553,6 @@ GenericValue lle_X_fflush(FunctionType *M, const vector<GenericValue> &Args) {
GenericValue lle_X_getc(FunctionType *M, const vector<GenericValue> &Args) { GenericValue lle_X_getc(FunctionType *M, const vector<GenericValue> &Args) {
assert(Args.size() == 1); assert(Args.size() == 1);
GenericValue GV; GenericValue GV;
GV.IntVal = getc(getFILE(Args[0].PointerVal)); GV.IntVal = getc(getFILE(Args[0].PointerVal));
return GV; return GV;
} }
@ -632,4 +640,5 @@ void Interpreter::initializeExternalMethods() {
FuncNames["lle_X_fputc"] = lle_X_fputc; FuncNames["lle_X_fputc"] = lle_X_fputc;
FuncNames["lle_X_ungetc"] = lle_X_ungetc; FuncNames["lle_X_ungetc"] = lle_X_ungetc;
FuncNames["lle_X_fprintf"] = lle_X_fprintf; FuncNames["lle_X_fprintf"] = lle_X_fprintf;
FuncNames["lle_X_freopen"] = lle_X_freopen;
} }