Jspice3
cktasknq.c
Go to the documentation of this file.
1 /***************************************************************************
2 JSPICE3 adaptation of Spice3f2 - Copyright (c) Stephen R. Whiteley 1992
3 Copyright 1990 Regents of the University of California. All rights reserved.
4 Authors: 1985 Thomas L. Quarles
5  1993 Stephen R. Whiteley
6 ****************************************************************************/
7 
8  /*
9  * CKTaskNodQst
10  *
11  * ask about a parameter on a node.
12  */
13 
14 #include "spice.h"
15 #include <stdio.h>
16 #include "cktdefs.h"
17 #include "iferrmsg.h"
18 #include "util.h"
19 #include "cktext.h"
20 
21 
22 /* ARGSUSED */
23 int
24 CKTaskNodQst(ckt,node,parm,value,selector)
25 
26 GENERIC *ckt;
27 GENERIC *node;
28 int parm;
29 IFvalue *value;
30 IFvalue *selector;
31 {
32  if (!node) return (E_BADPARM);
33 
34  switch (parm) {
35 
36  case PARM_NS:
37  value->rValue = ((CKTnode *)node)->nodeset;
38  break;
39 
40  case PARM_IC:
41  value->rValue = ((CKTnode *)node)->ic;
42  break;
43 
44  case PARM_NODETYPE:
45  value->iValue = ((CKTnode *)node)->type;
46  break;
47 
48  default:
49  return (E_BADPARM);
50  }
51  return (OK);
52 }
#define E_BADPARM
Definition: iferrmsg.h:26
int iValue
Definition: ifsim.h:232
double rValue
Definition: ifsim.h:233
#define OK
Definition: iferrmsg.h:17
#define PARM_NODETYPE
Definition: cktdefs.h:51
#define PARM_IC
Definition: cktdefs.h:50
#define PARM_NS
Definition: cktdefs.h:49
int CKTaskNodQst(GENERIC *ckt, GENERIC *node, int parm, IFvalue *value, IFvalue *selector)
Definition: cktasknq.c:24
char GENERIC
Definition: ifsim.h:27