fixed table entry for "defname" operator

SCCS-vsn: usr.bin/pascal/pdx/machine/optab.c 1.2

diff --git a/usr/src/usr.bin/pascal/pdx/machine/optab.c b/usr/src/usr.bin/pascal/pdx/machine/optab.c
index 4540392..fbc89d8 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/machine/optab.c
+++ b/usr/src/usr.bin/pascal/pdx/machine/optab.c
@@ -1,6 +1,6 @@
 /* Copyright (c) 1982 Regents of the University of California */
 
 /* Copyright (c) 1982 Regents of the University of California */
 

-static char sccsid[] = "@(#)optab.c 1.1 %G%";
+static char sccsid[] = "@(#)optab.c 1.2 %G%";

 
 /*
  * px opcode table
 
 /*
  * px opcode table


@@ -217,7 +217,7 @@ OPTAB optab[] ={
        { "put" },
        { "fnil" },
        { "badopnn" },
        { "put" },
        { "fnil" },
        { "badopnn" },

-       { "defname", PSUBOP, HWORD },
+       { "defname" },

        { "reset" },
        { "rewrite" },
        { "file" },
        { "reset" },
        { "rewrite" },
        { "file" },