luke
/
iverilog
mirror of https://github.com/steveicarus/iverilog.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Implement basic fflush.

This commit is contained in:
steve 2003-11-07 19:40:05 +00:00
parent 1dfbe0f7f2
commit 4f40eb0a00
1 changed files with 19 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
vpi/sys_fileio.c
View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CVS_IDENT
#ident "$Id: sys_fileio.c,v 1.1 2003/10/30 03:43:20 steve Exp $"
#ident "$Id: sys_fileio.c,v 1.2 2003/11/07 19:40:05 steve Exp $"
#endif
# include "vpi_user.h"
@ -140,6 +140,12 @@ static int sys_fclose_calltf(char *name)
return 0;
}
static int sys_fflush_calltf(char *name)
{
fflush(0);
return 0;
}
static int sys_fputc_calltf(char *name)
{
@ -340,6 +346,15 @@ void sys_fileio_register()
tf_data.user_data = "$fclose";
vpi_register_systf(&tf_data);
//============================== fflush
tf_data.type = vpiSysTask;
tf_data.tfname = "$fflush";
tf_data.calltf = sys_fflush_calltf;
tf_data.compiletf = 0;
tf_data.sizetf = 0;
tf_data.user_data = "$fflush";
vpi_register_systf(&tf_data);
//============================== fputc
tf_data.type = vpiSysTask;
tf_data.tfname = "$fputc";
@ -371,6 +386,9 @@ void sys_fileio_register()
/*
* $Log: sys_fileio.c,v $
* Revision 1.2 2003/11/07 19:40:05 steve
* Implement basic fflush.
*
* Revision 1.1 2003/10/30 03:43:20 steve
* Rearrange fileio functions, and add ungetc.
*