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

Add tf_nump from mruff.

This commit is contained in:
steve 2002-05-30 02:12:17 +00:00
parent 0838dd24a4
commit b9339d3c60
3 changed files with 56 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
libveriuser/Makefile.in
View File

@ -16,7 +16,7 @@
# 59 Temple Place - Suite 330 # 59 Temple Place - Suite 330
# Boston, MA 02111-1307, USA # Boston, MA 02111-1307, USA
# #
#ident "$Id: Makefile.in,v 1.5 2002/05/30 02:06:05 steve Exp $" #ident "$Id: Makefile.in,v 1.6 2002/05/30 02:12:17 steve Exp $"
# #
# #
SHELL = /bin/sh SHELL = /bin/sh
@ -45,7 +45,7 @@ LDFLAGS = @LDFLAGS@
STRIP = @STRIP@ STRIP = @STRIP@
A = a_close.o a_initialize.o a_product_version.o A = a_close.o a_initialize.o a_product_version.o
O = finish.o io_print.o mc_scan_plusargs.o $A O = finish.o io_print.o mc_scan_plusargs.o nump.o $A
all: libveriuser.a all: libveriuser.a

48
libveriuser/nump.c Normal file
View File

@ -0,0 +1,48 @@
/* vi:sw=6
* Copyright (c) 2002 Michael Ruff (mruff at chiaro.com)
*
* This source code is free software; you can redistribute it
* and/or modify it in source code form under the terms of the GNU
* General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/
#if !defined(WINNT)
#ident "$Id: nump.c,v 1.1 2002/05/30 02:12:17 steve Exp $"
#endif
#include <vpi_user.h>
#include <stdio.h>
/*
* tf_nump implemented using VPI interface
*/
int tf_nump(void)
{
vpiHandle sys_h, sys_i;
int cnt;
sys_h = vpi_handle(vpiSysTfCall, 0 /* NULL */);
sys_i = vpi_iterate(vpiArgument, sys_h);
/* count number of args */
for (cnt = 0; sys_i && vpi_scan(sys_i); cnt++);
return cnt;
}
/*
* $Log: nump.c,v $
* Revision 1.1 2002/05/30 02:12:17 steve
* Add tf_nump from mruff.
*
*/

7
veriuser.h
View File

@ -19,7 +19,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/ */
#if !defined(WINNT) && !defined(macintosh) #if !defined(WINNT) && !defined(macintosh)
#ident "$Id: veriuser.h,v 1.5 2002/05/30 02:10:08 steve Exp $" #ident "$Id: veriuser.h,v 1.6 2002/05/30 02:12:17 steve Exp $"
#endif #endif
/* /*
@ -57,6 +57,8 @@ extern int tf_dostop(void);
extern void tf_error(const char*, ...) extern void tf_error(const char*, ...)
__attribute__((format (printf,1,2))); __attribute__((format (printf,1,2)));
extern int tf_nump(void);
extern void tf_warning(const char*, ...) extern void tf_warning(const char*, ...)
__attribute__((format (printf,1,2))); __attribute__((format (printf,1,2)));
@ -64,6 +66,9 @@ EXTERN_C_END
/* /*
* $Log: veriuser.h,v $ * $Log: veriuser.h,v $
* Revision 1.6 2002/05/30 02:12:17 steve
* Add tf_nump from mruff.
*
* Revision 1.5 2002/05/30 02:10:08 steve * Revision 1.5 2002/05/30 02:10:08 steve
* Add tf_error and tf_warning from mruff * Add tf_error and tf_warning from mruff
* *