pour `IGNORE()' all over the source
This commit is contained in:
parent
9150ae9afb
commit
80286e0032
|
|
@ -1,3 +1,7 @@
|
|||
2010-11-16 Robert Larice
|
||||
* src/**/* :
|
||||
pour `IGNORE()' all over the source
|
||||
|
||||
2010-11-16 Robert Larice
|
||||
* src/include/ngspice.h :
|
||||
introduce macro `IGNORE(x)', which shall used to mark unused parameters
|
||||
|
|
|
|||
|
|
@ -123,6 +123,7 @@ ONEcopyBCinfo(ONEdevice *pDevice, ONEelem *pElem, BDRYcard *bdry, int index)
|
|||
int eIndex;
|
||||
double length;
|
||||
|
||||
IGNORE(pDevice);
|
||||
|
||||
/* First add fixed charge. */
|
||||
pNode = pElem->pNodes[index];
|
||||
|
|
|
|||
|
|
@ -765,6 +765,8 @@ contactAdmittance(TWOdevice *pDevice, TWOcontact *pContact, BOOLEAN delVContact,
|
|||
SPcomplex prod1, prod2, sum;
|
||||
double temp;
|
||||
|
||||
IGNORE(pDevice);
|
||||
|
||||
CMPLX_ASSIGN_VALUE(yTotal, 0.0, 0.0);
|
||||
|
||||
numContactNodes = pContact->numNodes;
|
||||
|
|
@ -964,6 +966,8 @@ oxideAdmittance(TWOdevice *pDevice, TWOcontact *pContact, BOOLEAN delVContact,
|
|||
SPcomplex psiAc;
|
||||
SPcomplex prod1, prod2;
|
||||
|
||||
IGNORE(pDevice);
|
||||
|
||||
CMPLX_ASSIGN_VALUE(yTotal, 0.0, 0.0);
|
||||
|
||||
numContactNodes = pContact->numNodes;
|
||||
|
|
|
|||
|
|
@ -274,6 +274,8 @@ double
|
|||
double gTotal = 0.0;
|
||||
int nInc, pInc;
|
||||
|
||||
IGNORE(pDevice);
|
||||
|
||||
/* for one carrier the rest of this code relies on appropriate
|
||||
current derivative term to be zero */
|
||||
if ( !OneCarrier ) {
|
||||
|
|
@ -433,6 +435,8 @@ double
|
|||
double dPsiDv;
|
||||
double gTotal = 0.0;
|
||||
|
||||
IGNORE(pDevice);
|
||||
|
||||
if ( !tranAnalysis ) {
|
||||
return( gTotal );
|
||||
}
|
||||
|
|
|
|||
|
|
@ -25,6 +25,8 @@ nodeCurrents(TWOelem *pElem, TWOnode *pNode, double *mun, double *mup,
|
|||
double epsL = 0.0, epsR = 0.0, epsT = 0.0, epsB = 0.0;
|
||||
double coeff1, coeff2;
|
||||
|
||||
IGNORE(pElem);
|
||||
|
||||
/* Find all four neighboring elements */
|
||||
pElemTL = pNode->pTLElem;
|
||||
pElemTR = pNode->pTRElem;
|
||||
|
|
|
|||
|
|
@ -21,6 +21,8 @@ nodeFields(TWOelem *pElem, TWOnode *pNode, double *ex, double *ey)
|
|||
double dxL = 0.0, dxR = 0.0, dyT = 0.0, dyB = 0.0;
|
||||
double ef1, ef2, coeff1, coeff2;
|
||||
|
||||
IGNORE(pElem);
|
||||
|
||||
/* Find all four neighboring elements */
|
||||
pElemTL = pNode->pTLElem;
|
||||
pElemTR = pNode->pTRElem;
|
||||
|
|
|
|||
|
|
@ -47,6 +47,10 @@ MOBsurfElec(TWOmaterial *info, TWOelem *pElem, double ex, double ey,
|
|||
double dElDWx; /* Lateral Derivative x Component */
|
||||
double dElDWy; /* Lateral Derivative y Component */
|
||||
|
||||
IGNORE(wx);
|
||||
IGNORE(wy);
|
||||
IGNORE(totalConc);
|
||||
|
||||
if ( pElem->surface ) { /* replace one field component with surface field */
|
||||
if ( pElem->direction == 0 ) {
|
||||
ey = es;
|
||||
|
|
@ -247,6 +251,10 @@ MOBsurfHole(TWOmaterial *info, TWOelem *pElem, double ex, double ey,
|
|||
double dElDWx; /* Lateral Derivative x Component */
|
||||
double dElDWy; /* Lateral Derivative y Component */
|
||||
|
||||
IGNORE(wx);
|
||||
IGNORE(wy);
|
||||
IGNORE(totalConc);
|
||||
|
||||
if ( pElem->surface ) { /* replace one field component with surface field */
|
||||
if ( pElem->direction == 0 ) {
|
||||
ey = es;
|
||||
|
|
|
|||
|
|
@ -96,6 +96,8 @@ void arg_set(wordlist *wl, struct comm *command)
|
|||
|
||||
void arg_display(wordlist *wl, struct comm *command)
|
||||
{
|
||||
IGNORE(wl);
|
||||
IGNORE(command);
|
||||
|
||||
/* just return; display does the right thing */
|
||||
|
||||
|
|
|
|||
|
|
@ -156,6 +156,8 @@ com_jobs(wordlist *wl)
|
|||
{
|
||||
struct proc *p;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
for (p = running; p; p = p->pr_next)
|
||||
fprintf(cp_out, "%d\t%.70s\n", p->pr_pid, p->pr_name);
|
||||
return;
|
||||
|
|
@ -414,6 +416,7 @@ void
|
|||
com_aspice(
|
||||
wordlist *wl)
|
||||
{
|
||||
IGNORE(wl);
|
||||
fprintf(cp_err, "Asynchronous spice jobs are not available.\n");
|
||||
return;
|
||||
}
|
||||
|
|
@ -422,6 +425,7 @@ void
|
|||
com_jobs(
|
||||
wordlist *wl)
|
||||
{
|
||||
IGNORE(wl);
|
||||
fprintf(cp_err, "Asynchronous spice jobs are not available.\n");
|
||||
return;
|
||||
}
|
||||
|
|
@ -436,6 +440,7 @@ void
|
|||
com_rspice(
|
||||
wordlist *wl)
|
||||
{
|
||||
IGNORE(wl);
|
||||
fprintf(cp_err, "Remote spice jobs are not available.\n");
|
||||
return;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -205,6 +205,8 @@ com_sttus(wordlist *wl)
|
|||
{
|
||||
struct dbcomm *d, *dc;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
for (d = dbs; d; d = d->db_next) {
|
||||
if (d->db_type == DB_TRACENODE) {
|
||||
if (isatty(fileno(cp_out)))
|
||||
|
|
|
|||
|
|
@ -13,6 +13,8 @@
|
|||
void
|
||||
com_dump(wordlist *wl)
|
||||
{
|
||||
IGNORE(wl);
|
||||
|
||||
if (!ft_curckt || !ft_curckt->ci_ckt) {
|
||||
fprintf(cp_err, "Error: no circuit loaded.\n");
|
||||
return;
|
||||
|
|
|
|||
|
|
@ -951,6 +951,9 @@ static void measure_ERR3(void) {
|
|||
}
|
||||
|
||||
void com_dotmeasure(wordlist *wl) {
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
/* simulation info */
|
||||
// printf("*%s\n", plot_cur->pl_title);
|
||||
// printf("\t %s, %s\n", plot_cur->pl_name, plot_cur->pl_date); // missing temp
|
||||
|
|
|
|||
|
|
@ -17,6 +17,8 @@ com_rehash(wordlist *wl)
|
|||
{
|
||||
char *s;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
if (!cp_dounixcom) {
|
||||
fprintf(cp_err, "Error: unixcom not set.\n");
|
||||
return;
|
||||
|
|
|
|||
|
|
@ -14,6 +14,8 @@
|
|||
void
|
||||
com_state(wordlist *wl)
|
||||
{
|
||||
IGNORE(wl);
|
||||
|
||||
if (!ft_curckt) {
|
||||
fprintf(cp_err, "Error: no circuit loaded.\n");
|
||||
return;
|
||||
|
|
|
|||
|
|
@ -90,6 +90,8 @@ void com_sysinfo(wordlist *wl)
|
|||
int errorcode;
|
||||
TesSystemInfo* info;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
info = TMALLOC(TesSystemInfo, 1);
|
||||
|
||||
errorcode = tesCreateSystemInfo(info);
|
||||
|
|
|
|||
|
|
@ -403,6 +403,9 @@ all_show_old(wordlist *wl, int mode)
|
|||
int
|
||||
printstr_n(dgen *dg, IFparm *p, int i)
|
||||
{
|
||||
IGNORE(p);
|
||||
IGNORE(i);
|
||||
|
||||
if (dg->instance)
|
||||
fprintf(cp_out," %*.*s", DEV_WIDTH, DEV_WIDTH, dg->instance->GENname);
|
||||
else
|
||||
|
|
@ -413,6 +416,9 @@ printstr_n(dgen *dg, IFparm *p, int i)
|
|||
int
|
||||
printstr_m(dgen *dg, IFparm *p, int i)
|
||||
{
|
||||
IGNORE(p);
|
||||
IGNORE(i);
|
||||
|
||||
if (dg->model)
|
||||
fprintf(cp_out," %*.*s", DEV_WIDTH, DEV_WIDTH, dg->model->GENmodName);
|
||||
else
|
||||
|
|
@ -567,12 +573,20 @@ listparam(wordlist *p, dgen *dg)
|
|||
|
||||
int bogus1(dgen *dg, IFparm *p, int i)
|
||||
{
|
||||
IGNORE(dg);
|
||||
IGNORE(p);
|
||||
IGNORE(i);
|
||||
|
||||
fprintf(cp_out," %*s", DEV_WIDTH, "---------");
|
||||
return 0;
|
||||
}
|
||||
|
||||
int bogus2(dgen *dg, IFparm *p, int i)
|
||||
{
|
||||
IGNORE(dg);
|
||||
IGNORE(p);
|
||||
IGNORE(i);
|
||||
|
||||
fprintf(cp_out," %*s", DEV_WIDTH, "?????????");
|
||||
return 0;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -39,6 +39,7 @@ controlled_exit(int status)
|
|||
void
|
||||
fperror(char *mess, int code)
|
||||
{
|
||||
IGNORE(code);
|
||||
fprintf(cp_err, "%s: floating point exception.\n", mess);
|
||||
return;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -262,6 +262,9 @@ CKTfour(int ndata, /* number of entries in the Time and
|
|||
int i;
|
||||
int j;
|
||||
double tmp;
|
||||
|
||||
IGNORE(Time);
|
||||
|
||||
/* clear output/computation arrays */
|
||||
|
||||
for(i=0;i<numFreq;i++) {
|
||||
|
|
|
|||
|
|
@ -30,6 +30,8 @@ dgen_init(GENcircuit *ckt, wordlist *wl, int nomix, int flag, int model)
|
|||
dgen *dg, *dg_save;
|
||||
wordlist **prevp;
|
||||
|
||||
IGNORE(nomix);
|
||||
|
||||
dg = NEW(dgen);
|
||||
dg->ckt = ckt;
|
||||
dg->instance = NULL;
|
||||
|
|
|
|||
|
|
@ -128,6 +128,8 @@ hlp_thandle(topic **parent)
|
|||
void
|
||||
hlp_tkillwin(topic *top)
|
||||
{
|
||||
IGNORE(top);
|
||||
|
||||
if (curtop)
|
||||
curtop = curtop->parent;
|
||||
if (curtop && !quitflag)
|
||||
|
|
|
|||
|
|
@ -34,6 +34,9 @@ static Display *display;
|
|||
static void handle_wm_messages(Widget w, XtPointer client_data, XEvent *event, Boolean *cont) {
|
||||
topic *top = (topic *) client_data;
|
||||
|
||||
IGNORE(cont);
|
||||
IGNORE(w);
|
||||
|
||||
if (event->type == ClientMessage
|
||||
&& event->xclient.message_type == atom_wm_protocols
|
||||
&& (Atom) event->xclient.data.l[0] == atom_wm_delete_window)
|
||||
|
|
@ -228,6 +231,9 @@ newtopic(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
toplink *result = ((handle *) client_data)->result;
|
||||
topic *newtop;
|
||||
|
||||
IGNORE(call_data);
|
||||
IGNORE(w);
|
||||
|
||||
if (!(newtop = hlp_read(result->place))) {
|
||||
fprintf(stderr, "Internal error: bad link\n");
|
||||
}
|
||||
|
|
@ -249,6 +255,9 @@ delete(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
|
||||
topic *top = (topic *) client_data;
|
||||
|
||||
IGNORE(call_data);
|
||||
IGNORE(w);
|
||||
|
||||
hlp_killfamily(top);
|
||||
hlp_fixchildren(top);
|
||||
}
|
||||
|
|
@ -259,6 +268,9 @@ quit(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
|
||||
topic *top = (topic *) client_data, *parent = top->parent;
|
||||
|
||||
IGNORE(call_data);
|
||||
IGNORE(w);
|
||||
|
||||
while (parent && parent->parent) parent = parent->parent;
|
||||
hlp_killfamily(parent ? parent : top);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -28,7 +28,12 @@ int hlp_buttonstyle = BS_LEFT;
|
|||
/* ARGSUSED */ void hlp_xkillwin(topic *top) { }
|
||||
#endif
|
||||
|
||||
/* ARGSUSED */ void hlp_xwait(topic *top, bool on) { }
|
||||
/* ARGSUSED */ void hlp_xwait(topic *top, bool on)
|
||||
{
|
||||
IGNORE(on);
|
||||
IGNORE(top);
|
||||
}
|
||||
|
||||
void hlp_xclosedisplay(void) {}
|
||||
toplink * hlp_xhandle(topic **pp) { *pp = NULL; return (NULL); }
|
||||
|
||||
|
|
|
|||
|
|
@ -3144,6 +3144,8 @@ inp_sort_params( struct line *start_card, struct line *end_card, struct line *ca
|
|||
struct line **ptr_array;
|
||||
struct line **ptr_array_ordered;
|
||||
|
||||
IGNORE(end_card);
|
||||
|
||||
if ( start_card == NULL ) return;
|
||||
|
||||
/* determine the number of lines with .param */
|
||||
|
|
|
|||
|
|
@ -116,6 +116,8 @@ com_bug(wordlist *wl)
|
|||
{
|
||||
char buf[BSIZE_SP];
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
if (!Bug_Addr || !*Bug_Addr) {
|
||||
fprintf(cp_err, "Error: No address to send bug reports to.\n");
|
||||
return;
|
||||
|
|
|
|||
|
|
@ -31,6 +31,8 @@ com_removecirc(wordlist *wl)
|
|||
char* namecircuit;
|
||||
char buf[80];
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
/* Allocation of a temp wordlist */
|
||||
wlist = (struct wordlist *)malloc(sizeof(struct wordlist));
|
||||
|
||||
|
|
|
|||
|
|
@ -925,6 +925,7 @@ nupa_fetchinstance (void)
|
|||
|
||||
void dump_symbols( tdico *dico_p )
|
||||
{
|
||||
IGNORE(dico_p);
|
||||
|
||||
fprintf (stderr, "Symbol table\n");
|
||||
nupa_list_params ( stderr ) ;
|
||||
|
|
|
|||
|
|
@ -433,6 +433,8 @@ define (tdico * dico,
|
|||
SPICE_DSTRING vartemp ; /* vairable temp */
|
||||
NGHASHPTR htable_p ; /* hash table */
|
||||
|
||||
IGNORE(pval);
|
||||
|
||||
spice_dstring_init(&vartemp) ;
|
||||
|
||||
if( dico->stack_depth > 0 ){
|
||||
|
|
|
|||
|
|
@ -271,5 +271,12 @@ nutinp_source(char *file)
|
|||
void
|
||||
nutinp_dodeck(struct line *deck, char *tt, wordlist *end, bool reuse, struct line *options, char *filename)
|
||||
{
|
||||
IGNORE(filename);
|
||||
IGNORE(options);
|
||||
IGNORE(reuse);
|
||||
IGNORE(end);
|
||||
IGNORE(tt);
|
||||
IGNORE(deck);
|
||||
|
||||
/* This was "ifdef notdef"-ed out, so I tossed it */
|
||||
}
|
||||
|
|
|
|||
|
|
@ -14,6 +14,14 @@
|
|||
|
||||
|
||||
struct variable * nutif_getparam(CKTcircuit *ckt, char **name, char *param, int ind, int do_model)
|
||||
{ return ((struct variable *) NULL); }
|
||||
{
|
||||
IGNORE(do_model);
|
||||
IGNORE(ind);
|
||||
IGNORE(param);
|
||||
IGNORE(name);
|
||||
IGNORE(ckt);
|
||||
|
||||
return ((struct variable *) NULL);
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -624,12 +624,21 @@ OUTpData(void *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
|
|||
int
|
||||
OUTwReference(void *plotPtr, IFvalue *valuePtr, void **refPtr)
|
||||
{
|
||||
IGNORE(refPtr);
|
||||
IGNORE(valuePtr);
|
||||
IGNORE(plotPtr);
|
||||
|
||||
return (OK);
|
||||
}
|
||||
/* ARGSUSED */ /* until some code gets written */
|
||||
int
|
||||
OUTwData(void *plotPtr, int dataIndex, IFvalue *valuePtr, void *refPtr)
|
||||
{
|
||||
IGNORE(refPtr);
|
||||
IGNORE(valuePtr);
|
||||
IGNORE(dataIndex);
|
||||
IGNORE(plotPtr);
|
||||
|
||||
return (OK);
|
||||
}
|
||||
|
||||
|
|
@ -637,6 +646,7 @@ OUTwData(void *plotPtr, int dataIndex, IFvalue *valuePtr, void *refPtr)
|
|||
int
|
||||
OUTwEnd(void *plotPtr)
|
||||
{
|
||||
IGNORE(plotPtr);
|
||||
return (OK);
|
||||
}
|
||||
|
||||
|
|
@ -669,6 +679,11 @@ OUTendPlot(void *plotPtr)
|
|||
int
|
||||
OUTbeginDomain(void *plotPtr, IFuid refName, int refType, IFvalue *outerRefValue)
|
||||
{
|
||||
IGNORE(outerRefValue);
|
||||
IGNORE(refType);
|
||||
IGNORE(refName);
|
||||
IGNORE(plotPtr);
|
||||
|
||||
return (OK);
|
||||
}
|
||||
|
||||
|
|
@ -676,6 +691,7 @@ OUTbeginDomain(void *plotPtr, IFuid refName, int refType, IFvalue *outerRefValue
|
|||
int
|
||||
OUTendDomain(void *plotPtr)
|
||||
{
|
||||
IGNORE(plotPtr);
|
||||
return (OK);
|
||||
}
|
||||
|
||||
|
|
@ -690,6 +706,8 @@ OUTattributes(void *plotPtr, IFuid varName, int param, IFvalue *value)
|
|||
GRIDTYPE type;
|
||||
int i;
|
||||
|
||||
IGNORE(value);
|
||||
|
||||
if (param == OUT_SCALE_LIN)
|
||||
type = GRID_LIN;
|
||||
else if (param == OUT_SCALE_LOG)
|
||||
|
|
|
|||
|
|
@ -163,6 +163,9 @@ exp:
|
|||
static void
|
||||
PPerror (YYLTYPE *locp, char **line, struct pnode **retval, char const *s)
|
||||
{
|
||||
U(line); U(retval);
|
||||
IGNORE(locp);
|
||||
IGNORE(line);
|
||||
IGNORE(retval);
|
||||
|
||||
fprintf (stderr, "%s: %s\n", __func__, s);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -526,6 +526,7 @@ char *
|
|||
db_print_pnode_tree(struct pnode *p, char *print)
|
||||
{
|
||||
#if 1
|
||||
IGNORE(print);
|
||||
db_print_pnode(stdout, p);
|
||||
return NULL;
|
||||
#else
|
||||
|
|
|
|||
|
|
@ -335,6 +335,9 @@ printem(wordlist *wl)
|
|||
void
|
||||
cp_ccom(wordlist *wlist, char *buf, bool esc)
|
||||
{
|
||||
IGNORE(wlist);
|
||||
IGNORE(buf);
|
||||
IGNORE(esc);
|
||||
return;
|
||||
}
|
||||
#endif
|
||||
|
|
@ -569,6 +572,8 @@ cp_kwswitch(int class, char *tree)
|
|||
void
|
||||
cp_ccrestart(bool kwords)
|
||||
{
|
||||
IGNORE(kwords);
|
||||
|
||||
/* Ack. */
|
||||
return;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -239,7 +239,10 @@ cp_hstat(void)
|
|||
|
||||
void
|
||||
cp_rehash(char *pathlist, bool docc)
|
||||
{ }
|
||||
{
|
||||
IGNORE(docc);
|
||||
IGNORE(pathlist);
|
||||
}
|
||||
|
||||
bool
|
||||
cp_unixcom(wordlist *wl)
|
||||
|
|
|
|||
|
|
@ -45,6 +45,9 @@ ft_agraf(double *xlims, double *ylims, struct dvec *xscale, struct plot *plot, s
|
|||
int i, j, k;
|
||||
int shift;
|
||||
|
||||
IGNORE(xdel);
|
||||
IGNORE(ydel);
|
||||
IGNORE(ylog);
|
||||
|
||||
/* ANSI C does not specify how many digits are in an exponent for %c
|
||||
* We assumed it was 2. If it's more, shift starting position over.
|
||||
|
|
|
|||
|
|
@ -236,6 +236,14 @@ ft_writesimple(double *xlims, double *ylims, char *filename, char *title, char *
|
|||
|
||||
char filename_data[128];
|
||||
|
||||
IGNORE(xlims);
|
||||
IGNORE(ylims);
|
||||
IGNORE(title);
|
||||
IGNORE(xlabel);
|
||||
IGNORE(ylabel);
|
||||
IGNORE(gridtype);
|
||||
IGNORE(plottype);
|
||||
|
||||
sprintf(filename_data, "%s.data", filename);
|
||||
|
||||
/* Sanity checking. */
|
||||
|
|
|
|||
|
|
@ -83,6 +83,7 @@ gr_init(double *xlims, double *ylims, /* The size of the screen. */
|
|||
wordlist *wl;
|
||||
char *comb_title;
|
||||
|
||||
IGNORE(nplots);
|
||||
|
||||
if (!(graph = NewGraph())) {
|
||||
return(FALSE);
|
||||
|
|
@ -442,6 +443,7 @@ drawlegend(GRAPH *graph, int plotno, struct dvec *dv)
|
|||
void
|
||||
gr_end(struct dvec *dv)
|
||||
{
|
||||
IGNORE(dv);
|
||||
DevUpdate();
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -483,6 +483,9 @@ drawlingrid(GRAPH *graph, char *units, int spacing, int nsp, double dst, double
|
|||
double m, step;
|
||||
char buf[LABEL_CHARS];
|
||||
|
||||
IGNORE(onedec);
|
||||
IGNORE(mult);
|
||||
|
||||
/* i counts how many pixels we have drawn, and j counts which unit
|
||||
* we are at.
|
||||
*/
|
||||
|
|
@ -1315,6 +1318,8 @@ arcset(GRAPH *graph, double rad, double prevrad, double irad, double iprevrad, d
|
|||
double iangle = atan2((double) prevrad, (double) irad);
|
||||
int x, xlab, ylab;
|
||||
|
||||
IGNORE(nlab);
|
||||
|
||||
/* Let's be lazy and just draw everything -- we won't get called too
|
||||
* much and the circles get clipped anyway...
|
||||
*/
|
||||
|
|
|
|||
|
|
@ -203,6 +203,7 @@ Plt5_SetLinestyle(int linestyleid)
|
|||
int
|
||||
Plt5_SetColor(int colorid)
|
||||
{
|
||||
IGNORE(colorid);
|
||||
|
||||
/* do nothing */
|
||||
return 0;
|
||||
|
|
|
|||
|
|
@ -270,6 +270,8 @@ handlekeypressed(Widget w, caddr_t clientdata, caddr_t calldata)
|
|||
char text[4];
|
||||
int nbytes;
|
||||
|
||||
IGNORE(w);
|
||||
|
||||
nbytes = XLookupString(keyev, text, 4, NULL, NULL);
|
||||
if (!nbytes) return;
|
||||
/* write it */
|
||||
|
|
@ -294,6 +296,8 @@ handlebuttonev(Widget w, caddr_t clientdata, caddr_t calldata)
|
|||
|
||||
XButtonEvent *buttonev = (XButtonEvent *) calldata;
|
||||
|
||||
IGNORE(w);
|
||||
|
||||
switch (buttonev->button) {
|
||||
case Button1:
|
||||
slopelocation((GRAPH *) clientdata, buttonev->x, buttonev->y);
|
||||
|
|
@ -309,6 +313,9 @@ handlebuttonev(Widget w, caddr_t clientdata, caddr_t calldata)
|
|||
static void handle_wm_messages(Widget w, XtPointer client_data, XEvent *event, Boolean *cont) {
|
||||
GRAPH *graph = (GRAPH *) client_data;
|
||||
|
||||
IGNORE(cont);
|
||||
IGNORE(w);
|
||||
|
||||
if (event->type == ClientMessage
|
||||
&& event->xclient.message_type == atom_wm_protocols
|
||||
&& (Atom) event->xclient.data.l[0] == atom_wm_delete_window) {
|
||||
|
|
@ -551,6 +558,11 @@ X11_Text(char *text, int x, int y)
|
|||
int
|
||||
X11_DefineColor(int colorid, double red, double green, double blue)
|
||||
{
|
||||
IGNORE(blue);
|
||||
IGNORE(green);
|
||||
IGNORE(red);
|
||||
IGNORE(colorid);
|
||||
|
||||
internalerror("X11_DefineColor not implemented.");
|
||||
return 0;
|
||||
}
|
||||
|
|
@ -559,6 +571,9 @@ X11_DefineColor(int colorid, double red, double green, double blue)
|
|||
int
|
||||
X11_DefineLinestyle(int linestyleid, int mask)
|
||||
{
|
||||
IGNORE(mask);
|
||||
IGNORE(linestyleid);
|
||||
|
||||
internalerror("X11_DefineLinestyle not implemented.");
|
||||
return 0;
|
||||
}
|
||||
|
|
@ -830,6 +845,9 @@ zoomin(GRAPH *graph)
|
|||
void
|
||||
hardcopy(Widget w, caddr_t client_data, caddr_t call_data)
|
||||
{
|
||||
IGNORE(call_data);
|
||||
IGNORE(w);
|
||||
|
||||
/* com_hardcopy() -> gr_resize() -> setcolor() dirung postscript
|
||||
printing will act on currentgraph with a DEVDEP inherited from PSdevdep.
|
||||
But currentgraph had not changed its devdep, which was derived from
|
||||
|
|
@ -856,6 +874,9 @@ killwin(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
|
||||
GRAPH *graph = (GRAPH *) client_data;
|
||||
|
||||
IGNORE(call_data);
|
||||
IGNORE(w);
|
||||
|
||||
/* Iplots are done asynchronously */
|
||||
DEVDEP(graph).isopen = 0;
|
||||
/* MW. Not sure but DestroyGraph might free() to much - try Xt...() first */
|
||||
|
|
@ -889,6 +910,8 @@ redraw(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
XRectangle rects[30];
|
||||
int n = 1;
|
||||
|
||||
IGNORE(w);
|
||||
|
||||
DEVDEP(graph).isopen = 1;
|
||||
|
||||
|
||||
|
|
@ -926,6 +949,8 @@ resize(Widget w, caddr_t client_data, caddr_t call_data)
|
|||
GRAPH *graph = (GRAPH *) client_data;
|
||||
XEvent ev;
|
||||
|
||||
IGNORE(call_data);
|
||||
|
||||
/* pull out all other exposure events
|
||||
Also, get rid of other StructureNotify events on this window. */
|
||||
|
||||
|
|
|
|||
|
|
@ -383,6 +383,10 @@ ft_dorun(char *file)
|
|||
bool
|
||||
ft_getOutReq(FILE **fpp, struct plot **plotp, bool *binp, char *name, char *title)
|
||||
{
|
||||
IGNORE(title);
|
||||
IGNORE(name);
|
||||
IGNORE(plotp);
|
||||
|
||||
if (rawfileFp) {
|
||||
*fpp = rawfileFp;
|
||||
*binp = rawfileBinary;
|
||||
|
|
|
|||
|
|
@ -52,6 +52,8 @@ com_resume(wordlist *wl)
|
|||
bool ascii = AsciiRawFile;
|
||||
/*end saj*/
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
/*saj fix segment*/
|
||||
if (!ft_curckt) {
|
||||
fprintf(cp_err, "Error: there aren't any circuits loaded.\n");
|
||||
|
|
@ -172,6 +174,8 @@ com_rset(wordlist *wl)
|
|||
{
|
||||
struct variable *v, *next;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
if (ft_curckt == NULL) {
|
||||
fprintf(cp_err, "Error: there is no circuit loaded.\n");
|
||||
return;
|
||||
|
|
|
|||
|
|
@ -87,6 +87,8 @@ ft_sigintr(void)
|
|||
RETSIGTYPE
|
||||
sigfloat(int sig, int code)
|
||||
{
|
||||
IGNORE(sig);
|
||||
|
||||
gr_clean();
|
||||
fperror("Error", code);
|
||||
rewind(cp_out);
|
||||
|
|
|
|||
|
|
@ -536,6 +536,8 @@ fputs("\t(Note that you must use an = to separate option name and value.)\n",
|
|||
void
|
||||
if_dump(CKTcircuit *ckt, FILE *file)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
/*void *cc = (void *) ckt;*/
|
||||
|
||||
fprintf(file,"diagnostic output dump unavailable.");
|
||||
|
|
@ -618,6 +620,8 @@ spif_getparam_special(CKTcircuit *ckt,char **name,char *param,int ind,int do_mod
|
|||
GENmodel *mod=(GENmodel *)NULL;
|
||||
IFdevice *device;
|
||||
|
||||
IGNORE(do_model);
|
||||
|
||||
/* fprintf(cp_err, "Calling if_getparam(%s, %s)\n", *name, param); */
|
||||
|
||||
if (!param || (param && eq(param, "all")))
|
||||
|
|
@ -1007,6 +1011,8 @@ parmlookup(IFdevice *dev, GENinstance **inptr, char *param, int do_model, int in
|
|||
{
|
||||
int i;
|
||||
|
||||
IGNORE(inptr);
|
||||
|
||||
/* First try the device questions... */
|
||||
if (!do_model && dev->numInstanceParms) {
|
||||
for (i = 0; i < *(dev->numInstanceParms); i++) {
|
||||
|
|
@ -1052,6 +1058,8 @@ doask(CKTcircuit *ckt, int typecode, GENinstance *dev, GENmodel *mod, IFparm *op
|
|||
static IFvalue pv;
|
||||
int err;
|
||||
|
||||
IGNORE(typecode);
|
||||
|
||||
pv.iValue = ind; /* Sometimes this will be junk and ignored... */
|
||||
|
||||
/* fprintf(cp_err, "Calling doask(%d, %x, %x, %x)\n",
|
||||
|
|
@ -1085,6 +1093,8 @@ doset(CKTcircuit *ckt, int typecode, GENinstance *dev, GENmodel *mod, IFparm *op
|
|||
double *dptr;
|
||||
int i;
|
||||
|
||||
IGNORE(typecode);
|
||||
|
||||
/* Count items */
|
||||
if (opt->dataType & IF_VECTOR) {
|
||||
n = nval.v.numValue = val->v_length;
|
||||
|
|
|
|||
|
|
@ -18,6 +18,8 @@ com_where(wordlist *wl)
|
|||
{
|
||||
char *msg;
|
||||
|
||||
IGNORE(wl);
|
||||
|
||||
/*CDHW typing where with no current circuit caused crashes CDHW*/
|
||||
if (!ft_curckt) {
|
||||
fprintf(cp_err, "There is no current circuit\n");
|
||||
|
|
|
|||
70
src/main.c
70
src/main.c
|
|
@ -237,6 +237,11 @@ IFfrontEnd nutmeginfo;
|
|||
int
|
||||
if_run(CKTcircuit *t, char *w, wordlist *s, INPtables *b)
|
||||
{
|
||||
IGNORE(b);
|
||||
IGNORE(s);
|
||||
IGNORE(w);
|
||||
IGNORE(t);
|
||||
|
||||
return (0);
|
||||
}
|
||||
|
||||
|
|
@ -244,18 +249,29 @@ if_run(CKTcircuit *t, char *w, wordlist *s, INPtables *b)
|
|||
int
|
||||
if_sens_run(CKTcircuit *t, wordlist *args, INPtables *tab)
|
||||
{
|
||||
IGNORE(tab);
|
||||
IGNORE(args);
|
||||
IGNORE(t);
|
||||
|
||||
return (0);
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
void
|
||||
if_dump(CKTcircuit *ckt, FILE *fp)
|
||||
{}
|
||||
{
|
||||
IGNORE(fp);
|
||||
IGNORE(ckt);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
CKTcircuit *
|
||||
if_inpdeck(struct line *deck, INPtables **tab)
|
||||
{
|
||||
IGNORE(tab);
|
||||
IGNORE(deck);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
|
|
@ -263,37 +279,69 @@ if_inpdeck(struct line *deck, INPtables **tab)
|
|||
int
|
||||
if_option(CKTcircuit *ckt, char *name, enum cp_types type, void *value)
|
||||
{
|
||||
IGNORE(value);
|
||||
IGNORE(type);
|
||||
IGNORE(name);
|
||||
IGNORE(ckt);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
void if_cktfree(CKTcircuit *ckt, INPtables *tab)
|
||||
{}
|
||||
{
|
||||
IGNORE(tab);
|
||||
IGNORE(ckt);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
void if_setndnames(char *line)
|
||||
{}
|
||||
{
|
||||
IGNORE(line);
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
char *
|
||||
if_errstring(int code)
|
||||
{
|
||||
IGNORE(code);
|
||||
return ("spice error");
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
void
|
||||
if_setparam_model(CKTcircuit *ckt, char **name, char *val)
|
||||
{}
|
||||
{
|
||||
IGNORE(val);
|
||||
IGNORE(name);
|
||||
IGNORE(ckt);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
void
|
||||
if_setparam(CKTcircuit *ckt, char **name, char *param, struct dvec *val, int do_model)
|
||||
{}
|
||||
{
|
||||
IGNORE(do_model);
|
||||
IGNORE(val);
|
||||
IGNORE(param);
|
||||
IGNORE(name);
|
||||
IGNORE(ckt);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
/* -------------------------------------------------------------------------- */
|
||||
bool
|
||||
if_tranparams(struct circ *ckt, double *start, double *stop, double *step)
|
||||
{
|
||||
IGNORE(step);
|
||||
IGNORE(stop);
|
||||
IGNORE(start);
|
||||
IGNORE(ckt);
|
||||
|
||||
return (FALSE);
|
||||
}
|
||||
|
||||
|
|
@ -301,6 +349,9 @@ if_tranparams(struct circ *ckt, double *start, double *stop, double *step)
|
|||
struct variable *
|
||||
if_getstat(CKTcircuit *ckt, char *name)
|
||||
{
|
||||
IGNORE(name);
|
||||
IGNORE(ckt);
|
||||
|
||||
return (NULL);
|
||||
}
|
||||
|
||||
|
|
@ -322,21 +373,30 @@ Ipc_Status_t ipc_send_errchk(void ) {
|
|||
}
|
||||
Ipc_Status_t ipc_get_line(char *str , int *len , Ipc_Wait_t wait ){
|
||||
Ipc_Status_t x = IPC_STATUS_OK;
|
||||
IGNORE(str);
|
||||
IGNORE(len);
|
||||
IGNORE(wait);
|
||||
|
||||
return(x);
|
||||
}
|
||||
struct line *ENHtranslate_poly(struct line *deck){
|
||||
IGNORE(deck);
|
||||
return(NULL);
|
||||
}
|
||||
int load_opus(char *name){
|
||||
IGNORE(name);
|
||||
return(1);
|
||||
}
|
||||
char *MIFgettok(char **s){
|
||||
IGNORE(s);
|
||||
return(NULL);
|
||||
}
|
||||
void EVTprint(wordlist *wl){
|
||||
IGNORE(wl);
|
||||
return;
|
||||
}
|
||||
struct dvec *EVTfindvec(char *node){
|
||||
IGNORE(node);
|
||||
return NULL;
|
||||
}
|
||||
#endif /* XSPICE */
|
||||
|
|
|
|||
|
|
@ -249,6 +249,8 @@ cx_rnd(void *data, short int type, int length, int *newlength, short int *newtyp
|
|||
void *
|
||||
cx_sunif(void *data, short int type, int length, int *newlength, short int *newtype)
|
||||
{
|
||||
IGNORE(data);
|
||||
|
||||
*newlength = length;
|
||||
checkseed();
|
||||
if (type == VF_COMPLEX) {
|
||||
|
|
@ -278,6 +280,8 @@ cx_sunif(void *data, short int type, int length, int *newlength, short int *newt
|
|||
void *
|
||||
cx_sgauss(void *data, short int type, int length, int *newlength, short int *newtype)
|
||||
{
|
||||
IGNORE(data);
|
||||
|
||||
*newlength = length;
|
||||
checkseed();
|
||||
if (type == VF_COMPLEX) {
|
||||
|
|
@ -390,6 +394,9 @@ cx_length(void *data, short int type, int length, int *newlength, short int *new
|
|||
{
|
||||
double *d;
|
||||
|
||||
IGNORE(data);
|
||||
IGNORE(type);
|
||||
|
||||
*newlength = 1;
|
||||
*newtype = VF_REAL;
|
||||
d = alloc_d(1);
|
||||
|
|
@ -410,6 +417,8 @@ cx_vector(void *data, short int type, int length, int *newlength, short int *new
|
|||
int i, len;
|
||||
double *d;
|
||||
|
||||
IGNORE(length);
|
||||
|
||||
if (type == VF_REAL)
|
||||
len = (int)FTEcabs(*dd);
|
||||
else
|
||||
|
|
@ -435,6 +444,8 @@ cx_unitvec(void *data, short int type, int length, int *newlength, short int *ne
|
|||
int i, len;
|
||||
double *d;
|
||||
|
||||
IGNORE(length);
|
||||
|
||||
if (type == VF_REAL)
|
||||
len = (int)FTEcabs(*dd);
|
||||
else
|
||||
|
|
|
|||
|
|
@ -148,6 +148,8 @@ SMPclear(SMPmatrix *Matrix)
|
|||
spClear( Matrix );
|
||||
}
|
||||
|
||||
#define IGNORE(x) (void)x
|
||||
|
||||
/*
|
||||
* SMPcLUfac()
|
||||
*/
|
||||
|
|
@ -155,6 +157,8 @@ SMPclear(SMPmatrix *Matrix)
|
|||
int
|
||||
SMPcLUfac(SMPmatrix *Matrix, double PivTol)
|
||||
{
|
||||
IGNORE(PivTol);
|
||||
|
||||
spSetComplex( Matrix );
|
||||
return spFactor( Matrix );
|
||||
}
|
||||
|
|
@ -166,6 +170,7 @@ SMPcLUfac(SMPmatrix *Matrix, double PivTol)
|
|||
int
|
||||
SMPluFac(SMPmatrix *Matrix, double PivTol, double Gmin)
|
||||
{
|
||||
IGNORE(PivTol);
|
||||
spSetReal( Matrix );
|
||||
LoadGmin( Matrix, Gmin );
|
||||
return spFactor( Matrix );
|
||||
|
|
@ -203,6 +208,9 @@ void
|
|||
SMPcaSolve(SMPmatrix *Matrix, double RHS[], double iRHS[],
|
||||
double Spare[], double iSpare[])
|
||||
{
|
||||
IGNORE(iSpare);
|
||||
IGNORE(Spare);
|
||||
|
||||
spSolveTransposed( Matrix, RHS, RHS, iRHS, iRHS );
|
||||
}
|
||||
|
||||
|
|
@ -213,6 +221,9 @@ void
|
|||
SMPcSolve(SMPmatrix *Matrix, double RHS[], double iRHS[],
|
||||
double Spare[], double iSpare[])
|
||||
{
|
||||
IGNORE(iSpare);
|
||||
IGNORE(Spare);
|
||||
|
||||
spSolve( Matrix, RHS, RHS, iRHS, iRHS );
|
||||
}
|
||||
|
||||
|
|
@ -222,6 +233,8 @@ SMPcSolve(SMPmatrix *Matrix, double RHS[], double iRHS[],
|
|||
void
|
||||
SMPsolve(SMPmatrix *Matrix, double RHS[], double Spare[])
|
||||
{
|
||||
IGNORE(Spare);
|
||||
|
||||
spSolve( Matrix, RHS, RHS, (spREAL*)NULL, (spREAL*)NULL );
|
||||
}
|
||||
|
||||
|
|
@ -271,6 +284,8 @@ SMPpreOrder(SMPmatrix *Matrix)
|
|||
void
|
||||
SMPprint(SMPmatrix *Matrix, FILE *File)
|
||||
{
|
||||
IGNORE(File);
|
||||
|
||||
spPrint( Matrix, 0, 1, 1 );
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -68,6 +68,7 @@ IFsimulator SIMinfo = {
|
|||
void
|
||||
NDEVacct(CKTcircuit *ckt, FILE *file)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
fprintf(file, "Ouch, you have called NDEV from ngnutmeg\n");
|
||||
}
|
||||
#endif
|
||||
|
|
|
|||
|
|
@ -437,18 +437,23 @@ void cp_pushcontrol(void) { }
|
|||
void cp_popcontrol(void) { }
|
||||
void out_init(void) { }
|
||||
void cp_doquit(void) { exit(0); }
|
||||
void cp_usrvars(struct variable **v1, struct variable **v2) { return; }
|
||||
int cp_evloop(char *s) { return (0); }
|
||||
void cp_ccon(bool o) { }
|
||||
char *if_errstring(int c) { return ("error"); }
|
||||
void cp_usrvars(struct variable **v1, struct variable **v2) { IGNORE(v2); IGNORE(v1); return; }
|
||||
int cp_evloop(char *s) { IGNORE(s); return (0); }
|
||||
void cp_ccon(bool o) { IGNORE(o); }
|
||||
char*if_errstring(int c) { IGNORE(c); return ("error"); }
|
||||
#ifndef out_printf
|
||||
void out_printf(char *fmt, ...) { }
|
||||
void out_printf(char *fmt, ...) { IGNORE(fmt); }
|
||||
#endif
|
||||
void out_send(char *string) {}
|
||||
struct variable * cp_enqvar(char *word) { return (NULL); }
|
||||
struct dvec *vec_get(const char *word) { return (NULL); }
|
||||
void cp_ccom(wordlist *w, char *b, bool e) { return; }
|
||||
int cp_usrset(struct variable *v, bool i) { return(US_OK); }
|
||||
void out_send(char *string) { IGNORE(string); }
|
||||
struct variable * cp_enqvar(char *word) { IGNORE(word); return (NULL); }
|
||||
struct dvec *vec_get(const char *word) { IGNORE(word); return (NULL); }
|
||||
void cp_ccom(wordlist *w, char *b, bool e) {
|
||||
IGNORE(e);
|
||||
IGNORE(b);
|
||||
IGNORE(w); return; }
|
||||
int cp_usrset(struct variable *v, bool i) {
|
||||
IGNORE(i);
|
||||
IGNORE(v); return(US_OK); }
|
||||
|
||||
int disptype;
|
||||
|
||||
|
|
|
|||
|
|
@ -16,6 +16,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
ACaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case AC_START:
|
||||
|
|
|
|||
|
|
@ -15,6 +15,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
ACsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case AC_START:
|
||||
|
|
|
|||
|
|
@ -24,6 +24,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
CKTacct(CKTcircuit *ckt, JOB *anal, int which, IFvalue *val)
|
||||
{
|
||||
IGNORE(anal);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case OPT_EQNS:
|
||||
|
|
|
|||
|
|
@ -20,6 +20,8 @@ CKTaskAnalQ(CKTcircuit *ckt, JOB *analPtr, int parm, IFvalue *value, IFvalue *se
|
|||
{
|
||||
int type = analPtr->JOBtype;
|
||||
|
||||
IGNORE(selector);
|
||||
|
||||
if((analInfo[type]->askQuest) == NULL) return(E_BADPARM);
|
||||
return( (*(analInfo[type]->askQuest))(ckt,analPtr,parm,value));
|
||||
}
|
||||
|
|
|
|||
|
|
@ -21,6 +21,9 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
CKTaskNodQst(CKTcircuit *ckt, CKTnode *node, int parm, IFvalue *value, IFvalue *selector)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(selector);
|
||||
|
||||
if(!node) return(E_BADPARM);
|
||||
switch(parm) {
|
||||
|
||||
|
|
|
|||
|
|
@ -17,6 +17,9 @@ CKTdelTask(CKTcircuit *ckt, TSKtask *task)
|
|||
{
|
||||
JOB *job;
|
||||
JOB *old=NULL;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
for(job = task->jobs; job; job=job->JOBnextJob){
|
||||
if(old) FREE(old);
|
||||
old=job;
|
||||
|
|
|
|||
|
|
@ -20,5 +20,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
CKTdltInst(CKTcircuit *ckt, void *instance)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(instance);
|
||||
|
||||
return(E_UNSUPP);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -25,6 +25,10 @@ CKTfndAnal(CKTcircuit *ckt, int *analIndex, JOB **anal, IFuid name, TSKtask *inT
|
|||
TSKtask *task = /* fixme, drop that */ inTask;
|
||||
JOB *here;
|
||||
|
||||
IGNORE(ckt);
|
||||
IGNORE(analIndex);
|
||||
IGNORE(taskName);
|
||||
|
||||
for (here = task->jobs; here; here = here->JOBnextJob) {
|
||||
if(strcmp(here->JOBname,name)==0) {
|
||||
if(anal) *anal = here;
|
||||
|
|
|
|||
|
|
@ -20,5 +20,9 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
CKTfndTask(CKTcircuit *ckt, TSKtask **taskPtr, IFuid taskName)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(taskPtr);
|
||||
IGNORE(taskName);
|
||||
|
||||
return(E_UNSUPP);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -19,6 +19,9 @@ int
|
|||
CKTmodAsk(CKTcircuit *ckt, GENmodel *modfast, int which, IFvalue *value, IFvalue *selector)
|
||||
{
|
||||
int type = modfast->GENmodType;
|
||||
|
||||
IGNORE(selector);
|
||||
|
||||
if((*DEVices[type]).DEVmodAsk) {
|
||||
return( (*((*DEVices[type]).DEVmodAsk)) (ckt,
|
||||
modfast, which, value) );
|
||||
|
|
|
|||
|
|
@ -21,6 +21,8 @@ CKTmkNode(CKTcircuit *ckt, CKTnode **node)
|
|||
{
|
||||
CKTnode *mynode;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
mynode = TMALLOC(CKTnode, 1);
|
||||
if(mynode == (CKTnode *)NULL) return(E_NOMEM);
|
||||
mynode->next = (CKTnode *)NULL;
|
||||
|
|
|
|||
|
|
@ -20,6 +20,9 @@ CKTmodParam(CKTcircuit *ckt, GENmodel *modfast, int param, IFvalue *val, IFvalue
|
|||
{
|
||||
int type = modfast->GENmodType;
|
||||
|
||||
IGNORE(ckt);
|
||||
IGNORE(selector);
|
||||
|
||||
if (((*DEVices[type]).DEVmodParam)) {
|
||||
return(((*((*DEVices[type]).DEVmodParam)) (param,val,
|
||||
modfast)));
|
||||
|
|
|
|||
|
|
@ -18,6 +18,8 @@ extern SPICEanalysis *analInfo[];
|
|||
int
|
||||
CKTnewAnal(CKTcircuit *ckt, int type, IFuid name, JOB **analPtr, TSKtask *taskPtr)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
if(type==0) {
|
||||
/* special case for analysis type 0 == option card */
|
||||
*analPtr = &(taskPtr->taskOptions); /* pointer to the task itself */
|
||||
|
|
|
|||
|
|
@ -24,6 +24,8 @@ CKTnewTask(CKTcircuit *ckt, TSKtask **taskPtr, IFuid taskName, TSKtask **defPtr)
|
|||
{
|
||||
TSKtask *tsk, *def=NULL;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
*taskPtr = TMALLOC(TSKtask, 1);
|
||||
if(*taskPtr==NULL) return(E_NOMEM);
|
||||
tsk = *taskPtr;
|
||||
|
|
|
|||
|
|
@ -393,6 +393,8 @@ gillespie_src (CKTcircuit * ckt, long int firstmode,
|
|||
double *OldRhsOld, *OldCKTstate0;
|
||||
CKTnode *n;
|
||||
|
||||
IGNORE(iterlim);
|
||||
|
||||
ckt->CKTmode = firstmode;
|
||||
(*(SPfrontEnd->IFerror)) (ERR_INFO,
|
||||
"Starting source stepping", (IFuid *) NULL);
|
||||
|
|
@ -599,6 +601,8 @@ spice3_src (CKTcircuit * ckt, long int firstmode,
|
|||
|
||||
int converged, i;
|
||||
|
||||
IGNORE(iterlim);
|
||||
|
||||
ckt->CKTmode = firstmode;
|
||||
(*(SPfrontEnd->IFerror)) (ERR_INFO,
|
||||
"Starting source stepping", (IFuid *) NULL);
|
||||
|
|
|
|||
|
|
@ -20,6 +20,9 @@ CKTparam(CKTcircuit *ckt, GENinstance *fast, int param, IFvalue *val, IFvalue *s
|
|||
{
|
||||
int type;
|
||||
GENinstance *myfast = /*fixme*/ fast;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
type = myfast->GENmodPtr->GENmodType;
|
||||
if(((*DEVices[type]).DEVparam)) {
|
||||
return(((*((*DEVices[type]).DEVparam)) (param,val,myfast,selector)));
|
||||
|
|
|
|||
|
|
@ -31,6 +31,8 @@ CKTpModName(char *parm, IFvalue *val, CKTcircuit *ckt, int type, IFuid name, GEN
|
|||
int error; /* int to store evaluate error return codes in */
|
||||
int i;
|
||||
|
||||
IGNORE(name);
|
||||
|
||||
for(i=0;i<(*(*DEVices[type]).DEVpublic.numModelParms);i++) {
|
||||
if(strcmp(parm,((*DEVices[type]).DEVpublic.modelParms[i].keyword))==0){
|
||||
error = CKTmodParam(ckt, *modfast,
|
||||
|
|
|
|||
|
|
@ -33,6 +33,8 @@ CKTpName(char *parm, IFvalue *val, CKTcircuit *ckt, int dev, char *name, GENinst
|
|||
int error; /* int to store evaluate error return codes in */
|
||||
int i;
|
||||
|
||||
IGNORE(name);
|
||||
|
||||
for(i=0;i<(*(*DEVices[dev]).DEVpublic.numInstanceParms);i++) {
|
||||
if(strcmp(parm,
|
||||
((*DEVices[dev]).DEVpublic.instanceParms[i].keyword))==0) {
|
||||
|
|
|
|||
|
|
@ -781,6 +781,8 @@ CKTpzVerify(PZtrial **set, PZtrial *new_trial)
|
|||
|
||||
PZtrial *t, *prev;
|
||||
|
||||
IGNORE(set);
|
||||
|
||||
NZeros += 1;
|
||||
if (new_trial->s.imag != 0.0)
|
||||
NZeros += 1;
|
||||
|
|
|
|||
|
|
@ -719,6 +719,8 @@ sens_getp(sgen *sg, CKTcircuit *ckt, IFvalue *val)
|
|||
{
|
||||
int pid;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
error = 0;
|
||||
|
||||
if (sg->is_instparam) {
|
||||
|
|
@ -763,6 +765,8 @@ sens_setp(sgen *sg, CKTcircuit *ckt, IFvalue *val)
|
|||
{
|
||||
int pid;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
error = 0;
|
||||
|
||||
if (sg->is_instparam) {
|
||||
|
|
|
|||
|
|
@ -19,6 +19,9 @@ int
|
|||
CKTsetAnalPm(CKTcircuit *ckt, JOB *analPtr, int parm, IFvalue *value, IFvalue *selector)
|
||||
{
|
||||
int type = analPtr->JOBtype;
|
||||
|
||||
IGNORE(selector);
|
||||
|
||||
if((analInfo[type]->setParm)==NULL) return(E_BADPARM);
|
||||
return( (*(analInfo[type]->setParm))(ckt,analPtr,parm,value) );
|
||||
}
|
||||
|
|
|
|||
|
|
@ -20,6 +20,9 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
CKTsetNodPm(CKTcircuit *ckt, CKTnode *node, int parm, IFvalue *value, IFvalue *selector)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(selector);
|
||||
|
||||
if(!node) return(E_BADPARM);
|
||||
switch(parm) {
|
||||
|
||||
|
|
|
|||
|
|
@ -179,16 +179,19 @@ sgen_next(sgen **xsg)
|
|||
|
||||
int set_inst(sgen *sg)
|
||||
{
|
||||
IGNORE(sg);
|
||||
return 1;
|
||||
}
|
||||
|
||||
int set_model(sgen *sg)
|
||||
{
|
||||
IGNORE(sg);
|
||||
return 1;
|
||||
}
|
||||
|
||||
int set_dev(sgen *sg)
|
||||
{
|
||||
IGNORE(sg);
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -32,6 +32,8 @@ CKTsetOpt(CKTcircuit *ckt, JOB *anal, int opt, IFvalue *val)
|
|||
{
|
||||
TSKtask *task = (TSKtask *)anal;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(opt) {
|
||||
|
||||
case OPT_NOOPITER:
|
||||
|
|
|
|||
|
|
@ -14,6 +14,8 @@ Author: 1988 Jaijeet S Roychowdhury
|
|||
int
|
||||
DaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case D_START:
|
||||
|
|
|
|||
|
|
@ -14,6 +14,10 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
DCOaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(anal);
|
||||
IGNORE(which);
|
||||
IGNORE(value);
|
||||
return(E_BADPARM);
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -26,6 +26,8 @@ DCop(CKTcircuit *ckt, int notused)
|
|||
IFuid *nameList; /* va: tmalloc'ed list */
|
||||
int numNames;
|
||||
void *plot = NULL;
|
||||
|
||||
IGNORE(notused);
|
||||
|
||||
#ifdef XSPICE
|
||||
/* gtri - add - wbk - 12/19/90 - Add IPC stuff and initialize anal_init and anal_type */
|
||||
|
|
|
|||
|
|
@ -16,6 +16,10 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
DCOsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(anal);
|
||||
IGNORE(value);
|
||||
|
||||
switch(which) {
|
||||
|
||||
default:
|
||||
|
|
|
|||
|
|
@ -14,6 +14,9 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
DCTaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
IGNORE(anal);
|
||||
IGNORE(value);
|
||||
switch(which) {
|
||||
|
||||
default:
|
||||
|
|
|
|||
|
|
@ -16,6 +16,9 @@ int
|
|||
DCTsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
TRCV* cv= (TRCV*)anal;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case DCT_START1:
|
||||
|
|
|
|||
|
|
@ -56,6 +56,8 @@ DISTOan(CKTcircuit *ckt, int restart)
|
|||
double time,time1;
|
||||
#endif
|
||||
|
||||
IGNORE(restart);
|
||||
|
||||
|
||||
/* start at beginning */
|
||||
|
||||
|
|
|
|||
|
|
@ -14,6 +14,8 @@ DkerProc(int type, double *rPtr, double *iPtr, int size, DISTOAN *job)
|
|||
{
|
||||
int i;
|
||||
|
||||
IGNORE(job);
|
||||
|
||||
switch(type) {
|
||||
|
||||
case D_F1:
|
||||
|
|
|
|||
|
|
@ -15,6 +15,8 @@ Author: 1988 Jaijeet S Roychowdhury
|
|||
int
|
||||
DsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case D_START:
|
||||
|
|
|
|||
|
|
@ -13,6 +13,8 @@ Author: 1987 Gary W. Ng
|
|||
int
|
||||
NaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case N_OUTPUT:
|
||||
|
|
|
|||
|
|
@ -14,6 +14,8 @@ Author: 1987 Gary W. Ng
|
|||
int
|
||||
NsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case N_OUTPUT:
|
||||
|
|
|
|||
|
|
@ -23,6 +23,8 @@ PZan(CKTcircuit *ckt, int reset)
|
|||
IFuid *nameList;
|
||||
void *plot = NULL;
|
||||
|
||||
IGNORE(reset);
|
||||
|
||||
error = PZinit(ckt);
|
||||
if (error != OK) return error;
|
||||
|
||||
|
|
|
|||
|
|
@ -16,6 +16,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
PZsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case PZ_NODEI:
|
||||
|
|
|
|||
|
|
@ -15,6 +15,8 @@ SENSask(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
|||
{
|
||||
SENS_AN *sinfo = (SENS_AN *) anal;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
switch (which) {
|
||||
|
||||
case SENS_START:
|
||||
|
|
|
|||
|
|
@ -16,6 +16,8 @@ SENSsetParam(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
|||
{
|
||||
SENS_AN *sinfo = (SENS_AN *) anal;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case SENS_POS:
|
||||
|
|
|
|||
|
|
@ -38,6 +38,7 @@ TFanal(CKTcircuit *ckt, int restart)
|
|||
#define inuid (uids[1]) /* unique id for the transfer function input imp. */
|
||||
#define outuid (uids[2]) /* unique id for the transfer function out. imp. */
|
||||
|
||||
IGNORE(restart);
|
||||
|
||||
/* first, find the operating point */
|
||||
converged = CKTop(ckt,
|
||||
|
|
|
|||
|
|
@ -14,6 +14,10 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
TFaskQuest(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(value);
|
||||
IGNORE(anal);
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
default:
|
||||
|
|
|
|||
|
|
@ -15,6 +15,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
TFsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case TF_OUTPOS:
|
||||
|
|
|
|||
|
|
@ -13,6 +13,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
TRANaskQuest(CKTcircuit *ckt, JOB *anal, int which,IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case TRAN_TSTOP:
|
||||
|
|
|
|||
|
|
@ -15,6 +15,8 @@ Author: 1985 Thomas L. Quarles
|
|||
int
|
||||
TRANsetParm(CKTcircuit *ckt, JOB *anal, int which, IFvalue *value)
|
||||
{
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
|
||||
case TRAN_TSTOP:
|
||||
|
|
|
|||
|
|
@ -30,6 +30,8 @@ ASRCacLoad(GENmodel *inModel, CKTcircuit *ckt)
|
|||
double *derivs;
|
||||
double rhs;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
/* loop through all the Arbitrary source models */
|
||||
for( ; model != NULL; model = model->ASRCnextModel ) {
|
||||
|
||||
|
|
|
|||
|
|
@ -26,6 +26,8 @@ ASRCask(CKTcircuit *ckt, GENinstance *instPtr, int which, IFvalue *value, IFvalu
|
|||
{
|
||||
ASRCinstance *here = (ASRCinstance*)instPtr;
|
||||
|
||||
IGNORE(select);
|
||||
|
||||
switch(which) {
|
||||
case ASRC_CURRENT:
|
||||
value->tValue = here->ASRCtype == ASRC_CURRENT ?
|
||||
|
|
|
|||
|
|
@ -18,6 +18,9 @@ int
|
|||
ASRCparam(int param, IFvalue *value, GENinstance *fast, IFvalue *select)
|
||||
{
|
||||
ASRCinstance *here = (ASRCinstance*)fast;
|
||||
|
||||
IGNORE(select);
|
||||
|
||||
switch(param) {
|
||||
case ASRC_VOLTAGE:
|
||||
here->ASRCtype = ASRC_VOLTAGE;
|
||||
|
|
|
|||
|
|
@ -23,6 +23,8 @@ ASRCpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
|
|||
double value;
|
||||
int i, j;
|
||||
|
||||
IGNORE(s);
|
||||
|
||||
/* loop through all the Arbitrary source models */
|
||||
for( ; model != NULL; model = model->ASRCnextModel ) {
|
||||
|
||||
|
|
|
|||
|
|
@ -27,6 +27,8 @@ ASRCsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
|
|||
int v_first;
|
||||
CKTnode *tmp;
|
||||
|
||||
IGNORE(states);
|
||||
|
||||
/* loop through all the user models*/
|
||||
for( ; model != NULL; model = model->ASRCnextModel ) {
|
||||
|
||||
|
|
|
|||
|
|
@ -21,6 +21,8 @@ BJTmAsk(CKTcircuit *ckt, GENmodel *instPtr, int which, IFvalue *value)
|
|||
{
|
||||
BJTmodel *here = (BJTmodel*)instPtr;
|
||||
|
||||
IGNORE(ckt);
|
||||
|
||||
switch(which) {
|
||||
case BJT_MOD_TNOM:
|
||||
value->rValue = here->BJTtnom-CONSTCtoK;
|
||||
|
|
|
|||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue