=================================================================== RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/parse.c,v retrieving revision 1.2 retrieving revision 1.3 diff -c -r1.2 -r1.3 *** src/usr.bin/awk/parse.c 1997/08/25 16:17:13 1.2 --- src/usr.bin/awk/parse.c 1999/04/20 17:31:30 1.3 *************** *** 1,4 **** ! /* $OpenBSD: parse.c,v 1.2 1997/08/25 16:17:13 kstailey Exp $ */ /**************************************************************** Copyright (C) Lucent Technologies 1997 All Rights Reserved --- 1,4 ---- ! /* $OpenBSD: parse.c,v 1.3 1999/04/20 17:31:30 millert Exp $ */ /**************************************************************** Copyright (C) Lucent Technologies 1997 All Rights Reserved *************** *** 208,214 **** { Node *x; ! x = node4(PASTAT2, a, b, c, (Node *) paircnt); if (paircnt++ >= PA2NUM) ERROR "limited to %d pat,pat statements", PA2NUM SYNTAX; x->ntype = NSTAT; --- 208,214 ---- { Node *x; ! x = node4(PASTAT2, a, b, c, itonp(paircnt)); if (paircnt++ >= PA2NUM) ERROR "limited to %d pat,pat statements", PA2NUM SYNTAX; x->ntype = NSTAT; *************** *** 259,262 **** --- 259,272 ---- if (strcmp(((Cell *)(p->narg[0]))->nval, s) == 0) return n; return -1; + } + + int ptoi(void *p) /* convert pointer to integer */ + { + return (int) (long) p; /* swearing that p fits, of course */ + } + + Node *itonp(int i) /* and vice versa */ + { + return (Node *) (long) i; }