diff --git a/src/frontend/inp.c b/src/frontend/inp.c index 7d01822a7..4d99bc132 100644 --- a/src/frontend/inp.c +++ b/src/frontend/inp.c @@ -296,6 +296,14 @@ line_free_x(struct line *deck, bool recurse) } +/* free mc_deck */ +void +mc_free(void) +{ + line_free_x(mc_deck, TRUE); +} + + /* The routine to source a spice input deck. We read the deck in, take * out the front-end commands, and create a CKT structure. Also we * filter out the following cards: .save, .width, .four, .print, and diff --git a/src/include/ngspice/fteext.h b/src/include/ngspice/fteext.h index 18a2db7b5..4b38f03d1 100644 --- a/src/include/ngspice/fteext.h +++ b/src/include/ngspice/fteext.h @@ -214,6 +214,7 @@ extern void inp_list(FILE *file, struct line *deck, struct line *extras, int typ extern struct line *inp_readall(FILE *fp, char *dir_name, bool comfile, bool intfile); extern FILE *inp_pathopen(char *name, char *mode); extern char *search_identifier(char *str, const char *identifier, char *str_begin); +extern void mc_free(void); extern char** circarray;