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

Basic support for system task calls.

This commit is contained in:
steve 2003-02-22 06:32:36 +00:00
parent 2935e28ffb
commit 5b7c1bc7e2
1 changed files with 22 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
vvp/stop.cc
View File

@ -17,7 +17,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
*/ */
#ifdef HAVE_CVS_IDENT #ifdef HAVE_CVS_IDENT
#ident "$Id: stop.cc,v 1.1 2003/02/21 03:40:35 steve Exp $" #ident "$Id: stop.cc,v 1.2 2003/02/22 06:32:36 steve Exp $"
#endif #endif
/* /*
@ -29,6 +29,8 @@
# include "config.h" # include "config.h"
# include "vpi_priv.h"
# include "vthread.h"
# include "schedule.h" # include "schedule.h"
# include <stdio.h> # include <stdio.h>
#ifdef HAVE_LIBREADLINE #ifdef HAVE_LIBREADLINE
@ -48,6 +50,20 @@ static void invoke_systf(const char*txt)
printf("**** System invocation not supported yet.\n"); printf("**** System invocation not supported yet.\n");
} }
static void cmd_call(unsigned argc, char*argv[])
{
if (argc <= 1)
return;
vpiHandle call_handle = vpip_build_vpi_call(argv[1], 0, 0, 0, 0);
if (call_handle == 0)
return;
vpip_execute_vpi_call(0, call_handle);
vpi_free_object(call_handle);
}
static void cmd_cont(unsigned, char*[]) static void cmd_cont(unsigned, char*[])
{ {
interact_flag = false; interact_flag = false;
@ -79,6 +95,8 @@ struct {
void (*proc)(unsigned argc, char*argv[]); void (*proc)(unsigned argc, char*argv[]);
const char*summary; const char*summary;
} cmd_table[] = { } cmd_table[] = {
{ "call", &cmd_call,
"Call a system task"},
{ "cont", &cmd_cont, { "cont", &cmd_cont,
"Resume (continue) the simulation"}, "Resume (continue) the simulation"},
{ "finish", &cmd_finish, { "finish", &cmd_finish,
@ -172,6 +190,9 @@ void stop_handler(int rc)
/* /*
* $Log: stop.cc,v $ * $Log: stop.cc,v $
* Revision 1.2 2003/02/22 06:32:36 steve
* Basic support for system task calls.
*
* Revision 1.1 2003/02/21 03:40:35 steve * Revision 1.1 2003/02/21 03:40:35 steve
* Add vpiStop and interactive mode. * Add vpiStop and interactive mode.
* *