Jspice3
ckttyplk.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 /* look up the 'type' in the device description struct and return the
9  * appropriate index for the device found, or -1 for not found
10  */
11 
12 #include "spice.h"
13 #include "devdefs.h"
14 #include "cktext.h"
15 
16 
17 extern SPICEdev *DEVices[];
18 
19 int
21 
22 char *type;
23 {
24  int i;
25 
26  for (i = 0; i < DEVmaxnum; i++) {
27  if (strcmp(type,DEVices[i]->DEVpublic.name) == 0) {
28  /*found the device - return it */
29  return (i);
30  }
31  }
32  return (-1);
33 }
34 
Definition: types.c:18
int CKTtypelook(char *type)
Definition: ckttyplk.c:20
SPICEdev * DEVices[]
Definition: sconfig.c:109
int DEVmaxnum
Definition: sconfig.c:166