* inpeval.c: Bugfix for subcircuits contributed by Michael
Widlok.
This commit is contained in:
parent
f237c66aee
commit
526313390b
|
|
@ -1,3 +1,8 @@
|
||||||
|
2000-10-12 Arno W. Peters <A.W.Peters@ieee.org>
|
||||||
|
|
||||||
|
* inpeval.c: Bugfix for subcircuits contributed by Michael
|
||||||
|
Widlok.
|
||||||
|
|
||||||
2000-09-09 Arno W. Peters <A.W.Peters@ieee.org>
|
2000-09-09 Arno W. Peters <A.W.Peters@ieee.org>
|
||||||
|
|
||||||
* inp2dot.c: Removed unused static functions dot_ic and
|
* inp2dot.c: Removed unused static functions dot_ic and
|
||||||
|
|
|
||||||
|
|
@ -24,9 +24,11 @@ double INPevaluate(char **line, int *error, int gobble)
|
||||||
/* setup */
|
/* setup */
|
||||||
tmpline = *line;
|
tmpline = *line;
|
||||||
if (gobble) {
|
if (gobble) {
|
||||||
*error = INPgetUTok(line, &token, 1);
|
/* MW. INPgetUTok should be called with gobble=0 or it make
|
||||||
if (*error)
|
* errors in v(1,2) exp */
|
||||||
return ((double) 0.0);
|
*error = INPgetUTok(line, &token, 0);
|
||||||
|
if (*error)
|
||||||
|
return ((double) 0.0);
|
||||||
} else {
|
} else {
|
||||||
token = *line;
|
token = *line;
|
||||||
*error = 0;
|
*error = 0;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue