cktdelt.c

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

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

#include "ngspice.h"
#include "tskdefs.h"
#include "jobdefs.h"
#include "ifsim.h"
#include "iferrmsg.h"


/* ARGSUSED */
int
CKTdelTask(void *ckt, void *task)
{
    JOB *job;
    JOB *old=NULL;
    for(job = ((TSKtask*)task)->jobs; job; job=job->JOBnextJob){
        if(old) FREE(old);
        old=job;
    }
    if(old)FREE(old);
    FREE(task);
    return(OK);
}