txlfbr.c, kill TXLfindBr(), node TXLbranch is nowhere used

This surfaced when searching for missing CKTdltNNum() invocations in TXLunsetup()
This commit is contained in:
rlar 2017-01-06 11:10:12 +01:00
parent a9e4dc07c9
commit 7a6440eeef
5 changed files with 0 additions and 41 deletions

View File

@ -9,7 +9,6 @@ libtxl_la_SOURCES = \
txldefs.h \
txldest.c \
txlext.h \
txlfbr.c \
txlinit.h \
txlitf.h \
txlload.c \

View File

@ -27,7 +27,6 @@ typedef struct sTXLinstance {
TXLine *txline2; /* pointer to SWEC txline type. temporary storage */
char *in_node_name;
char *out_node_name;
int TXLbranch; /* unused */
double *TXLposPosptr;
double *TXLposNegptr;

View File

@ -3,7 +3,6 @@ extern int TXLaccept(CKTcircuit*,GENmodel*);
extern int TXLask(CKTcircuit*, GENinstance*, int, IFvalue*, IFvalue*);
extern int TXLdelete(GENmodel*,IFuid,GENinstance**);
extern void TXLdestroy(GENmodel**);
extern int TXLfindBr(CKTcircuit*, GENmodel*, IFuid);
extern int TXLload(GENmodel*,CKTcircuit*);
extern int TXLmodAsk(CKTcircuit*, GENmodel*, int, IFvalue*);

View File

@ -1,37 +0,0 @@
/**********
Copyright 1992 Regents of the University of California. All rights
reserved.
Author: 1992 Charles Hough
**********/
#include "ngspice/ngspice.h"
#include "ngspice/cktdefs.h"
#include "txldefs.h"
#include "ngspice/sperror.h"
#include "ngspice/suffix.h"
int
TXLfindBr(CKTcircuit *ckt, GENmodel *inModel, IFuid name)
{
TXLmodel *model = (TXLmodel *)inModel;
TXLinstance *here;
int error;
CKTnode *tmp;
for( ; model != NULL; model = model->TXLnextModel) {
for (here = model->TXLinstances; here != NULL;
here = here->TXLnextInstance) {
if(here->TXLname == name) {
if(here->TXLbranch == 0) {
error = CKTmkCur(ckt,&tmp,here->TXLname,"branch");
if(error) return(error);
here->TXLbranch = tmp->number;
}
return(here->TXLbranch);
}
}
}
return(0);
}

View File

@ -179,7 +179,6 @@ TXLunsetup(GENmodel *inModel, CKTcircuit *ckt)
CKTdltNNum(ckt, here->TXLibr2);
here->TXLibr2 = 0;
}
// FIXME TXLbranch
here->TXLdcGiven=0;