Add an option nginfo to enable a status report during simulation

(currently available only with MS Windows GUI version).

src/frontend/options.c

@@ -24,7 +24,7 @@ Author: 1985 Wayne A. Christopher, U. C. Berkeley CAD Group
 bool ft_acctprint = FALSE, ft_noacctprint = FALSE, ft_listprint = FALSE;
 bool ft_nodesprint = FALSE, ft_optsprint = FALSE, ft_noinitprint = FALSE;
 bool ft_norefprint = FALSE;
-bool ft_ngdebug = FALSE, ft_stricterror = FALSE;
+bool ft_ngdebug = FALSE, ft_nginfo = FALSE, ft_stricterror = FALSE;
 
 static void setdb(char *str);
 static struct variable *cp_enqvec_as_var(const char *vec_name,
@@ -305,6 +305,8 @@ cp_usrset(struct variable *var, bool isset)
         ft_noacctprint = isset;
     } else if (eq(var->va_name, "ngdebug")) {
         ft_ngdebug = isset;
+    } else if (eq(var->va_name, "nginfo")) {
+        ft_nginfo = isset;
     } else if (eq(var->va_name, "noinit")) {
         ft_noinitprint = isset;
     } else if (eq(var->va_name, "norefvalue")) {

src/include/ngspice/fteext.h

@@ -266,6 +266,7 @@ extern char *ft_setkwords[];
 extern struct card *inp_getopts(struct card *deck);
 extern struct card *inp_getoptsc(char *line, struct card *options);
 extern bool ft_ngdebug;
+extern bool ft_nginfo;
 extern bool ft_stricterror;
 
 /* parse.c */

src/winmain.c

@@ -131,6 +131,7 @@ static HFONT efont;                    /* Font for element windows */
 static HFONT tfont;                    /* Font for text window */
 static HFONT sfont;                    /* Font for string window */
 
+extern bool ft_nginfo; /* some additional info printed */
 extern bool ft_ngdebug; /* some additional debug info printed */
 extern bool ft_batchmode;
 extern FILE *flogp;     /* definition see xmain.c, stdout redirected to file */
@@ -260,7 +261,7 @@ SetAnalyse(char *Analyse,   /* in: analysis type */
         timebefore.timezone = timenow.timezone;
         /* info when previous analysis period has finished */
         if (strcmp(OldAn, Analyse)) {
-            if (ft_ngdebug && (strcmp(OldAn, "")))
+            if ((ft_nginfo || ft_ngdebug) && (strcmp(OldAn, "")))
                 win_x_printf("%s finished after %4.2f seconds.\n", OldAn, seconds());
             strncpy(OldAn, Analyse, 127);
         }