inptyplk.c

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

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

/*  look up the 'type' in the device description struct and return the
 *  appropriate strchr for the device found, or -1 for not found 
 */

#include "ngspice.h"
#include "inpdefs.h"
#include "cpdefs.h"
#include "fteext.h"
#include "ifsim.h"
#include "inp.h"

int INPtypelook(char *type)
{

    int i;

#ifdef TRACE
    /* SDB debug statement */
        printf("In INPtypelook, examining model type = %s . . .\n", type); 
#endif

    for (i = 0; i < ft_sim->numDevices; i++) {

#ifdef TRACE
      /* SDB debug statement */
      printf("In INPtypelook, checking model type = %s against existing model = %s, . . .\n", type, (*(ft_sim->devices)[i]).name ); 
#endif

	if (strcmp(type, (*(ft_sim->devices)[i]).name) == 0) {
	    /*found the device - return it */

#ifdef TRACE
	/* SDB debug statement */
	printf("In INPtypelook, found the device -- returning it!!!\n"); 
#endif

	    return i;
	}
    }

#ifdef TRACE
    /* SDB debug statement */
    printf("In INPtypelook, device not found!\n"); 
#endif
	  
    return -1;
}