CKTfndDev(), unuse `type' argument

src/spicelib/analysis/noisean.c

@@ -48,7 +48,7 @@ NOISEan (CKTcircuit *ckt, int restart)
     inst = NULL;
     code = CKTtypelook("Vsource");
     if (code != -1) {
-        error = CKTfndDev(ckt, &code, &inst, job->input);
+        error = CKTfndDev(ckt, NULL, &inst, job->input);
 	if (!error && !((VSRCinstance *)inst)->VSRCacGiven) {
 	    errMsg = TMALLOC(char, strlen(noacinput) + 1);
 	    strcpy(errMsg,noacinput);
@@ -58,7 +58,7 @@ NOISEan (CKTcircuit *ckt, int restart)
 
     code = CKTtypelook("Isource");
     if (code != -1 && inst==NULL) {
-        error = CKTfndDev(ckt, &code, &inst, job->input);
+        error = CKTfndDev(ckt, NULL, &inst, job->input);
         if (error) {
 	    /* XXX ??? */
             SPfrontEnd->IFerror (ERR_WARNING,

src/spicelib/analysis/tfanal.c

@@ -51,7 +51,7 @@ TFanal(CKTcircuit *ckt, int restart)
     Itype = CKTtypelook("Isource");
     Vtype = CKTtypelook("Vsource");
     if(Itype != -1) {
-        error = CKTfndDev(ckt, &Itype, &ptr, job->TFinSrc);
+        error = CKTfndDev(ckt, NULL, &ptr, job->TFinSrc);
         if(error ==0) {
             job->TFinIsI = 1;
             job->TFinIsV = 0;
@@ -61,7 +61,7 @@ TFanal(CKTcircuit *ckt, int restart)
     }
 
     if( (Vtype != -1) && (ptr==NULL) ) {
-        error = CKTfndDev(ckt, &Vtype, &ptr, job->TFinSrc);
+        error = CKTfndDev(ckt, NULL, &ptr, job->TFinSrc);
         job->TFinIsV = 1;
         job->TFinIsI = 0;
         if(error !=0) {

src/spicelib/devices/ind/mutsetup.c

@@ -43,7 +43,7 @@ MUTsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
                 return(E_INTERN);
             }
 
-            error = CKTfndDev(ckt, &ktype, (GENinstance **) &(here->MUTind1), here->MUTindName1);
+            error = CKTfndDev(ckt, NULL, (GENinstance **) &(here->MUTind1), here->MUTindName1);
             if(error) {
                 IFuid namarray[2];
                 namarray[0]=here->MUTname;
@@ -52,7 +52,7 @@ MUTsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
                     "%s: coupling to non-existant inductor %s.",
                     namarray);
             }
-            error = CKTfndDev(ckt, &ktype, (GENinstance **) &(here->MUTind2), here->MUTindName2);
+            error = CKTfndDev(ckt, NULL, (GENinstance **) &(here->MUTind2), here->MUTindName2);
             if(error) {
                 IFuid namarray[2];
                 namarray[0]=here->MUTname;