summaryrefslogtreecommitdiff
path: root/x2p/walk.c
diff options
context:
space:
mode:
authorAndy Dougherty <doughera@lafcol.lafayette.edu>1995-01-18 02:37:01 +0000
committerAndy Dougherty <doughera@lafcol.lafayette.edu>1995-01-18 02:37:01 +0000
commit9c8d0b29b7bd1493cc1d95591b17902820e5579c (patch)
treef8671d758a3a5d07d4fef72c609650aa9af8f7e1 /x2p/walk.c
parentf4cb4c40de81ad9c5a8e775c2298ec5a52130124 (diff)
downloadperl-9c8d0b29b7bd1493cc1d95591b17902820e5579c.tar.gz
perl5.000 patch.0e: fix various non-broken things in the x2p/ directory
This patch fixes various non-broken things in the x2p/ directory. Mostly, I've supplied function prototypes to satisfy particularly picky compilers. I've also updated Makefile.SH to know that the byacc-generated a2p.c is now included with the distribution so that we no longer need to go looking for yacc/bison/byacc and deal with various library issues or command line options to support those various compiler compilers. I've included a2p.c generated by byacc-1.9. Larry, feel free to use your own from byacc-1.8 instead.
Diffstat (limited to 'x2p/walk.c')
-rw-r--r--x2p/walk.c21
1 files changed, 16 insertions, 5 deletions
diff --git a/x2p/walk.c b/x2p/walk.c
index 26e89ae5bd..e4cca450ee 100644
--- a/x2p/walk.c
+++ b/x2p/walk.c
@@ -8,10 +8,9 @@
* $Log: walk.c,v $
*/
-#include "handy.h"
#include "EXTERN.h"
-#include "util.h"
#include "a2p.h"
+#include "util.h"
bool exitval = FALSE;
bool realexit = FALSE;
@@ -27,6 +26,15 @@ char *limit;
STR *subs;
STR *curargs = Nullstr;
+void addsemi _(( STR *str ));
+void emit_split _(( STR *str, int level ));
+void fixtab _(( STR *str, int lvl ));
+void numericize _(( int node ));
+int prewalk _(( int numit, int level, int node, int *numericptr ));
+void tab _(( STR *str, int lvl ));
+STR * walk _(( int useval, int level, int node, int *numericptr, int minprec ));
+
+
STR *
walk(useval,level,node,numericptr,minprec)
int useval;
@@ -1547,6 +1555,7 @@ sub Pick {\n\
return str;
}
+void
tab(str,lvl)
register STR *str;
register int lvl;
@@ -1559,6 +1568,7 @@ register int lvl;
str_cat(str," ");
}
+void
fixtab(str,lvl)
register STR *str;
register int lvl;
@@ -1578,6 +1588,7 @@ register int lvl;
tab(str,lvl);
}
+void
addsemi(str)
register STR *str;
{
@@ -1590,6 +1601,7 @@ register STR *str;
str_cat(str,";");
}
+void
emit_split(str,level)
register STR *str;
int level;
@@ -1624,6 +1636,7 @@ int level;
tab(str,level);
}
+int
prewalk(numit,level,node,numericptr)
int numit;
int level;
@@ -1633,8 +1646,6 @@ int *numericptr;
register int len;
register int type;
register int i;
- char *t;
- char *d, *s;
int numarg;
int numeric = FALSE;
STR *tmpstr;
@@ -2046,12 +2057,12 @@ int *numericptr;
return 1;
}
+void
numericize(node)
register int node;
{
register int len;
register int type;
- register int i;
STR *tmpstr;
STR *tmp2str;
int numarg;