neither K&R or ANSI C allow untyped function declarations

SCCS-vsn: usr.bin/pascal/pdx/breakpoint.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/command.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/defs.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/machine.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/main.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/mappings.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/object.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/process.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/runtime.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/source.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/sym.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/symtab.h 5.2
SCCS-vsn: usr.bin/pascal/pdx/tree.h 5.3
SCCS-vsn: usr.bin/pascal/pdx/process/process.rep 5.4

diff --git a/usr/src/usr.bin/pascal/pdx/breakpoint.h b/usr/src/usr.bin/pascal/pdx/breakpoint.h
index 8642e2e..305d6f0 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/breakpoint.h
+++ b/usr/src/usr.bin/pascal/pdx/breakpoint.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)breakpoint.h        5.1 (Berkeley) %G%
+ *     @(#)breakpoint.h        5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -58,20 +58,20 @@ typedef enum { TRPRINT, TRSTOP } TRTYPE;
  * routines available from this module
  */
 
  * routines available from this module
  */
 

-addvar();              /* add a variable to the trace list */
-delvar();              /* delete a variable from the trace list */
-printvarnews();                /* print out variables that have changed */
-trfree();              /* free the entire trace list */
-addcond();             /* add a condition to the list */
-delcond();             /* delete a condition from the list */
+int addvar();          /* add a variable to the trace list */
+int delvar();          /* delete a variable from the trace list */
+int printvarnews();    /* print out variables that have changed */
+int trfree();          /* free the entire trace list */
+int addcond();         /* add a condition to the list */
+int delcond();         /* delete a condition from the list */

 BOOLEAN trcond();      /* determine if any trace condition is true */
 BOOLEAN stopcond();    /* determine if any stop condition is true */
 
 BOOLEAN trcond();      /* determine if any trace condition is true */
 BOOLEAN stopcond();    /* determine if any stop condition is true */
 

-addbp();               /* add a breakpoint */
-delbp();               /* delete a breakpoint, return FALSE if unsuccessful */
-bpfree();              /* free all breakpoint information */
-setallbps();           /* set traps for all breakpoints */
-unsetallbps();         /* remove traps at all breakpoints */
+int addbp();           /* add a breakpoint */
+int delbp();           /* delete a breakpoint, return FALSE if unsuccessful */
+int bpfree();          /* free all breakpoint information */
+int setallbps();       /* set traps for all breakpoints */
+int unsetallbps();     /* remove traps at all breakpoints */

 BOOLEAN bpact();       /* handle a breakpoint */
 BOOLEAN bpact();       /* handle a breakpoint */

-fixbps();              /* destroy temporary breakpoints left after a fault */
-status();              /* list items being traced */
+int fixbps();          /* destroy temporary breakpoints left after a fault */
+int status();          /* list items being traced */

diff --git a/usr/src/usr.bin/pascal/pdx/command.h b/usr/src/usr.bin/pascal/pdx/command.h
index 1a71fbb..765bf9e 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/command.h
+++ b/usr/src/usr.bin/pascal/pdx/command.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)command.h   5.2 (Berkeley) %G%
+ *     @(#)command.h   5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -16,10 +16,10 @@
 
 char *initfile;                /* file to read initial commands from */
 BOOLEAN nlflag;                /* for error and signal recovery */
 
 char *initfile;                /* file to read initial commands from */
 BOOLEAN nlflag;                /* for error and signal recovery */

-prompt();              /* print a prompt */
+int prompt();          /* print a prompt */

 int yyparse();         /* parser generated by yacc */
 int yyparse();         /* parser generated by yacc */

-lexinit();             /* initialize debugger symbol table */
-gobble();              /* eat input up to a newline for error recovery */
-remake();              /* recompile program, read in new namelist */
-alias();               /* create an alias */
+int lexinit();         /* initialize debugger symbol table */
+int gobble();          /* eat input up to a newline for error recovery */
+int remake();          /* recompile program, read in new namelist */
+int alias();           /* create an alias */

 BOOLEAN isstdin();     /* input is from standard input */
 BOOLEAN isstdin();     /* input is from standard input */

diff --git a/usr/src/usr.bin/pascal/pdx/defs.h b/usr/src/usr.bin/pascal/pdx/defs.h
index f8d691a..9550e2f 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/defs.h
+++ b/usr/src/usr.bin/pascal/pdx/defs.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)defs.h      5.2 (Berkeley) %G%
+ *     @(#)defs.h      5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -55,8 +55,8 @@ char *cmdname;                        /* name of command for error messages */
 char *errfilename;             /* current file associated with error */
 short errlineno;               /* line number associated with error */
 
 char *errfilename;             /* current file associated with error */
 short errlineno;               /* line number associated with error */
 

-error();                       /* print an error message */
-panic();                       /* print error message and exit */
+int error();                   /* print an error message */
+int panic();                   /* print error message and exit */

 short numerrors();             /* return number of errors since last call */
 
 /*
 short numerrors();             /* return number of errors since last call */
 
 /*

diff --git a/usr/src/usr.bin/pascal/pdx/machine.h b/usr/src/usr.bin/pascal/pdx/machine.h
index 61cb86a..41aba82 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/machine.h
+++ b/usr/src/usr.bin/pascal/pdx/machine.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)machine.h   5.2 (Berkeley) %G%
+ *     @(#)machine.h   5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -18,11 +18,11 @@ ADDRESS pc;                 /* current program counter */
 LINENO curline;                        /* line number associated with pc */
 SYM *curfunc;                  /* pointer to active function symbol */
 
 LINENO curline;                        /* line number associated with pc */
 SYM *curfunc;                  /* pointer to active function symbol */
 

-setbp();                       /* set a breakpoint */
-unsetbp();                     /* unset a breakpoint */
+int setbp();                   /* set a breakpoint */
+int unsetbp();                 /* unset a breakpoint */

 BOOLEAN isbperr();             /* test if a breakpoint has occurred */
 BOOLEAN isbperr();             /* test if a breakpoint has occurred */

-printerror();                  /* print out an execution error message */
+int printerror();              /* print out an execution error message */

 ADDRESS nextaddr();            /* address of next line to be executed */
 BOOLEAN isendofproc();         /* test if address is at end of procedure */
 ADDRESS nextaddr();            /* address of next line to be executed */
 BOOLEAN isendofproc();         /* test if address is at end of procedure */

-printinst(), printninst();     /* print the instruction at a given address */
-printdata(), printndata();     /* print the contents of a given data address */
+int printinst(), printninst(); /* print the instruction at a given address */
+int printdata(), printndata(); /* print the contents of a given data address */

diff --git a/usr/src/usr.bin/pascal/pdx/main.h b/usr/src/usr.bin/pascal/pdx/main.h
index 2b02062..3c7ab32 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/main.h
+++ b/usr/src/usr.bin/pascal/pdx/main.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)main.h      5.2 (Berkeley) %G%
+ *     @(#)main.h      5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -19,7 +19,7 @@ BOOLEAN opt[26];      /* true if command line option given */
 #define option(c)      opt[(c)-'a']
 #define isterm(file)   (option('i') || isatty(fileno(file)))
 
 #define option(c)      opt[(c)-'a']
 #define isterm(file)   (option('i') || isatty(fileno(file)))
 

-main();                        /* debugger main routine */
-init();                        /* read in source and object data */
-erecover();            /* does non-local goto for error recovery */
-quit();                        /* clean-up before exiting */
+int main();            /* debugger main routine */
+int init();            /* read in source and object data */
+int erecover();                /* does non-local goto for error recovery */
+int quit();            /* clean-up before exiting */

diff --git a/usr/src/usr.bin/pascal/pdx/mappings.h b/usr/src/usr.bin/pascal/pdx/mappings.h
index 671d45d..3aaec8c 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/mappings.h
+++ b/usr/src/usr.bin/pascal/pdx/mappings.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)mappings.h  5.1 (Berkeley) %G%
+ *     @(#)mappings.h  5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -22,6 +22,6 @@ char *srcfilename();  /* get the nearest source file <= a given address */
 LINENO srcline();      /* get the nearest source line <= a given address */
 LINENO linelookup();   /* look for a line number with exactly given address */
 
 LINENO srcline();      /* get the nearest source line <= a given address */
 LINENO linelookup();   /* look for a line number with exactly given address */
 

-newfunc();             /* record the appearance of a new function */
+int newfunc();         /* record the appearance of a new function */

 SYM *whatblock();      /* find the function associated with an address */
 SYM *whatblock();      /* find the function associated with an address */

-clrfunctab();          /* re-initialize function table */
+int clrfunctab();      /* re-initialize function table */

diff --git a/usr/src/usr.bin/pascal/pdx/object.h b/usr/src/usr.bin/pascal/pdx/object.h
index 486eb59..87f9a15 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/object.h
+++ b/usr/src/usr.bin/pascal/pdx/object.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)object.h    5.1 (Berkeley) %G%
+ *     @(#)object.h    5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -26,5 +26,5 @@ struct {
 char *stringtab;       /* string table */
 char *dotpfile;                /* name of compiled file */
 
 char *stringtab;       /* string table */
 char *dotpfile;                /* name of compiled file */
 

-readobj();             /* read in the object file */
-objfree();             /* release storage for object file information */
+int readobj();         /* read in the object file */
+int objfree();         /* release storage for object file information */

diff --git a/usr/src/usr.bin/pascal/pdx/process.h b/usr/src/usr.bin/pascal/pdx/process.h
index f6c17de..cf8392f 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/process.h
+++ b/usr/src/usr.bin/pascal/pdx/process.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)process.h   5.1 (Berkeley) %G%
+ *     @(#)process.h   5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -17,21 +17,21 @@ typedef struct process PROCESS;
 
 PROCESS *process;
 
 
 PROCESS *process;
 

-initstart();           /* initial process start up */
-run();                 /* start program running */
-arginit();             /* initialize program arguments */
-setargs();             /* special argument handling */
-newarg();              /* add a new argument to list for program */
-inarg();               /* set standard input for program */
-outarg();              /* set standard output for program */
-cont();                        /* continue execution where last left off */
-step();                        /* single step */
-stepc();               /* single step command */
-stepto();              /* execute up to a given address */
-next();                        /* single step, skip over calls */
-endprogram();          /* note the termination of the program */
-printstatus();         /* print current error */
-printwhere();          /* print current source line and file */
+int initstart();       /* initial process start up */
+int run();             /* start program running */
+int arginit();         /* initialize program arguments */
+int setargs();         /* special argument handling */
+int newarg();          /* add a new argument to list for program */
+int inarg();           /* set standard input for program */
+int outarg();          /* set standard output for program */
+int cont();            /* continue execution where last left off */
+int step();            /* single step */
+int stepc();           /* single step command */
+int stepto();          /* execute up to a given address */
+int next();            /* single step, skip over calls */
+int endprogram();      /* note the termination of the program */
+int printstatus();     /* print current error */
+int printwhere();      /* print current source line and file */

 BOOLEAN isfinished();  /* TRUE if process has terminated */
 BOOLEAN isfinished();  /* TRUE if process has terminated */

-iread(), dread();      /* read from the process' address space */
-iwrite(), dwrite();    /* write to the process' address space */
+int iread(), dread();  /* read from the process' address space */
+int iwrite(), dwrite();        /* write to the process' address space */

diff --git a/usr/src/usr.bin/pascal/pdx/process/process.rep b/usr/src/usr.bin/pascal/pdx/process/process.rep
index 74ca367..54f1698 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/process/process.rep
+++ b/usr/src/usr.bin/pascal/pdx/process/process.rep
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)process.rep 5.3 (Berkeley) %G%
+ *     @(#)process.rep 5.4 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -60,12 +60,12 @@ struct process {
  * Process manipulation routines local to this module.
  */
 
  * Process manipulation routines local to this module.
  */
 

-pstart();                      /* start up a process */
-pcont();                       /* continue execution */
-pstep();                       /* single step */
-pio();                         /* process memory move */
-psigtrace();                   /* catch/don't catch a signal */
-unsetsigtraces();              /* don't catch any signals */
+int pstart();                  /* start up a process */
+int pcont();                   /* continue execution */
+int pstep();                   /* single step */
+int pio();                     /* process memory move */
+int psigtrace();               /* catch/don't catch a signal */
+int unsetsigtraces();          /* don't catch any signals */

 
 /*
  * These definitions are for the arguments to "pio".
 
 /*
  * These definitions are for the arguments to "pio".


@@ -78,5 +78,5 @@ typedef enum { TEXTSEG, DATASEG } PIO_SEG;
 
 #define        iread(buf, addr, nbytes)        dread(buf, addr+ENDOFF, nbytes)
 #define        iwrite(buf, addr, nbytes)       dwrite(buf, addr+ENDOFF, nbytes)
 
 #define        iread(buf, addr, nbytes)        dread(buf, addr+ENDOFF, nbytes)
 #define        iwrite(buf, addr, nbytes)       dwrite(buf, addr+ENDOFF, nbytes)

-#define dread(buf, addr, nbytes)       drdwr(PREAD, buf, addr, nbytes)
-#define dwrite(buf, addr, nbytes)      drdwr(PWRITE, buf, addr, nbytes)
+#define        dread(buf, addr, nbytes)        drdwr(PREAD, buf, addr, nbytes)
+#define        dwrite(buf, addr, nbytes)       drdwr(PWRITE, buf, addr, nbytes)

diff --git a/usr/src/usr.bin/pascal/pdx/runtime.h b/usr/src/usr.bin/pascal/pdx/runtime.h
index fac9ab5..eea63c3 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/runtime.h
+++ b/usr/src/usr.bin/pascal/pdx/runtime.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)runtime.h   5.1 (Berkeley) %G%
+ *     @(#)runtime.h   5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -18,13 +18,13 @@ ADDRESS entry_addr();               /* entry address of current proc/func */
 ADDRESS entry_point();         /* point where environment is setup */
 ADDRESS return_addr();         /* return address of current proc/func */
 ADDRESS caller_addr();         /* entry of caller of current proc/func */
 ADDRESS entry_point();         /* point where environment is setup */
 ADDRESS return_addr();         /* return address of current proc/func */
 ADDRESS caller_addr();         /* entry of caller of current proc/func */

-where();                       /* print out currently active procedures */
-dump();                                /* dump the world */
-callproc();                    /* call a procedure */
-procreturn();                  /* return from a "call"-ed procedure */
+int where();                   /* print out currently active procedures */
+int dump();                    /* dump the world */
+int callproc();                        /* call a procedure */
+int procreturn();              /* return from a "call"-ed procedure */

 ADDRESS address();             /* address of a variable */
 ADDRESS firstline();           /* address of first line in a procedure */
 ADDRESS address();             /* address of a variable */
 ADDRESS firstline();           /* address of first line in a procedure */

-findbeginning();               /* find address of beginning of a procedure */
-runtofirst();                  /* step to first line in current procedure */
+int findbeginning();           /* find address of beginning of a procedure */
+int runtofirst();              /* step to first line in current procedure */

 ADDRESS lastaddr();            /* address of last line in program */
 ADDRESS fparamaddr();          /* entry address of a function parameter */
 ADDRESS lastaddr();            /* address of last line in program */
 ADDRESS fparamaddr();          /* entry address of a function parameter */

diff --git a/usr/src/usr.bin/pascal/pdx/source.h b/usr/src/usr.bin/pascal/pdx/source.h
index 091dd98..d193c21 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/source.h
+++ b/usr/src/usr.bin/pascal/pdx/source.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)source.h    5.2 (Berkeley) %G%
+ *     @(#)source.h    5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -13,6 +13,6 @@
 char *cursource;               /* current source file name */
 LINENO lastlinenum;            /* last source line number */
 
 char *cursource;               /* current source file name */
 LINENO lastlinenum;            /* last source line number */
 

-skimsource();                  /* get seek pointers to source lines */
-chkline();                     /* checks to see that a line number is valid */
-printlines();                  /* print out from first line to second */
+int skimsource();              /* get seek pointers to source lines */
+int chkline();                 /* checks to see that a line number is valid */
+int printlines();              /* print out from first line to second */

diff --git a/usr/src/usr.bin/pascal/pdx/sym.h b/usr/src/usr.bin/pascal/pdx/sym.h
index 12eec00..6ec6485 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/sym.h
+++ b/usr/src/usr.bin/pascal/pdx/sym.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)sym.h       5.2 (Berkeley) %G%
+ *     @(#)sym.h       5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -48,15 +48,15 @@ NODE *dot();                        /* construct a tree for the dot operator */
 NODE *subscript();             /* construct a tree for subscripting */
 SYM *treetype();               /* return the type of a tree, checking also */
 long evalindex();              /* evaluate a subscript index */
 NODE *subscript();             /* construct a tree for subscripting */
 SYM *treetype();               /* return the type of a tree, checking also */
 long evalindex();              /* evaluate a subscript index */

-unmkstring();                  /* free a constant string type */
-chkboolean();                  /* check if a tree is boolean-valued */
-printdecl();                   /* print out a symbol's declaration */
-printparams();                 /* print out values of a fn's parameters */
-printentry();                  /* note entrance of a block */
-printexit();                   /* note exiting from a block */
-printcall();                   /* note call of a function */
-printval();                    /* print an eval result */
-printv();                      /* print the name and value of a variable */
-printwhich();                  /* print the full "path" of an identifier */
-maketypes();                   /* initialize basic types */
-make_keyword();                        /* create a keyword in a given symbol table */
+int unmkstring();              /* free a constant string type */
+int chkboolean();              /* check if a tree is boolean-valued */
+int printdecl();               /* print out a symbol's declaration */
+int printparams();             /* print out values of a fn's parameters */
+int printentry();              /* note entrance of a block */
+int printexit();               /* note exiting from a block */
+int printcall();               /* note call of a function */
+int printval();                        /* print an eval result */
+int printv();                  /* print the name and value of a variable */
+int printwhich();              /* print the full "path" of an identifier */
+int maketypes();               /* initialize basic types */
+int make_keyword();            /* create a keyword in a given symbol table */

diff --git a/usr/src/usr.bin/pascal/pdx/symtab.h b/usr/src/usr.bin/pascal/pdx/symtab.h
index d803492..5a688da 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/symtab.h
+++ b/usr/src/usr.bin/pascal/pdx/symtab.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)symtab.h    5.1 (Berkeley) %G%
+ *     @(#)symtab.h    5.2 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -13,10 +13,10 @@
 SYMTAB *symtab;
 
 SYMTAB *st_creat();            /* create a symbol table */
 SYMTAB *symtab;
 
 SYMTAB *st_creat();            /* create a symbol table */

-st_destroy();                  /* destroy a symbol table, i.e. free storage */
+int st_destroy();              /* destroy a symbol table, i.e. free storage */

 SYM *st_insert();              /* insert a symbol */
 SYM *st_lookup();              /* lookup a symbol */
 SYM *st_insert();              /* insert a symbol */
 SYM *st_lookup();              /* lookup a symbol */

-dumpvars();                    /* dump the symbols of a function */
-print_alias();                 /* print out currently active aliases */
-enter_alias();                 /* create a new name for a command */
+int dumpvars();                        /* dump the symbols of a function */
+int print_alias();             /* print out currently active aliases */
+int enter_alias();             /* create a new name for a command */

 SYM *findtype();               /* search symbol table for a type name */
 SYM *findtype();               /* search symbol table for a type name */

diff --git a/usr/src/usr.bin/pascal/pdx/tree.h b/usr/src/usr.bin/pascal/pdx/tree.h
index fdb3e99..b005233 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/tree.h
+++ b/usr/src/usr.bin/pascal/pdx/tree.h
@@ -3,7 +3,7 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  *

- *     @(#)tree.h      5.2 (Berkeley) %G%
+ *     @(#)tree.h      5.3 (Berkeley) %G%

  */
 
 /*
  */
 
 /*


@@ -41,10 +41,10 @@ STACK stack[];
 STACK *sp;
 
 NODE *build();         /* create a node in the parse tree */
 STACK *sp;
 
 NODE *build();         /* create a node in the parse tree */

-prtree();              /* print a tree in source form */
-eval();                        /* evaluate a tree, leaving value on stack */
+int prtree();          /* print a tree in source form */
+int eval();            /* evaluate a tree, leaving value on stack */

 long popsmall();       /* pop a small item from the stack given its type */
 long popsmall();       /* pop a small item from the stack given its type */

-tfree();               /* release storage for a tree */
+int tfree();           /* release storage for a tree */

 BOOLEAN tr_equal();    /* test if two trees are structurally equivalent */
 BOOLEAN cond();                /* evaluate a node for a conditional */
 ADDRESS lval();                /* return the object address of a node */
 BOOLEAN tr_equal();    /* test if two trees are structurally equivalent */
 BOOLEAN cond();                /* evaluate a node for a conditional */
 ADDRESS lval();                /* return the object address of a node */