ltradest.c

来自「spice中支持多层次元件模型仿真的可单独运行的插件源码」· C语言 代码 · 共 39 行

/**********
Copyright 1990 Regents of the University of California.  All rights reserved.
Author: 1990 Jaijeet S. Roychowdhury
**********/

#include "spice.h"
#include <stdio.h>
#include "util.h"
#include "ltradefs.h"
#include "suffix.h"

void
LTRAdestroy(inModel)
  GENmodel **inModel;
{
  LTRAmodel **model = (LTRAmodel **) inModel;
  LTRAinstance *here;
  LTRAinstance *prev = NULL;
  LTRAmodel *mod = *model;
  LTRAmodel *oldmod = NULL;

  for (; mod; mod = mod->LTRAnextModel) {
    if (oldmod)
      FREE(oldmod);
    oldmod = mod;
    prev = (LTRAinstance *) NULL;
    for (here = mod->LTRAinstances; here; here = here->LTRAnextInstance) {
      if (prev)
	FREE(prev);
      prev = here;
    }
    if (prev)
      FREE(prev);
  }
  if (oldmod)
    FREE(oldmod);
  *model = NULL;
}