1 /**********
2 Copyright 1990 Regents of the University of California.  All rights reserved.
3 Author: 1985 Thomas L. Quarles
4 **********/
5 
6     /*
7      *CKTmkNode(ckt,node)
8      *  Tentatively allocate a new circuit equation structure
9      */
10 
11 #include "ngspice/ngspice.h"
12 #include "ngspice/ifsim.h"
13 #include "ngspice/iferrmsg.h"
14 #include "ngspice/smpdefs.h"
15 #include "ngspice/cktdefs.h"
16 
17 
18 /* ARGSUSED */
19 int
CKTmkNode(CKTcircuit * ckt,CKTnode ** node)20 CKTmkNode(CKTcircuit *ckt, CKTnode **node)
21 {
22     CKTnode *mynode;
23 
24     NG_IGNORE(ckt);
25 
26     mynode = TMALLOC(CKTnode, 1);
27     if(mynode == NULL) return(E_NOMEM);
28     mynode->next = NULL;
29     mynode->name = NULL;
30 
31     if(node) *node = mynode;
32     return(OK);
33 }
34