convert K&R function definitions to ansi style

16 years ago · 463ef4a3b1
70 changed files with 160 additions and 342 deletions
--- a/72
+++ b/72
@ -1,3 +1,75 @@
+2010-07-03  Robert Larice
+ * src/ciderlib/support/database.c ,
+ * src/ciderlib/support/logfile.c ,
+ * src/ciderlib/support/suprem.c ,
+ * src/ciderlib/support/suprmitf.c ,
+ * src/ciderlib/twod/twosetup.c ,
+ * src/spicelib/devices/nbjt/nbjtacld.c ,
+ * src/spicelib/devices/nbjt/nbjtask.c ,
+ * src/spicelib/devices/nbjt/nbjtdel.c ,
+ * src/spicelib/devices/nbjt/nbjtdest.c ,
+ * src/spicelib/devices/nbjt/nbjtdump.c ,
+ * src/spicelib/devices/nbjt/nbjtload.c ,
+ * src/spicelib/devices/nbjt/nbjtmdel.c ,
+ * src/spicelib/devices/nbjt/nbjtmpar.c ,
+ * src/spicelib/devices/nbjt/nbjtparm.c ,
+ * src/spicelib/devices/nbjt/nbjtpzld.c ,
+ * src/spicelib/devices/nbjt/nbjtset.c ,
+ * src/spicelib/devices/nbjt/nbjttemp.c ,
+ * src/spicelib/devices/nbjt/nbjttrun.c ,
+ * src/spicelib/devices/nbjt2/nbt2acld.c ,
+ * src/spicelib/devices/nbjt2/nbt2ask.c ,
+ * src/spicelib/devices/nbjt2/nbt2del.c ,
+ * src/spicelib/devices/nbjt2/nbt2dest.c ,
+ * src/spicelib/devices/nbjt2/nbt2dump.c ,
+ * src/spicelib/devices/nbjt2/nbt2load.c ,
+ * src/spicelib/devices/nbjt2/nbt2mdel.c ,
+ * src/spicelib/devices/nbjt2/nbt2mpar.c ,
+ * src/spicelib/devices/nbjt2/nbt2parm.c ,
+ * src/spicelib/devices/nbjt2/nbt2pzld.c ,
+ * src/spicelib/devices/nbjt2/nbt2set.c ,
+ * src/spicelib/devices/nbjt2/nbt2temp.c ,
+ * src/spicelib/devices/nbjt2/nbt2trun.c ,
+ * src/spicelib/devices/numd/numdacld.c ,
+ * src/spicelib/devices/numd/numdask.c ,
+ * src/spicelib/devices/numd/numddel.c ,
+ * src/spicelib/devices/numd/numddest.c ,
+ * src/spicelib/devices/numd/numddump.c ,
+ * src/spicelib/devices/numd/numdload.c ,
+ * src/spicelib/devices/numd/numdmdel.c ,
+ * src/spicelib/devices/numd/numdmpar.c ,
+ * src/spicelib/devices/numd/numdparm.c ,
+ * src/spicelib/devices/numd/numdpzld.c ,
+ * src/spicelib/devices/numd/numdtemp.c ,
+ * src/spicelib/devices/numd/numdtrun.c ,
+ * src/spicelib/devices/numd2/nud2acld.c ,
+ * src/spicelib/devices/numd2/nud2ask.c ,
+ * src/spicelib/devices/numd2/nud2del.c ,
+ * src/spicelib/devices/numd2/nud2dest.c ,
+ * src/spicelib/devices/numd2/nud2dump.c ,
+ * src/spicelib/devices/numd2/nud2load.c ,
+ * src/spicelib/devices/numd2/nud2mdel.c ,
+ * src/spicelib/devices/numd2/nud2mpar.c ,
+ * src/spicelib/devices/numd2/nud2parm.c ,
+ * src/spicelib/devices/numd2/nud2pzld.c ,
+ * src/spicelib/devices/numd2/nud2set.c ,
+ * src/spicelib/devices/numd2/nud2temp.c ,
+ * src/spicelib/devices/numd2/nud2trun.c ,
+ * src/spicelib/devices/numos/nummacld.c ,
+ * src/spicelib/devices/numos/nummask.c ,
+ * src/spicelib/devices/numos/nummdel.c ,
+ * src/spicelib/devices/numos/nummdest.c ,
+ * src/spicelib/devices/numos/nummdump.c ,
+ * src/spicelib/devices/numos/nummload.c ,
+ * src/spicelib/devices/numos/nummmdel.c ,
+ * src/spicelib/devices/numos/nummmpar.c ,
+ * src/spicelib/devices/numos/nummparm.c ,
+ * src/spicelib/devices/numos/nummpzld.c ,
+ * src/spicelib/devices/numos/nummset.c ,
+ * src/spicelib/devices/numos/nummtemp.c ,
+ * src/spicelib/devices/numos/nummtrun.c :
+        convert K&R function definitions to ansi style
+
 2010-07-03  Robert Larice
 * src/frontend/subckt.c :  drop unsued variable.
 * src/include/ngspice.h :  add a missing extern
--- a/src/ciderlib/support/database.c
+++ b/src/ciderlib/support/database.c
@ -8,7 +8,7 @@ Author:	1992 David A. Gates, U. C. Berkeley CAD Group
 /* #include "ftedata.h" */

 struct plot *
-DBread( fileName )
+DBread( char *fileName )
 {
  struct plot *plot;

@ -18,10 +18,7 @@ DBread( fileName )
 }

 double *
-DBgetData( plot, name, lengthWanted )
-struct plot *plot;
-char *name;
-int lengthWanted;
+DBgetData(struct plot *plot, char *name, int lengthWanted)
 {
  struct dvec *v;
  double *data;
@ -50,8 +47,7 @@ int lengthWanted;
 }

 void
-DBfree( plot )
-struct plot *plot;
+DBfree(struct plot *plot)
 {
  struct dvec *v, *nextv;
  struct plot *pl, *nextpl;
--- a/src/ciderlib/support/logfile.c
+++ b/src/ciderlib/support/logfile.c
@ -9,9 +9,7 @@ static char *LogFileName = "cider.log";
 static int LogError = 0;

 void
-LOGmakeEntry(name, description)
-  char *name;
-  char *description;
+LOGmakeEntry(char *name, char *description)
 {
  int procStamp;
  FILE *fpLog;
--- a/src/ciderlib/support/suprem.c
+++ b/src/ciderlib/support/suprem.c
@ -110,11 +110,7 @@ readAsciiData( char *fileName, int impType, DOPtable **ppTable )


 void
-readSupremData( fileName, fileType, impType, ppTable )
-char *fileName;
-int fileType;
-int impType;
-DOPtable **ppTable;
+readSupremData(char *fileName, int fileType, int impType, DOPtable **ppTable)
 {
 #define MAX_GRID 500
    float x[ MAX_GRID ], conc[ MAX_GRID ];
--- a/src/ciderlib/support/suprmitf.c
+++ b/src/ciderlib/support/suprmitf.c
@ -24,10 +24,7 @@ Author:	1991 David A. Gates, U. C. Berkeley CAD Group
 #define DEBUG	if (0)

 void
-SUPbinRead( inFile, x, conc, impId, numNod )
-char *inFile;
-float *x, *conc;
-int *impId, *numNod;
+SUPbinRead(char *inFile, float *x, float *conc, int *impId, int *numNod)
 {
  int idata, recordMark;
  int ldata;
@ -223,10 +220,7 @@ int *impId, *numNod;
 }

 void
-SUPascRead( inFile, x, conc, impId, numNod )
-char *inFile;
-float *x, *conc;
-int *impId, *numNod;
+SUPascRead(char *inFile, float *x, float *conc, int *impId, int *numNod)
 {
  int idata;
  int i, j;
--- a/src/ciderlib/twod/twosetup.c
+++ b/src/ciderlib/twod/twosetup.c
@ -141,11 +141,8 @@ void TWOsetup(TWOdevice *pDevice)
 }

 /* Transfer BC info from card to nodes and edges. */
-static void TWOcopyBCinfo( pDevice, pElem, card, index )
-     TWOdevice *pDevice;
-     TWOelem *pElem;
-     BDRYcard *card;
-     int index;
+static void
+TWOcopyBCinfo(TWOdevice *pDevice, TWOelem *pElem, BDRYcard *card, int index )
 {
  TWOnode *pNode;
  TWOelem *pNElem;
--- a/src/spicelib/devices/nbjt/nbjtacld.c
+++ b/src/spicelib/devices/nbjt/nbjtacld.c
@ -22,10 +22,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int ONEacDebug;

 int
-NBJTacLoad(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-
+NBJTacLoad(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
--- a/src/spicelib/devices/nbjt/nbjtask.c
+++ b/src/spicelib/devices/nbjt/nbjtask.c
@ -18,12 +18,7 @@ extern int NBJTinitSmSig(NBJTinstance *);

 /* ARGSUSED */
 int
-NBJTask(ckt, inInst, which, value, select)
-  CKTcircuit *ckt;
-  GENinstance *inInst;
-  int which;
-  IFvalue *value;
-  IFvalue *select;
+NBJTask(CKTcircuit *ckt, GENinstance *inInst, int which, IFvalue *value, IFvalue *select)
 {
  NBJTinstance *inst = (NBJTinstance *) inInst;
  switch (which) {
--- a/src/spicelib/devices/nbjt/nbjtdel.c
+++ b/src/spicelib/devices/nbjt/nbjtdel.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJTdelete(inModel, name, kill)
-  GENmodel *inModel;
-  IFuid name;
-  GENinstance **kill;
-
+NBJTdelete(GENmodel *inModel, IFuid name, GENinstance **kill)
 {
  NBJTmodel *model = (NBJTmodel *) inModel;
  NBJTinstance **fast = (NBJTinstance **) kill;
--- a/src/spicelib/devices/nbjt/nbjtdest.c
+++ b/src/spicelib/devices/nbjt/nbjtdest.c
@ -15,9 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 void
-NBJTdestroy(inModel)
-  GENmodel **inModel;
-
+NBJTdestroy(GENmodel **inModel)
 {

  NBJTmodel **model = (NBJTmodel **) inModel;
--- a/src/spicelib/devices/nbjt/nbjtdump.c
+++ b/src/spicelib/devices/nbjt/nbjtdump.c
@ -26,9 +26,7 @@ static int state_numDC = 0;
 static int state_numTR = 0;

 void
-NBJTdump(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NBJTdump(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
@ -92,10 +90,7 @@ NBJTdump(inModel, ckt)

 static
 void 
-NBJTputHeader(file, ckt, inst)
-  FILE *file;
-  CKTcircuit *ckt;
-  NBJTinstance *inst;
+NBJTputHeader(FILE *file, CKTcircuit *ckt, NBJTinstance *inst)
 {
  char *reference;
  double refVal = 0.0;
@ -153,10 +148,7 @@ NBJTputHeader(file, ckt, inst)
 }

 void
-NBJTacct(inModel, ckt, file)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  FILE *file;
+NBJTacct(GENmodel *inModel, CKTcircuit *ckt, FILE *file)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
--- a/src/spicelib/devices/nbjt/nbjtload.c
+++ b/src/spicelib/devices/nbjt/nbjtload.c
@ -29,9 +29,7 @@ extern int ONEacDebug;


 int
-NBJTload(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NBJTload(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
@ -491,8 +489,7 @@ NBJTload(inModel, ckt)
 }

 int
-NBJTinitSmSig(inst)
-  NBJTinstance *inst;
+NBJTinitSmSig(NBJTinstance *inst)
 {
  SPcomplex yIeVce, yIeVbe;
  SPcomplex yIcVce, yIcVbe;
--- a/src/spicelib/devices/nbjt/nbjtmdel.c
+++ b/src/spicelib/devices/nbjt/nbjtmdel.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJTmDelete(inModel, modname, kill)
-  GENmodel **inModel;
-  IFuid modname;
-  GENmodel *kill;
-
+NBJTmDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
 {

  NBJTmodel **model = (NBJTmodel **) inModel;
--- a/src/spicelib/devices/nbjt/nbjtmpar.c
+++ b/src/spicelib/devices/nbjt/nbjtmpar.c
@ -15,10 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJTmParam(param, value, inModel)
-  int param;
-  IFvalue *value;
-  GENmodel *inModel;
+NBJTmParam(int param, IFvalue *value, GENmodel *inModel)
 {
  switch (param) {
  case NBJT_MOD_NBJT:
--- a/src/spicelib/devices/nbjt/nbjtparm.c
+++ b/src/spicelib/devices/nbjt/nbjtparm.c
@ -15,11 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJTparam(param, value, inInst, select)
-  int param;
-  IFvalue *value;
-  GENinstance *inInst;
-  IFvalue *select;
+NBJTparam(int param, IFvalue *value, GENinstance *inInst, IFvalue *select)
 {
  register NBJTinstance *inst = (NBJTinstance *) inInst;
  switch (param) {
--- a/src/spicelib/devices/nbjt/nbjtpzld.c
+++ b/src/spicelib/devices/nbjt/nbjtpzld.c
@ -21,11 +21,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int ONEacDebug;

 int
-NBJTpzLoad(inModel, ckt, s)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  SPcomplex *s;
-
+NBJTpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
--- a/src/spicelib/devices/nbjt/nbjtset.c
+++ b/src/spicelib/devices/nbjt/nbjtset.c
@ -22,11 +22,7 @@ if (size && (!(var =(type *)calloc(1, (unsigned)(size)*sizeof(type))))) {\
 }

 int 
-NBJTsetup(matrix, inModel, ckt, states)
-  register SMPmatrix *matrix;
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  int *states;
+NBJTsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
 /*
 * load the diode structure with those pointers needed later for fast matrix
 * loading
--- a/src/spicelib/devices/nbjt/nbjttemp.c
+++ b/src/spicelib/devices/nbjt/nbjttemp.c
@ -19,9 +19,7 @@ extern int ONEdcDebug;
 extern double LNorm;

 int 
-NBJTtemp(inModel, ckt)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
+NBJTtemp(GENmodel *inModel, CKTcircuit *ckt)
 /*
 * perform the temperature update to the bjt
 */
--- a/src/spicelib/devices/nbjt/nbjttrun.c
+++ b/src/spicelib/devices/nbjt/nbjttrun.c
@ -18,11 +18,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group


 int
-NBJTtrunc(inModel, ckt, timeStep)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  double *timeStep;
-
+NBJTtrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
  register NBJTmodel *model = (NBJTmodel *) inModel;
  register NBJTinstance *inst;
--- a/src/spicelib/devices/nbjt2/nbt2acld.c
+++ b/src/spicelib/devices/nbjt2/nbt2acld.c
@ -22,10 +22,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int TWOacDebug;

 int
-NBJT2acLoad(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-
+NBJT2acLoad(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
--- a/src/spicelib/devices/nbjt2/nbt2ask.c
+++ b/src/spicelib/devices/nbjt2/nbt2ask.c
@ -19,12 +19,7 @@ extern int NBJT2initSmSig(NBJT2instance *);

 /* ARGSUSED */
 int
-NBJT2ask(ckt, inInst, which, value, select)
-  CKTcircuit *ckt;
-  GENinstance *inInst;
-  int which;
-  IFvalue *value;
-  IFvalue *select;
+NBJT2ask(CKTcircuit *ckt, GENinstance *inInst, int which, IFvalue *value, IFvalue *select)
 {
  NBJT2instance *inst = (NBJT2instance *) inInst;
  switch (which) {
--- a/src/spicelib/devices/nbjt2/nbt2del.c
+++ b/src/spicelib/devices/nbjt2/nbt2del.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJT2delete(inModel, name, kill)
-  GENmodel *inModel;
-  IFuid name;
-  GENinstance **kill;
-
+NBJT2delete(GENmodel *inModel, IFuid name, GENinstance **kill)
 {

  NBJT2model *model = (NBJT2model *) inModel;
--- a/src/spicelib/devices/nbjt2/nbt2dest.c
+++ b/src/spicelib/devices/nbjt2/nbt2dest.c
@ -15,9 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 void
-NBJT2destroy(inModel)
-  GENmodel **inModel;
-
+NBJT2destroy(GENmodel **inModel)
 {

  NBJT2model **model = (NBJT2model **) inModel;
--- a/src/spicelib/devices/nbjt2/nbt2dump.c
+++ b/src/spicelib/devices/nbjt2/nbt2dump.c
@ -27,9 +27,7 @@ static int state_numDC = 0;
 static int state_numTR = 0;

 void
-NBJT2dump(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NBJT2dump(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
@ -93,10 +91,7 @@ NBJT2dump(inModel, ckt)

 static
 void 
-NBJT2putHeader(file, ckt, inst)
-  FILE *file;
-  CKTcircuit *ckt;
-  NBJT2instance *inst;
+NBJT2putHeader(FILE *file, CKTcircuit *ckt, NBJT2instance *inst)
 {
  char *reference;
  double refVal = 0.0;
@ -154,10 +149,7 @@ NBJT2putHeader(file, ckt, inst)
 }

 void
-NBJT2acct(inModel, ckt, file)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  FILE *file;
+NBJT2acct(GENmodel *inModel, CKTcircuit *ckt, FILE *file)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
--- a/src/spicelib/devices/nbjt2/nbt2load.c
+++ b/src/spicelib/devices/nbjt2/nbt2load.c
@ -31,9 +31,7 @@ extern int TWOacDebug;


 int
-NBJT2load(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NBJT2load(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
@ -482,8 +480,7 @@ NBJT2load(inModel, ckt)
 }

 int
-NBJT2initSmSig(inst)
-  NBJT2instance *inst;
+NBJT2initSmSig(NBJT2instance *inst)
 {
  SPcomplex yIeVce, yIeVbe;
  SPcomplex yIcVce, yIcVbe;
--- a/src/spicelib/devices/nbjt2/nbt2mdel.c
+++ b/src/spicelib/devices/nbjt2/nbt2mdel.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJT2mDelete(inModel, modname, kill)
-  GENmodel **inModel;
-  IFuid modname;
-  GENmodel *kill;
-
+NBJT2mDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
 {

  NBJT2model **model = (NBJT2model **) inModel;
--- a/src/spicelib/devices/nbjt2/nbt2mpar.c
+++ b/src/spicelib/devices/nbjt2/nbt2mpar.c
@ -15,10 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJT2mParam(param, value, inModel)
-  int param;
-  IFvalue *value;
-  GENmodel *inModel;
+NBJT2mParam(int param, IFvalue *value, GENmodel *inModel)
 {
  switch (param) {
  case NBJT2_MOD_NBJT:
--- a/src/spicelib/devices/nbjt2/nbt2parm.c
+++ b/src/spicelib/devices/nbjt2/nbt2parm.c
@ -15,11 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NBJT2param(param, value, inInst, select)
-  int param;
-  IFvalue *value;
-  GENinstance *inInst;
-  IFvalue *select;
+NBJT2param(int param, IFvalue *value, GENinstance *inInst, IFvalue *select)
 {
  register NBJT2instance *inst = (NBJT2instance *) inInst;
  switch (param) {
--- a/src/spicelib/devices/nbjt2/nbt2pzld.c
+++ b/src/spicelib/devices/nbjt2/nbt2pzld.c
@ -17,10 +17,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int TWOacDebug;

 int
-NBJT2pzLoad(inModel, ckt, s)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  SPcomplex *s;
+NBJT2pzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
--- a/src/spicelib/devices/nbjt2/nbt2set.c
+++ b/src/spicelib/devices/nbjt2/nbt2set.c
@ -25,11 +25,7 @@ if (size && (!(var =(type *)calloc(1, (unsigned)(size)*sizeof(type))))) {\
 }

 int 
-NBJT2setup(matrix, inModel, ckt, states)
-  register SMPmatrix *matrix;
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  int *states;
+NBJT2setup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
 /*
 * load the structure with those pointers needed later for fast matrix
 * loading
--- a/src/spicelib/devices/nbjt2/nbt2temp.c
+++ b/src/spicelib/devices/nbjt2/nbt2temp.c
@ -18,9 +18,7 @@ Author:	1992 David A. Gates, U. C. Berkeley CAD Group
 #define NIL(type)   ((type *)0)

 int
-NBJT2temp(inModel, ckt)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
+NBJT2temp(GENmodel *inModel, CKTcircuit *ckt)
 /*
 * perform the temperature update
 */
--- a/src/spicelib/devices/nbjt2/nbt2trun.c
+++ b/src/spicelib/devices/nbjt2/nbt2trun.c
@ -19,11 +19,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group


 int
-NBJT2trunc(inModel, ckt, timeStep)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  double *timeStep;
-
+NBJT2trunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
  register NBJT2model *model = (NBJT2model *) inModel;
  register NBJT2instance *inst;
--- a/src/spicelib/devices/numd/numdacld.c
+++ b/src/spicelib/devices/numd/numdacld.c
@ -22,9 +22,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int ONEacDebug; 

 int
-NUMDacLoad(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMDacLoad(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
--- a/src/spicelib/devices/numd/numdask.c
+++ b/src/spicelib/devices/numd/numdask.c
@ -20,12 +20,7 @@ extern int NUMDinitSmSig(NUMDinstance *);

 /* ARGSUSED */
 int
-NUMDask(ckt, inInst, which, value, select)
-  CKTcircuit *ckt;
-  GENinstance *inInst;
-  int which;
-  IFvalue *value;
-  IFvalue *select;
+NUMDask(CKTcircuit *ckt, GENinstance *inInst, int which, IFvalue *value, IFvalue *select)
 {
  NUMDinstance *inst = (NUMDinstance *) inInst;

--- a/src/spicelib/devices/numd/numddel.c
+++ b/src/spicelib/devices/numd/numddel.c
@ -9,11 +9,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMDdelete(inModel, name, kill)
-  GENmodel *inModel;
-  IFuid name;
-  GENinstance **kill;
-
+NUMDdelete(GENmodel *inModel, IFuid name, GENinstance **kill)
 {

  NUMDmodel *model = (NUMDmodel *) inModel;
--- a/src/spicelib/devices/numd/numddest.c
+++ b/src/spicelib/devices/numd/numddest.c
@ -15,8 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 void
-NUMDdestroy(inModel)
-  GENmodel **inModel;
+NUMDdestroy(GENmodel **inModel)
 {

  NUMDmodel **model = (NUMDmodel **) inModel;
--- a/src/spicelib/devices/numd/numddump.c
+++ b/src/spicelib/devices/numd/numddump.c
@ -26,9 +26,7 @@ static int state_numDC = 0;
 static int state_numTR = 0;

 void
-NUMDdump(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMDdump(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
@ -92,10 +90,7 @@ NUMDdump(inModel, ckt)

 static
 void 
-NUMDputHeader(file, ckt, inst)
-  FILE *file;
-  CKTcircuit *ckt;
-  NUMDinstance *inst;
+NUMDputHeader(FILE *file, CKTcircuit *ckt, NUMDinstance *inst)
 {
  char *reference;
  double refVal = 0.0;
@ -140,10 +135,7 @@ NUMDputHeader(file, ckt, inst)
 }

 void
-NUMDacct(inModel, ckt, file)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  FILE *file;
+NUMDacct(GENmodel *inModel, CKTcircuit *ckt, FILE *file)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
--- a/src/spicelib/devices/numd/numdload.c
+++ b/src/spicelib/devices/numd/numdload.c
@ -27,9 +27,7 @@ extern int ONEacDebug;


 int
-NUMDload(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMDload(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
@ -377,8 +375,7 @@ NUMDload(inModel, ckt)
 }

 int
-NUMDinitSmSig(inst)
-  NUMDinstance *inst;
+NUMDinitSmSig(NUMDinstance *inst)
 {
  SPcomplex yd;
  double omega = inst->NUMDmodPtr->NUMDmethods->METHomega;
--- a/src/spicelib/devices/numd/numdmdel.c
+++ b/src/spicelib/devices/numd/numdmdel.c
@ -9,10 +9,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMDmDelete(inModel, modname, kill)
-  GENmodel **inModel;
-  IFuid modname;
-  GENmodel *kill;
+NUMDmDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
 {

  NUMDmodel **model = (NUMDmodel **) inModel;
--- a/src/spicelib/devices/numd/numdmpar.c
+++ b/src/spicelib/devices/numd/numdmpar.c
@ -15,10 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMDmParam(param, value, inModel)
-  int param;
-  IFvalue *value;
-  GENmodel *inModel;
+NUMDmParam(int param, IFvalue *value, GENmodel *inModel)
 {
  switch (param) {
  case NUMD_MOD_NUMD:
--- a/src/spicelib/devices/numd/numdparm.c
+++ b/src/spicelib/devices/numd/numdparm.c
@ -11,11 +11,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMDparam(param, value, inInst, select)
-  int param;
-  IFvalue *value;
-  GENinstance *inInst;
-  IFvalue *select;
+NUMDparam(int param, IFvalue *value, GENinstance *inInst, IFvalue *select)
 {
  NUMDinstance *inst = (NUMDinstance *) inInst;
  switch (param) {
--- a/src/spicelib/devices/numd/numdpzld.c
+++ b/src/spicelib/devices/numd/numdpzld.c
@ -16,10 +16,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int ONEacDebug;

 int
-NUMDpzLoad(inModel, ckt, s)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  SPcomplex *s;
+NUMDpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
--- a/src/spicelib/devices/numd/numdtemp.c
+++ b/src/spicelib/devices/numd/numdtemp.c
@ -17,9 +17,7 @@ Author:	1992 David A. Gates, U. C. Berkeley CAD Group
 #define NIL(type)   ((type *)0)

 int 
-NUMDtemp(inModel, ckt)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
+NUMDtemp(GENmodel *inModel, CKTcircuit *ckt)
 /*
 * perform the temperature update to the diode
 */
--- a/src/spicelib/devices/numd/numdtrun.c
+++ b/src/spicelib/devices/numd/numdtrun.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group


 int
-NUMDtrunc(inModel, ckt, timeStep)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  double *timeStep;
-
+NUMDtrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
  register NUMDmodel *model = (NUMDmodel *) inModel;
  register NUMDinstance *inst;
--- a/src/spicelib/devices/numd2/nud2acld.c
+++ b/src/spicelib/devices/numd2/nud2acld.c
@ -23,9 +23,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int TWOacDebug;

 int
-NUMD2acLoad(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMD2acLoad(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
--- a/src/spicelib/devices/numd2/nud2ask.c
+++ b/src/spicelib/devices/numd2/nud2ask.c
@ -19,12 +19,7 @@ extern int NUMD2initSmSig(NUMD2instance *);

 /* ARGSUSED */
 int
-NUMD2ask(ckt, inInst, which, value, select)
-  CKTcircuit *ckt;
-  GENinstance *inInst;
-  int which;
-  IFvalue *value;
-  IFvalue *select;
+NUMD2ask(CKTcircuit *ckt, GENinstance *inInst, int which, IFvalue *value, IFvalue *select)
 {
  NUMD2instance *inst = (NUMD2instance *) inInst;
  switch (which) {
--- a/src/spicelib/devices/numd2/nud2del.c
+++ b/src/spicelib/devices/numd2/nud2del.c
@ -9,10 +9,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMD2delete(inModel, name, kill)
-  GENmodel *inModel;
-  IFuid name;
-  GENinstance **kill;
+NUMD2delete(GENmodel *inModel, IFuid name, GENinstance **kill)
 {
  NUMD2model *model = (NUMD2model *) inModel;
  NUMD2instance **fast = (NUMD2instance **) kill;
--- a/src/spicelib/devices/numd2/nud2dest.c
+++ b/src/spicelib/devices/numd2/nud2dest.c
@ -16,8 +16,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 void
-NUMD2destroy(inModel)
-  GENmodel **inModel;
+NUMD2destroy(GENmodel **inModel)
 {

  NUMD2model **model = (NUMD2model **) inModel;
--- a/src/spicelib/devices/numd2/nud2dump.c
+++ b/src/spicelib/devices/numd2/nud2dump.c
@ -27,9 +27,7 @@ static int state_numDC = 0;
 static int state_numTR = 0;

 void
-NUMD2dump(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMD2dump(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
@ -93,10 +91,7 @@ NUMD2dump(inModel, ckt)

 static
 void 
-NUMD2putHeader(file, ckt, inst)
-  FILE *file;
-  CKTcircuit *ckt;
-  NUMD2instance *inst;
+NUMD2putHeader(FILE *file, CKTcircuit *ckt, NUMD2instance *inst)
 {
  char *reference;
  double refVal = 0.0;
@ -141,10 +136,7 @@ NUMD2putHeader(file, ckt, inst)
 }

 void
-NUMD2acct(inModel, ckt, file)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  FILE *file;
+NUMD2acct(GENmodel *inModel, CKTcircuit *ckt, FILE *file)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
--- a/src/spicelib/devices/numd2/nud2load.c
+++ b/src/spicelib/devices/numd2/nud2load.c
@ -30,10 +30,7 @@ extern int TWOtranDebug;
 extern int TWOacDebug;

 int
-NUMD2load(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-
+NUMD2load(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
@ -392,8 +389,7 @@ NUMD2load(inModel, ckt)
 }

 int
-NUMD2initSmSig(inst)
-  NUMD2instance *inst;
+NUMD2initSmSig(NUMD2instance *inst)
 {
  SPcomplex yd;
  double omega = inst->NUMD2modPtr->NUMD2methods->METHomega;
--- a/src/spicelib/devices/numd2/nud2mdel.c
+++ b/src/spicelib/devices/numd2/nud2mdel.c
@ -9,11 +9,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMD2mDelete(inModel, modname, kill)
-  GENmodel **inModel;
-  IFuid modname;
-  GENmodel *kill;
-
+NUMD2mDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
 {
  NUMD2model **model = (NUMD2model **) inModel;
  NUMD2model *modfast = (NUMD2model *) kill;
--- a/src/spicelib/devices/numd2/nud2mpar.c
+++ b/src/spicelib/devices/numd2/nud2mpar.c
@ -15,10 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMD2mParam(param, value, inModel)
-  int param;
-  IFvalue *value;
-  GENmodel *inModel;
+NUMD2mParam(int param, IFvalue *value, GENmodel *inModel)
 {
  switch (param) {
  case NUMD2_MOD_NUMD:
--- a/src/spicelib/devices/numd2/nud2parm.c
+++ b/src/spicelib/devices/numd2/nud2parm.c
@ -11,11 +11,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMD2param(param, value, inInst, select)
-  int param;
-  IFvalue *value;
-  GENinstance *inInst;
-  IFvalue *select;
+NUMD2param(int param, IFvalue *value, GENinstance *inInst, IFvalue *select)
 {
  NUMD2instance *inst = (NUMD2instance *) inInst;
  switch (param) {
--- a/src/spicelib/devices/numd2/nud2pzld.c
+++ b/src/spicelib/devices/numd2/nud2pzld.c
@ -17,10 +17,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int TWOacDebug;

 int
-NUMD2pzLoad(inModel, ckt, s)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  SPcomplex *s;
+NUMD2pzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
--- a/src/spicelib/devices/numd2/nud2set.c
+++ b/src/spicelib/devices/numd2/nud2set.c
@ -25,11 +25,7 @@ if (size && (!(var =(type *)calloc(1, (unsigned)(size)*sizeof(type))))) {\
 }

 int
-NUMD2setup(matrix, inModel, ckt, states)
-  register SMPmatrix *matrix;
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  int *states;
+NUMD2setup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
 /*
 * load the structure with those pointers needed later for fast matrix
 * loading
--- a/src/spicelib/devices/numd2/nud2temp.c
+++ b/src/spicelib/devices/numd2/nud2temp.c
@ -18,9 +18,7 @@ Author:	1992 David A. Gates, U. C. Berkeley CAD Group
 #define NIL(type)   ((type *)0)

 int
-NUMD2temp(inModel, ckt)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
+NUMD2temp(GENmodel *inModel, CKTcircuit *ckt)
 /*
 * perform the temperature update
 */
--- a/src/spicelib/devices/numd2/nud2trun.c
+++ b/src/spicelib/devices/numd2/nud2trun.c
@ -13,10 +13,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "cidersupt.h"

 int
-NUMD2trunc(inModel, ckt, timeStep)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  double *timeStep;
+NUMD2trunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
  register NUMD2model *model = (NUMD2model *) inModel;
  register NUMD2instance *inst;
--- a/src/spicelib/devices/numos/nummacld.c
+++ b/src/spicelib/devices/numos/nummacld.c
@ -22,9 +22,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 extern int TWOacDebug;

 int
-NUMOSacLoad(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMOSacLoad(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;
--- a/src/spicelib/devices/numos/nummask.c
+++ b/src/spicelib/devices/numos/nummask.c
@ -17,12 +17,7 @@ extern int NUMOSinitSmSig(NUMOSinstance *);

 /* ARGSUSED */
 int
-NUMOSask(ckt, inInst, which, value, select)
-  CKTcircuit *ckt;
-  GENinstance *inInst;
-  int which;
-  IFvalue *value;
-  IFvalue *select;
+NUMOSask(CKTcircuit *ckt, GENinstance *inInst, int which, IFvalue *value, IFvalue *select)
 {
  NUMOSinstance *inst = (NUMOSinstance *) inInst;
  switch (which) {
--- a/src/spicelib/devices/numos/nummdel.c
+++ b/src/spicelib/devices/numos/nummdel.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMOSdelete(inModel, name, kill)
-  GENmodel *inModel;
-  IFuid name;
-  GENinstance **kill;
-
+NUMOSdelete(GENmodel *inModel, IFuid name, GENinstance **kill)
 {

  NUMOSmodel *model = (NUMOSmodel *) inModel;
--- a/src/spicelib/devices/numos/nummdest.c
+++ b/src/spicelib/devices/numos/nummdest.c
@ -15,9 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 void
-NUMOSdestroy(inModel)
-  GENmodel **inModel;
-
+NUMOSdestroy(GENmodel **inModel)
 {

  NUMOSmodel **model = (NUMOSmodel **) inModel;
--- a/src/spicelib/devices/numos/nummdump.c
+++ b/src/spicelib/devices/numos/nummdump.c
@ -27,9 +27,7 @@ static int state_numDC = 0;
 static int state_numTR = 0;

 void
-NUMOSdump(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMOSdump(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;
@ -93,10 +91,7 @@ NUMOSdump(inModel, ckt)

 static
 void
-NUMOSputHeader(file, ckt, inst)
-  FILE *file;
-  CKTcircuit *ckt;
-  NUMOSinstance *inst;
+NUMOSputHeader(FILE *file, CKTcircuit *ckt, NUMOSinstance *inst)
 {
  char *reference;
  double refVal = 0.0;
@ -155,10 +150,7 @@ NUMOSputHeader(file, ckt, inst)
 }

 void
-NUMOSacct(inModel, ckt, file)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  FILE *file;
+NUMOSacct(GENmodel *inModel, CKTcircuit *ckt, FILE *file)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;
--- a/src/spicelib/devices/numos/nummload.c
+++ b/src/spicelib/devices/numos/nummload.c
@ -31,9 +31,7 @@ extern int TWOacDebug;
 int NUMOSinitSmSig(NUMOSinstance *inst);

 int
-NUMOSload(inModel, ckt)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
+NUMOSload(GENmodel *inModel, CKTcircuit *ckt)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;
@ -599,8 +597,7 @@ NUMOSload(inModel, ckt)
 }

 int
-NUMOSinitSmSig(inst)
-  NUMOSinstance *inst;
+NUMOSinitSmSig(NUMOSinstance *inst)
 {
  struct mosAdmittances yAc;
  double omega = inst->NUMOSmodPtr->NUMOSmethods->METHomega;
--- a/src/spicelib/devices/numos/nummmdel.c
+++ b/src/spicelib/devices/numos/nummmdel.c
@ -14,11 +14,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMOSmDelete(inModel, modname, kill)
-  GENmodel **inModel;
-  IFuid modname;
-  GENmodel *kill;
-
+NUMOSmDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
 {

  NUMOSmodel **model = (NUMOSmodel **) inModel;
--- a/src/spicelib/devices/numos/nummmpar.c
+++ b/src/spicelib/devices/numos/nummmpar.c
@ -15,10 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMOSmParam(param, value, inModel)
-  int param;
-  IFvalue *value;
-  GENmodel *inModel;
+NUMOSmParam(int param, IFvalue *value, GENmodel *inModel)
 {
  switch (param) {
  case NUMOS_MOD_NUMOS:
--- a/src/spicelib/devices/numos/nummparm.c
+++ b/src/spicelib/devices/numos/nummparm.c
@ -15,11 +15,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group
 #include "suffix.h"

 int
-NUMOSparam(param, value, inInst, select)
-  int param;
-  IFvalue *value;
-  GENinstance *inInst;
-  IFvalue *select;
+NUMOSparam(int param, IFvalue *value, GENinstance *inInst, IFvalue *select)
 {
  register NUMOSinstance *inst = (NUMOSinstance *) inInst;
  switch (param) {
--- a/src/spicelib/devices/numos/nummpzld.c
+++ b/src/spicelib/devices/numos/nummpzld.c
@ -18,11 +18,7 @@ extern int TWOacDebug;


 int
-NUMOSpzLoad(inModel, ckt, s)
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  SPcomplex *s;
-
+NUMOSpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;
--- a/src/spicelib/devices/numos/nummset.c
+++ b/src/spicelib/devices/numos/nummset.c
@ -25,11 +25,7 @@ if (size && (!(var =(type *)calloc(1, (unsigned)(size)*sizeof(type))))) {\
 }

 int
-NUMOSsetup(matrix, inModel, ckt, states)
-  register SMPmatrix *matrix;
-  GENmodel *inModel;
-  CKTcircuit *ckt;
-  int *states;
+NUMOSsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
 /*
 * load the structure with those pointers needed later for fast matrix
 * loading
--- a/src/spicelib/devices/numos/nummtemp.c
+++ b/src/spicelib/devices/numos/nummtemp.c
@ -18,9 +18,7 @@ Author:	1991 David A. Gates, U. C. Berkeley CAD Group
 #define NIL(type)   ((type *)0)

 int
-NUMOStemp(inModel, ckt)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
+NUMOStemp(GENmodel *inModel, CKTcircuit *ckt)
 /*
 * perform the temperature update
 */
--- a/src/spicelib/devices/numos/nummtrun.c
+++ b/src/spicelib/devices/numos/nummtrun.c
@ -19,10 +19,7 @@ Author:	1987 Kartikeya Mayaram, U. C. Berkeley CAD Group


 int
-NUMOStrunc(inModel, ckt, timeStep)
-  GENmodel *inModel;
-  register CKTcircuit *ckt;
-  double *timeStep;
+NUMOStrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
  register NUMOSmodel *model = (NUMOSmodel *) inModel;
  register NUMOSinstance *inst;