+ Better type checking in function tables.

diff --git a/lang/pc/comp/chk_expr.c b/lang/pc/comp/chk_expr.c
index 2d1f124..8a74b52 100644 (file)
--- a/lang/pc/comp/chk_expr.c
+++ b/lang/pc/comp/chk_expr.c
@@ -1383,7 +1383,7 @@ int (*ExprChkTable[])(struct node*) =
        NodeCrash
        };
 
-       int (*VarAccChkTable[])() =
+       int (*VarAccChkTable[])(struct node*) =
        {
                no_var_access,
                ChkLinkOrName,

diff --git a/lang/pc/comp/chk_expr.h b/lang/pc/comp/chk_expr.h
index 396ee8f..77f2999 100644 (file)
--- a/lang/pc/comp/chk_expr.h
+++ b/lang/pc/comp/chk_expr.h
@@ -2,11 +2,11 @@
 
 struct node;
 
-extern int     (*ExprChkTable[])();    /* table of expression checking
+extern int     (*ExprChkTable[])(struct node*);        /* table of expression checking
                                           functions, indexed by node class
                                        */
 
-extern int     (*VarAccChkTable[])();  /* table of variable-access checking
+extern int     (*VarAccChkTable[])(struct node*);      /* table of variable-access checking
                                           functions, indexed by node class
                                        */