From 5b7c1bc7e26d164c102178f769ca8d1de8fed5d5 Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Sat, 22 Feb 2003 06:32:36 +0000
Subject: [PATCH]  Basic support for system task calls.

---
 vvp/stop.cc | 23 ++++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

diff --git a/vvp/stop.cc b/vvp/stop.cc
index 5d798546f..6d8db6d0f 100644
--- a/vvp/stop.cc
+++ b/vvp/stop.cc
@@ -17,7 +17,7 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #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
 
 /*
@@ -29,6 +29,8 @@
 # include  "config.h"
 
 
+# include  "vpi_priv.h"
+# include  "vthread.h"
 # include  "schedule.h"
 # include  <stdio.h>
 #ifdef HAVE_LIBREADLINE
@@ -48,6 +50,20 @@ static void invoke_systf(const char*txt)
       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*[])
 {
       interact_flag = false;
@@ -79,6 +95,8 @@ struct {
       void (*proc)(unsigned argc, char*argv[]);
       const char*summary;
 } cmd_table[] = {
+      { "call",   &cmd_call,
+        "Call a system task"},
       { "cont",   &cmd_cont,
         "Resume (continue) the simulation"},
       { "finish", &cmd_finish,
@@ -172,6 +190,9 @@ void stop_handler(int rc)
 
 /*
  * $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
  *  Add vpiStop and interactive mode.
  *