inpkmods.c

来自「ngspice又一个电子CAD仿真软件代码.功能更全」· C语言 代码 · 共 31 行

/**********
Copyright 1990 Regents of the University of California.  All rights reserved.
Author: 1985 Thomas L. Quarles
**********/
/*
 */

#include "ngspice.h"
#include <stdio.h>
#include "inpdefs.h"
#include "inp.h"


extern INPmodel *modtab;

void INPkillMods(void)
{
    INPmodel *modtmp;
    INPmodel *prev = NULL;

    for (modtmp = modtab; modtmp != (INPmodel *) NULL; modtmp =
	 modtmp->INPnextModel) {
	if (prev)
	    FREE(prev);
	prev = modtmp;
    }
    if (prev)
	FREE(prev);
    modtab = (INPmodel *) NULL;
}