Add an option nginfo to enable a status report during simulation
(currently available only with MS Windows GUI version).
This commit is contained in:
parent
c66f9faaab
commit
fe3222a118
|
|
@ -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")) {
|
||||
|
|
|
|||
|
|
@ -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 */
|
||||
|
|
|
|||
|
|
@ -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);
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue