From 4016ce082328301f465b4a147798c74742c11d67 Mon Sep 17 00:00:00 2001
From: Douglas Guptill <douglas.guptill@dal.ca>
Date: Wed, 3 Jun 2009 23:44:05 +0000
Subject: [PATCH] add prototypes

---
 NN/stack.c     | 15 +++++++++++++++
 NN/stackpair.c | 11 +++++++++++
 NN/volume.c    | 23 +++++++++++++++++++----
 3 files changed, 45 insertions(+), 4 deletions(-)

diff --git a/NN/stack.c b/NN/stack.c
index ca9f1f10..00593c59 100644
--- a/NN/stack.c
+++ b/NN/stack.c
@@ -4,6 +4,9 @@
 	{ int key; struct node *next; };
 	static struct node *head, *z, *t;
 
+void stackinit_();
+void stackinit();
+
         void stackinit_() {stackinit();}
         void stackinit() 
 	   {
@@ -14,6 +17,9 @@
 	     z->key = 0;
 	   }
 
+void push_();
+void push();
+
         void push_(p) int *p; {push(p);}
 	void push(p)
            int *p;
@@ -25,6 +31,9 @@
 	     head->next =t;	
 	   }
 
+void pop();
+void pop_();
+
         void pop_(x) int *x; {pop(x);}
 	void pop(x)
            int *x;
@@ -34,6 +43,9 @@
 	     free(t);
 	   }
 
+void stackempty();
+void stackempty_();
+
         void stackempty_(i) int *i; {stackempty(i);}
 	void stackempty(i)
           int *i;
@@ -42,6 +54,9 @@
             if(head->next == z) *i = 1;
           }
 
+void stackflush_();
+void stackflush();
+
         void stackflush_() {stackflush();}
         void stackflush()
            {
diff --git a/NN/stackpair.c b/NN/stackpair.c
index a1803eef..31163539 100644
--- a/NN/stackpair.c
+++ b/NN/stackpair.c
@@ -5,6 +5,8 @@
 	static struct node *heada, *za, *ta;
 	static struct node *headb, *zb, *tb;
 
+void stackpairinit_();
+void stackpairinit();
         void stackpairinit_() {stackpairinit();}
 	void stackpairinit () 
 	   {
@@ -21,6 +23,8 @@
 	     zb->key = 0;
 	   }
 
+void stackpairflush_();
+void stackpairflush();
         void stackpairflush_() {stackpairflush();}
 	void stackpairflush () 
 	   {
@@ -30,6 +34,8 @@
              free(zb);
 	   }
 
+void pushpair_();
+void pushpair();
         void pushpair_(pa, pb)  int *pa; int *pb; {pushpair(pa, pb);}
 	void pushpair (pa, pb)
              int *pa;
@@ -48,6 +54,8 @@
 	     headb->next =tb;	
 	   }
 
+void poppair_();
+void poppair();
         void poppair_(xa,xb)  int *xa; int *xb; {poppair(xa,xb);}
 	void poppair (xa,xb)
              int *xa;
@@ -61,6 +69,9 @@
 	     free(tb);
 	   }
 
+void stackpairempty_();
+void stackpairempty();
+
         void stackpairempty_(i) int *i; {stackpairempty(i);}
 	void stackpairempty (i)
             int *i;
diff --git a/NN/volume.c b/NN/volume.c
index f4210a82..06994a8c 100644
--- a/NN/volume.c
+++ b/NN/volume.c
@@ -216,15 +216,16 @@ return(v);
 
 ----------------------------------------------------------------*/
 
-/*
-volume_(a,b,m,n,mmax,nmax,result)
+void volume_();
+void volume();
+
+void volume_(a,b,m,n,mmax,nmax,result)
      int   *n, *m, *mmax, *nmax;
      float *a, *b;
      float *result; 
 {
   volume (a,b,m,n,mmax,nmax,result);
 }
-*/
 
 void volume (a,b,m,n,mmax,nmax,result)
      int   *n, *m, *mmax, *nmax;
@@ -435,8 +436,10 @@ return(v);
 
 ----------------------------------------------------------------*/
 
+void volumeb_();
+void volumeb();
 
-void volumeb_ (a,b,m,n,mmax,nmax,opt,volume,dvdb) 
+void volumeb_(a,b,m,n,mmax,nmax,opt,volume,dvdb) 
      int   *n, *m, *mmax, *nmax, *opt;
      float *a, *b;
      float *volume; 
@@ -673,6 +676,9 @@ return(v);
 
 ----------------------------------------------------------------*/
 
+void volumebj_();
+void volumebj();
+
 void volumebj_ (a,b,m,n,mmax,nmax,con,volume,dvdb) 
      int   *n, *m, *mmax, *nmax,*con;
      float *a, *b;
@@ -1053,6 +1059,9 @@ return(v);
 ----------------------------------------------------------------*/
 /*  Not used...won't compile...function name and variable name (were) identical */
 
+void dvda_();
+void dvda();
+
 void dvda_ (a,b,m,n,mmax,nmax,idim,result,code) 
      int   *n, *m, *mmax, *nmax, *idim, *code;
      float *a, *b;
@@ -1256,6 +1265,9 @@ return(v);
 
 ----------------------------------------------------------------*/
 
+void volumef_();
+void volumef();
+
 void volumef_ (a,b,m,n,mmax,nmax,volume) 
      int   *n, *m, *mmax, *nmax;
      float *a, *b;
@@ -1636,6 +1648,9 @@ return(v);
 
 ----------------------------------------------------------------*/
 
+void dvdaf_();
+void dvdaf();
+
 void dvdaf_ (a,b,m,n,mmax,nmax,idim,dvda,code) 
      int   *n, *m, *mmax, *nmax, *idim, *code;
      float *a, *b;
-- 
GitLab