cktmknod.c

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

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

    /*
     *CKTmkNode(ckt,node)
     *  Tentatively allocate a new circuit equation structure
     */

#include "ngspice.h"
#include "ifsim.h"
#include "iferrmsg.h"
#include "smpdefs.h"
#include "cktdefs.h"


/* ARGSUSED */
int
CKTmkNode(CKTcircuit *ckt, CKTnode **node)
{
    CKTnode *mynode;

    mynode = (CKTnode *)MALLOC(sizeof(CKTnode));
    if(mynode == (CKTnode *)NULL) return(E_NOMEM);
    mynode->next = (CKTnode *)NULL;
    mynode->name = (IFuid) 0;

    if(node) *node = mynode;
    return(OK);
}