* src/analysis/*.c: Removed register keywords, as they are

src/analysis/acan.c

@@ -225,11 +225,11 @@ endsweep:
 
 
 int
-CKTacLoad(register CKTcircuit *ckt)
+CKTacLoad(CKTcircuit *ckt)
 {
     extern SPICEdev *DEVices[];
-    register int i;
-    register int size;
+    int i;
+    int size;
     int error;
 #ifdef PARALLEL_ARCH
     long type = MT_ACLOAD, length = 1;

src/analysis/cktaccpt.c

@@ -18,11 +18,11 @@ Author: 1985 Thomas L. Quarles
 
 
 int
-CKTaccept(register CKTcircuit *ckt)
+CKTaccept(CKTcircuit *ckt)
 {
     extern SPICEdev *DEVices[];
 
-    register int i;
+    int i;
     int error;
 
     for (i=0;i<DEVmaxnum;i++) {

src/analysis/cktacdum.c

@@ -18,12 +18,12 @@ Author: 1985 Thomas L. Quarles
 
 
 int
-CKTacDump(register CKTcircuit *ckt, double freq, void *plot)
+CKTacDump(CKTcircuit *ckt, double freq, void *plot)
 {
-    register double *rhsold;
-    register double *irhsold;
-    register int i;
-    register IFcomplex *data;
+    double *rhsold;
+    double *irhsold;
+    int i;
+    IFcomplex *data;
     IFvalue freqData;
     IFvalue valueData;
 

src/analysis/cktask.c

@@ -20,7 +20,7 @@ extern SPICEdev *DEVices[];
 int
 CKTask(void *ckt, void *fast, int which, IFvalue *value, IFvalue *selector)
 {
-    register int type = ((GENinstance *)fast)->GENmodPtr->GENmodType;
+    int type = ((GENinstance *)fast)->GENmodPtr->GENmodType;
     int error;
 #ifdef PARALLEL_ARCH
     long msgtype, length;

src/analysis/cktaskaq.c

@@ -18,7 +18,7 @@ extern SPICEanalysis *analInfo[];
 int
 CKTaskAnalQ(void *ckt, void *analPtr, int parm, IFvalue *value, IFvalue *selector)
 {
-    register int type = ((JOB *)analPtr)->JOBtype;
+    int type = ((JOB *)analPtr)->JOBtype;
 
     if((analInfo[type]->askQuest) == NULL) return(E_BADPARM);
     return( (*(analInfo[type]->askQuest))((CKTcircuit*)ckt,analPtr,parm,value));

src/analysis/cktbindn.c

@@ -24,7 +24,7 @@ int
 CKTbindNode(void *ckt, void *fast, int term, void *node)
 {
     int mappednode;
-    register int type = ((GENinstance *)fast)->GENmodPtr->GENmodType;
+    int type = ((GENinstance *)fast)->GENmodPtr->GENmodType;
 
     mappednode = ((CKTnode *)node)->number;
 

src/analysis/cktbkdum.c

@@ -18,7 +18,7 @@ Author: 1985 Thomas L. Quarles
 void
 CKTbreakDump(CKTcircuit *ckt)
 {
-    register int i;
+    int i;
     for(i=0;i<ckt->CKTbreakSize;i++) {
         (void)printf("breakpoint table entry %d is %g\n",i,*(ckt->CKTbreaks+i));
     }

src/analysis/cktclrbk.c

@@ -17,10 +17,10 @@ Author: 1985 Thomas L. Quarles
 
 
 int
-CKTclrBreak(register CKTcircuit *ckt)
+CKTclrBreak(CKTcircuit *ckt)
 {
     double *tmp;
-    register int j;
+    int j;
 
     if(ckt->CKTbreakSize >2) {
         tmp = (double *)MALLOC((ckt->CKTbreakSize-1)*sizeof(double));

src/analysis/cktdest.c

@@ -24,10 +24,10 @@ extern SPICEdev *DEVices[];
 int
 CKTdestroy(void *inCkt)
 {
-    register CKTcircuit *ckt = (CKTcircuit *)inCkt;
-    register int i;
-    register CKTnode *node;
-    register CKTnode *nnode;
+    CKTcircuit *ckt = (CKTcircuit *)inCkt;
+    int i;
+    CKTnode *node;
+    CKTnode *nnode;
 
 
 #ifdef WANT_SENSE2

src/analysis/cktdisto.c

@@ -20,11 +20,11 @@ Author: 1988 Jaijeet S Roychowdhury
 
 
 int
-CKTdisto (register CKTcircuit *ckt, int mode)
+CKTdisto (CKTcircuit *ckt, int mode)
 {
     extern SPICEdev *DEVices[];
-    register DISTOAN* cv = (DISTOAN*) (ckt->CKTcurJob);
-    register int i;
+    DISTOAN* cv = (DISTOAN*) (ckt->CKTcurJob);
+    int i;
     int error=0;
     int size;
 
@@ -88,8 +88,8 @@ CKTdisto (register CKTcircuit *ckt, int mode)
 
         if(vcode >= 0) {
             /* voltage sources are in this version, so use them */
