fflush(stdout) and comments

src/xspice/evt/evtaccept.c

@@ -76,6 +76,8 @@ void EVTaccept(
     Evt_State_Data_t    *state_data;
     Evt_Msg_Data_t      *msg_data;
 
+    /* fprintf(stdout,"From EVTaccept: \n"); holmes */
+    fflush(stdout);
 
     /* Exit if no event instances */
     if(ckt->evt->counts.num_insts == 0)

src/xspice/evt/evtinit.c

@@ -89,6 +89,8 @@ int EVTinit(
 
     /*    static char *err_no_hybrids = "ERROR - no hybrids found in input deck";*/
 
+    /* printf("From EVTinit\n"); holmes */
+    fflush(stdout);
 
     /* Exit immediately if there are no event-driven instances */
     /* but don't complain */
@@ -136,6 +138,8 @@ int EVTinit(
     /* allocated immediately prior to each simulation job.         */
 
     /* Return */
+    /* printf("From EVTinit end\n"); holmes */
+    fflush(stdout);
     return(OK);
 }
 
@@ -162,6 +166,8 @@ static int EVTcount_hybrids(
 
     Evt_Inst_Info_t     *inst;
 
+    /* printf("From EVTcount_hybrids\n"); holmes */
+    fflush(stdout);
 
     /* Count number of hybrids and hybrid outputs in the inst list */
     /* created during parsing.  Note: other counts */
@@ -188,6 +194,8 @@ static int EVTcount_hybrids(
     }
     ckt->evt->counts.num_hybrids = num_hybrids;
     ckt->evt->counts.num_hybrid_outputs = num_hybrid_outputs;
+    /* printf("From EVTcount_hybrids end\n"); holmes */
+    fflush(stdout);
 
     return(OK);
 }
@@ -212,6 +220,8 @@ static int EVTcheck_nodes(
     static char *err_prefix  = "ERROR - node ";
     static char *err_collide = " cannot be both analog and digital";
 
+    /* printf("From EVTcount_nodes\n"); holmes */
+    fflush(stdout);
 
     /* Report error if any analog node name matches any event node name */
     event_node = ckt->evt->info.node_list;
@@ -237,6 +247,9 @@ static int EVTcheck_nodes(
     }
     printf("-------------------\n\n");    /* holmes : would like these listed a tran init with their types and values */
 
+    /* printf("From EVTcount_nodes end\n"); holmes */
+    fflush(stdout);
+
 
     /* Return */
     return(OK);
@@ -280,6 +293,9 @@ static int EVTinit_info(
 
     int num_hybrids;
 
+    /* printf("From EVTinit_info\n"); holmes */
+    fflush(stdout);
+
 
     /* Allocate and initialize table of inst pointers */
     num_insts = ckt->evt->counts.num_insts;
@@ -331,6 +347,9 @@ static int EVTinit_info(
     }
     ckt->evt->info.hybrid_index = hybrid_index;
 
+    /* printf("From EVTinit_info end\n"); holmes */
+    fflush(stdout);
+
 
     /* Return */
     return(OK);
@@ -358,6 +377,9 @@ static int EVTinit_queue(
     Evt_Output_Queue_t  *output_queue;
 
 
+    /* printf("From EVTinit_queue\n"); holmes */
+    fflush(stdout);
+
     /* Allocate elements in the inst queue */
 
     num_insts = ckt->evt->counts.num_insts;
@@ -402,6 +424,9 @@ static int EVTinit_queue(
     CKALLOC(output_queue->changed_index, num_outputs, int)
     CKALLOC(output_queue->changed, num_outputs, Mif_Boolean_t)
 
+    /* printf("From EVTinit_queue end\n"); holmes */
+    fflush(stdout);
+
 
     /* Return */
     return(OK);
@@ -427,6 +452,9 @@ static int EVTinit_limits(
     /* maximum possible number of events that can trickle through any    */
     /* circuit that does not contain loops.                              */
 
+    /* printf("From EVTinit_limits\n"); holmes */
+    fflush(stdout);
+
     ckt->evt->limits.max_event_passes = ckt->evt->counts.num_outputs + 1;
 
 
@@ -435,6 +463,9 @@ static int EVTinit_limits(
 
     ckt->evt->limits.max_op_alternations = ckt->evt->counts.num_hybrid_outputs + 1;
 
+    /* printf("From EVTinit_limits end\n"); holmes */
+    fflush(stdout);
+
 
     /* Return */
     return(OK);

src/xspice/evt/evtiter.c

@@ -125,6 +125,9 @@ int EVTiter(
 
     char                *err_msg;
 
+    /*  fprintf(stdout,"From EVTiter 0\n"); holmes */
+    fflush(stdout);
+
 
     /* Get temporary pointers for fast access */
     evt = ckt->evt;