inpcom.c: disable `m' for E, H

This commit is contained in:
h_vogt 2013-05-15 21:09:09 +02:00 committed by rlar
parent 0aee9a07c4
commit a146e6abfb
1 changed files with 3 additions and 2 deletions

View File

@ -2658,8 +2658,9 @@ inp_fix_subckt_multiplier(struct line *subckt_card,
for (card = subckt_card->li_next;
card != NULL && !ciprefix(".ends", card->li_line);
card = card->li_next) {
/* no 'm' for B, V or comment line */
if ((*(card->li_line) == '*') || (*(card->li_line) == 'b') || (*(card->li_line) == 'v'))
/* no 'm' for B, V, E, H or comment line */
if ((*(card->li_line) == '*') || (*(card->li_line) == 'b') || (*(card->li_line) == 'v') ||
(*(card->li_line) == 'e') || (*(card->li_line) == 'h'))
continue;
/* no 'm' for model cards */
if (ciprefix(".model", card->li_line))