-            register VSRCinstance *here;
-            register VSRCmodel *model;
+            VSRCinstance *here;
+            VSRCmodel *model;
             for(model = (VSRCmodel *)ckt->CKThead[vcode];model != NULL;
                     model=model->VSRCnextModel){
                 for(here=model->VSRCinstances;here!=NULL;
@@ -123,8 +123,8 @@ if (((here->VSRCdF1given) && (mode == D_RHSF1)) ||
         }
         if(icode >= 0 ) {
             /* current sources are in this version, so use them */
-            register ISRCinstance *here;
-            register ISRCmodel *model;
+            ISRCinstance *here;
+            ISRCmodel *model;
 
             for(model= (ISRCmodel *)ckt->CKThead[icode];model != NULL;
                     model=model->ISRCnextModel){

src/analysis/cktdump.c

@@ -17,7 +17,7 @@ Author: 1985 Thomas L. Quarles
 
 
 void
-CKTdump(register CKTcircuit *ckt, double ref, void *plot)
+CKTdump(CKTcircuit *ckt, double ref, void *plot)
 {
     IFvalue refData;
     IFvalue valData;

src/analysis/cktfbran.c

@@ -19,11 +19,11 @@ Author: 1985 Thomas L. Quarles
 
 
 int
-CKTfndBranch(register CKTcircuit *ckt, IFuid name)
+CKTfndBranch(CKTcircuit *ckt, IFuid name)
 {
     extern SPICEdev *DEVices[];
 
-    register int i;
+    int i;
     int j;
 
     for (i=0;i<DEVmaxnum;i++) {

src/analysis/cktfdev.c

@@ -14,9 +14,9 @@ Author: 1985 Thomas L. Quarles
 int
 CKTfndDev(void *Ckt, int *type, void **fast, IFuid name, void *modfast, IFuid modname)
 {
-    register CKTcircuit *ckt=(CKTcircuit *)Ckt;
-    register GENinstance *here;
-    register GENmodel *mods;
+    CKTcircuit *ckt=(CKTcircuit *)Ckt;
+    GENinstance *here;
+    GENmodel *mods;
 
     if((GENinstance **)fast != (GENinstance **)NULL && 
             *(GENinstance **)fast != (GENinstance *)NULL) {

src/analysis/cktfnda.c

@@ -24,7 +24,7 @@ int
 CKTfndAnal(void *ckt, int *analIndex, void **anal, IFuid name, void *inTask, IFuid taskName)
 {
     TSKtask *task = (TSKtask *)inTask;
-    register JOB *here;
+    JOB *here;
 
     for (here = ((TSKtask *)task)->jobs;here;here = here->JOBnextJob) {
         if(strcmp(here->JOBname,name)==0) {

src/analysis/cktfndm.c

@@ -16,7 +16,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTfndMod(void *ckt, int *type, void **modfast, IFuid modname)
 {
-    register GENmodel *mods;
+    GENmodel *mods;
 
     if(modfast != NULL && *(GENmodel **)modfast != NULL) {
         /* already have  modfast, so nothing to do */

src/analysis/cktfnode.c

@@ -21,7 +21,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTfndNode(void *ckt, void **node, IFuid name)
 {
-    register CKTnode *here;
+    CKTnode *here;
 
     for (here = ((CKTcircuit *)ckt)->CKTnodes; here; here = here->next)  {
         if(here->name == name) {

src/analysis/cktgrnd.c

@@ -20,7 +20,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTground(void *inCkt, void **node, IFuid name)
 {
-    register CKTcircuit *ckt = (CKTcircuit *)inCkt;
+    CKTcircuit *ckt = (CKTcircuit *)inCkt;
 
     if(ckt->CKTnodes) {
         if(ckt->CKTnodes->name) {

src/analysis/ckti2nod.c

@@ -26,7 +26,7 @@ int
 CKTinst2Node(void *ckt, void *instPtr, int terminal, void **node, IFuid *nodeName)
 {
     int nodenum;
-    register int type;
+    int type;
     CKTnode *here;
 
     type = ((GENinstance *)instPtr)->GENmodPtr->GENmodType;

src/analysis/cktinit.c

@@ -15,8 +15,8 @@ int
 CKTinit(void **ckt)
                  /* new circuit to create */
 {
-    register int i;
-    register CKTcircuit *sckt;
+    int i;
+    CKTcircuit *sckt;
 
     sckt = (CKTcircuit *)( *ckt = (char *)MALLOC(sizeof(CKTcircuit)) );
     if(sckt == NULL) return(E_NOMEM);

src/analysis/cktload.c

@@ -22,11 +22,11 @@ Author: 1985 Thomas L. Quarles
 static int ZeroNoncurRow(SMPmatrix *matrix, CKTnode *nodes, int rownum);
 
 int
-CKTload(register CKTcircuit *ckt)
+CKTload(CKTcircuit *ckt)
 {
     extern SPICEdev *DEVices[];
-    register int i;
-    register int size;
+    int i;
+    int size;
     double startTime;
     CKTnode *node;
     int error;

src/analysis/cktmapn.c

@@ -22,7 +22,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTmapNode(void *ckt, void **node, IFuid name)
 {
-    register CKTnode *here;
+    CKTnode *here;
     int error;
     IFuid uid;
     CKTnode *mynode;

src/analysis/cktmpar.c

@@ -21,7 +21,7 @@ extern SPICEdev *DEVices[];
 int
 CKTmodParam(void *ckt, void *modfast, int param, IFvalue *val, IFvalue *selector)
 {
-    register int type = ((GENmodel *)modfast)->GENmodType;
+    int type = ((GENmodel *)modfast)->GENmodType;
 
     if (((*DEVices[type]).DEVmodParam)) {
         return(((*((*DEVices[type]).DEVmodParam)) (param,val,

src/analysis/cktnames.c

@@ -17,10 +17,10 @@ Author: 1988 Thomas L. Quarles
 
 
 int
-CKTnames(register CKTcircuit *ckt, int *numNames, register IFuid **nameList)
+CKTnames(CKTcircuit *ckt, int *numNames, IFuid **nameList)
 {
-    register CKTnode *here;
-    register int i;
+    CKTnode *here;
+    int i;
     *numNames = ckt->CKTmaxEqNum-1;
     *nameList = (IFuid *)MALLOC(*numNames * sizeof(IFuid ));
     if ((*nameList) == (IFuid *)NULL) return(E_NOMEM);
@@ -35,7 +35,7 @@ int
 CKTdnames(CKTcircuit *ckt)
 {
     CKTnode *here;
-    register int i;
+    int i;
 
     i=0;
     for (here = ckt->CKTnodes->next; here; here = here->next)  {

src/analysis/cktneweq.c

@@ -23,7 +23,7 @@ int
 CKTnewEq(void *inCkt, void **node, IFuid name)
 {
     CKTnode *mynode;
-    register CKTcircuit *ckt = (CKTcircuit *)inCkt;
+    CKTcircuit *ckt = (CKTcircuit *)inCkt;
     int error;
 
     error = CKTmkNode(ckt,&mynode);

src/analysis/cktnewn.c

@@ -23,7 +23,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTnewNode(void *inCkt, void **node, IFuid name)
 {
-    register CKTcircuit *ckt = (CKTcircuit *)inCkt;
+    CKTcircuit *ckt = (CKTcircuit *)inCkt;
     if(!(ckt->CKTnodes)) { /*  starting the list - allocate both ground and 1 */
         ckt->CKTnodes = (CKTnode *) MALLOC(sizeof(CKTnode));
         if(ckt->CKTnodes == (CKTnode *)NULL) return(E_NOMEM);

src/analysis/cktnodn.c

@@ -18,9 +18,9 @@ Author: 1985 Thomas L. Quarles
 
 
 IFuid
-CKTnodName(CKTcircuit *ckt, register int nodenum)
+CKTnodName(CKTcircuit *ckt, int nodenum)
 {
-    register CKTnode *here;
+    CKTnode *here;
 
     for(here = ckt->CKTnodes;here; here = here->next) {
         if(here->number == nodenum) { 

src/analysis/cktntask.c

@@ -17,7 +17,8 @@ Author: 1985 Thomas L. Quarles
 int
 CKTnewTask(void *ckt, void **taskPtr, IFuid taskName)
 {
-    register TSKtask *tsk;
+    TSKtask *tsk;
+
     *taskPtr = (void *)MALLOC(sizeof(TSKtask));
     if(*taskPtr==NULL) return(E_NOMEM);
     tsk = *(TSKtask **)taskPtr;

src/analysis/cktnum2n.c

@@ -21,7 +21,7 @@ Author: 1985 Thomas L. Quarles
 CKTnode *
 CKTnum2nod(CKTcircuit *ckt, int node)
 {
-    register CKTnode *here;
+    CKTnode *here;
 
     for (here = ((CKTcircuit *)ckt)->CKTnodes; here; here = here->next)  {
         if(here->number == node) {

src/analysis/cktop.c

@@ -104,10 +104,10 @@ CKTop(CKTcircuit *ckt, long int firstmode, long int continuemode, int iterlim)
  */
 
 int
-CKTconvTest(register CKTcircuit *ckt)
+CKTconvTest(CKTcircuit *ckt)
 {
     extern SPICEdev *DEVices[];
-    register int i;
+    int i;
     int error = OK;
 #ifdef PARALLEL_ARCH
     int ibuf[2];

src/analysis/cktparam.c

@@ -22,7 +22,7 @@ extern SPICEdev *DEVices[];
 int
 CKTparam(void *ckt, void *fast, int param, IFvalue *val, IFvalue *selector)
 {
-    register int type;
+    int type;
     GENinstance *myfast = (GENinstance *)fast;
     type = myfast->GENmodPtr->GENmodType;
     if(((*DEVices[type]).DEVparam)) {

src/analysis/cktpartn.c

@@ -21,11 +21,11 @@ Author: 1992 David A. Gates, UC Berkeley CADgroup
 extern SPICEdev *DEVices[];
 
 int
-CKTpartition(register CKTcircuit *ckt)
+CKTpartition(CKTcircuit *ckt)
 {
-    register int i, instNum = 0;
-    register GENmodel *model;
-    register GENinstance *inst;
+    int i, instNum = 0;
+    GENmodel *model;
+    GENinstance *inst;
 
     for (i=0;i<DEVmaxnum;i++) {
         if ( (ckt->CKThead[i] != NULL) ) {

src/analysis/cktpzset.c

@@ -17,7 +17,7 @@ Copyright 1990 Regents of the University of California.  All rights reserved.
 
 
 int
-CKTpzSetup(register CKTcircuit *ckt, int type)
+CKTpzSetup(CKTcircuit *ckt, int type)
 {
     extern SPICEdev *DEVices[];
     PZAN *pzan = (PZAN *) ckt->CKTcurJob;

src/analysis/cktsetap.c

@@ -18,7 +18,7 @@ extern SPICEanalysis *analInfo[];
 int
 CKTsetAnalPm(void *ckt, void *analPtr, int parm, IFvalue *value, IFvalue *selector)
 {
-    register int type = ((JOB *)analPtr)->JOBtype;
+    int type = ((JOB *)analPtr)->JOBtype;
     if((analInfo[type]->setParm)==NULL) return(E_BADPARM);
     return( (*(analInfo[type]->setParm))(ckt,analPtr,parm,value) );
 }

src/analysis/cktsetbk.c

@@ -18,10 +18,10 @@ Author: 1985 Thomas L. Quarles
 
 
 int
-CKTsetBreak(register CKTcircuit *ckt, double time)
+CKTsetBreak(CKTcircuit *ckt, double time)
 {
     double *tmp;
-    register int i,j;
+    int i,j;
 
     if(ckt->CKTtime > time) {
         (*(SPfrontEnd->IFerror))(ERR_PANIC,"breakpoint in the past - HELP!",

src/analysis/cktsetup.c

@@ -26,12 +26,12 @@ Author: 1985 Thomas L. Quarles
 extern SPICEdev *DEVices[];
 
 int
-CKTsetup(register CKTcircuit *ckt)
+CKTsetup(CKTcircuit *ckt)
 {
-    register int i;
+    int i;
     int error;
 
-    register SMPmatrix *matrix;
+    SMPmatrix *matrix;
     ckt->CKTnumStates=0;
 
 #ifdef WANT_SENSE2

src/analysis/cktsopt.c

@@ -23,7 +23,7 @@ Author: 1985 Thomas L. Quarles
 int
 CKTsetOpt(void *ckt, void *anal, int opt, IFvalue *val)
 {
-    register TSKtask *task = (TSKtask *)anal;
+    TSKtask *task = (TSKtask *)anal;
 
     switch(opt) {
         

src/analysis/ckttemp.c

@@ -22,10 +22,10 @@ Author: 1985 Thomas L. Quarles
 extern SPICEdev *DEVices[];
 
 int
-CKTtemp(register CKTcircuit *ckt)
+CKTtemp(CKTcircuit *ckt)
 {
     int error;
-    register int i;
+    int i;
 
     ckt->CKTvt = CONSTKoverQ * ckt->CKTtemp;
 

src/analysis/cktterr.c

@@ -12,7 +12,7 @@ Author: 1985 Thomas L. Quarles
 #define ccap (qcap+1)
 
 void
-CKTterr(register int qcap, register CKTcircuit *ckt, register double *timeStep)
+CKTterr(int qcap, CKTcircuit *ckt, double *timeStep)
 { 
     double volttol;
     double chargetol;
@@ -21,8 +21,8 @@ CKTterr(register int qcap, register CKTcircuit *ckt, register double *timeStep)
     double diff[8];
     double deltmp[8];
     double factor;
-    register int i;
-    register int j;
+    int i;
+    int j;
     static double gearCoeff[] = {
         .5,
         .2222222222,

src/analysis/ckttrunc.c

@@ -21,10 +21,10 @@ Author: 1985 Thomas L. Quarles
 extern SPICEdev *DEVices[];
 
 int
-CKTtrunc(register CKTcircuit *ckt, double *timeStep)
+CKTtrunc(CKTcircuit *ckt, double *timeStep)
 {
 #ifndef NEWTRUNC
-    register int i;
+    int i;
     double timetemp;
 #ifdef PARALLEL_ARCH
     long type = MT_TRUNC, length = 1;
@@ -66,8 +66,8 @@ CKTtrunc(register CKTcircuit *ckt, double *timeStep)
     ckt->CKTstat->STATtranTruncTime += SPfrontEnd->IFseconds() - startTime;
     return(OK);
 #else /* NEWTRUNC */
-    register int i;
-    register CKTnode *node;
+    int i;
+    CKTnode *node;
     double timetemp;
     double tmp;
     double diff;

src/analysis/dcop.c

@@ -13,7 +13,7 @@ Author: 1985 Thomas L. Quarles
 int
 DCop(CKTcircuit *ckt)
 {
-    int CKTload(register CKTcircuit *ckt);
+    int CKTload(CKTcircuit *ckt);
     int converged;
     int error;
     IFuid *nameList;

src/analysis/dctrcurv.c

@@ -21,7 +21,7 @@ DCtrCurv(CKTcircuit *ckt, int restart)
                 
                 /* forced restart flag */
 {
-    register TRCV* cv = (TRCV*)ckt->CKTcurJob; /* Where we get the job to do */ 
+    TRCV* cv = (TRCV*)ckt->CKTcurJob; /* Where we get the job to do */ 
     int i;
     double *temp;
     int converged;
@@ -68,8 +68,9 @@ DCtrCurv(CKTcircuit *ckt, int restart)
     for(i=0;i<=cv->TRCVnestLevel;i++) {
         if(rcode >= 0) {
             /* resistances are in this version, so use them */
-            register RESinstance *here;
-            register RESmodel *model;
+            RESinstance *here;
+            RESmodel *model;
+
             for(model = (RESmodel *)ckt->CKThead[rcode];model != NULL;
                     model=model->RESnextModel){
                 for(here=model->RESinstances;here!=NULL;
@@ -89,8 +90,9 @@ DCtrCurv(CKTcircuit *ckt, int restart)
         }
         if(vcode >= 0) {
             /* voltage sources are in this version, so use them */
-            register VSRCinstance *here;
-            register VSRCmodel *model;
+            VSRCinstance *here;
+            VSRCmodel *model;
+
             for(model = (VSRCmodel *)ckt->CKThead[vcode];model != NULL;
                     model=model->VSRCnextModel){
                 for(here=model->VSRCinstances;here!=NULL;
@@ -109,8 +111,8 @@ DCtrCurv(CKTcircuit *ckt, int restart)
         }
         if(icode >= 0 ) {
             /* current sources are in this version, so use them */
-            register ISRCinstance *here;
-            register ISRCmodel *model;
+            ISRCinstance *here;
+            ISRCmodel *model;
 
             for(model= (ISRCmodel *)ckt->CKThead[icode];model != NULL;
                     model=model->ISRCnextModel){

src/analysis/dctsetp.c

@@ -15,7 +15,7 @@ Author: 1985 Thomas L. Quarles
 int 
 DCTsetParm(CKTcircuit *ckt, void *anal, int which, IFvalue *value)
 {
-    register TRCV* cv= (TRCV*)anal;
+    TRCV* cv= (TRCV*)anal;
     switch(which) {
 
     case DCT_START1:

src/analysis/distoan.c

@@ -39,7 +39,7 @@ DstorAlloc(double ***header, int size)
 extern int CKTdisto(CKTcircuit*, int);
 extern int DkerProc(int,double*,double*,int,DISTOan*);
 #else
-extern int CKTdisto(register CKTcircuit *ckt, int mode);
+extern int CKTdisto(CKTcircuit *ckt, int mode);
 extern int DkerProc(int type, double *rPtr, double *iPtr, int size, DISTOAN *job);
 #endif
 
@@ -59,7 +59,7 @@ DISTOan(CKTcircuit *ckt, int restart)
     IFuid *nameList;
     IFuid freqUid;
     void *acPlot;
-    register DISTOAN* job = (DISTOAN *) (ckt->CKTcurJob);
+    DISTOAN* job = (DISTOAN *) (ckt->CKTcurJob);
     static char *nof2src = "No source with f2 distortion input";
 #ifdef DISTODEBUG
     double time,time1;

src/analysis/ninteg.c

@@ -24,7 +24,7 @@ Author: 1987 Gary W. Ng
 
 
 double
-Nintegrate (double noizDens, double lnNdens, double lnNlstDens, register Ndata *data)
+Nintegrate (double noizDens, double lnNdens, double lnNlstDens, Ndata *data)
 {
     double exponent;
     double a;

src/analysis/noisean.c

@@ -1,14 +1,11 @@
 /* Patch to noisean.c by Richard D. McRoberts.
  * Patched with modifications from Weidong Lu (2000)
- * There is a strange #ifdef near the end of the file.
  */
 /**********
 Copyright 1990 Regents of the University of California.  All rights reserved.
 Author: 1987 Gary W. Ng
 **********/
 
-#define INT_NOISE /* Inserted to compile the ifdef'd code */
-
 #include "ngspice.h"
 #include <stdio.h>
 #include "acdefs.h"
@@ -22,7 +19,7 @@ Author: 1987 Gary W. Ng
 int
 NOISEan (CKTcircuit *ckt, int restart)
 {
-    register Ndata *data;
+    Ndata *data;
     double realVal;
     double imagVal;
     int error;
@@ -30,12 +27,11 @@ NOISEan (CKTcircuit *ckt, int restart)
     int negOutNode;
     int code;
     int step;
-    /* register CKTnode *node;  WL but not used ???? */
     IFuid freqUid;
     void *inst;  /* PN fixes incompatible pointer type warning */
     double freqTol; /* tolerence parameter for finding final frequency; hack */
 
-    register NOISEAN *job = (NOISEAN*) (ckt->CKTcurJob);
+    NOISEAN *job = (NOISEAN*) (ckt->CKTcurJob);
     static char *noacinput =    "noise input source has no AC value";
 
     posOutNode = ((CKTnode*) (job->output))->number;
@@ -258,7 +254,6 @@ NOISEan (CKTcircuit *ckt, int restart)
     error = CKTnoise(ckt,N_DENS,N_CLOSE,data);
     if (error) return(error);
 
-#ifdef INT_NOISE                  /* WL */
     data->numPlots = 0;
     data->outNumber = 0;
 
@@ -278,7 +273,6 @@ NOISEan (CKTcircuit *ckt, int restart)
 	error = CKTnoise(ckt,INT_NOIZ,N_CLOSE,data);
 	if (error) return(error);
     }
-#endif
 
     FREE(data);
     return(OK);

src/analysis/tfanal.c

@@ -28,7 +28,7 @@ TFanal(CKTcircuit *ckt, int restart)
     IFvalue refval;     /* structure for 'reference' value (not used here) */
     int error;
     int converged;
-    register int i;
+    int i;
     void *plotptr;   /* pointer to out plot */
     void *ptr = NULL;
     IFuid uids[3];