From: Keith Bostic <bostic@ucbvax.Berkeley.EDU>
Date: Tue, 2 Apr 1991 00:03:11 +0000 (-0800)
Subject: ANSI, const -> constant
X-Git-Tag: BSD-4_3_Net_2-Snapshot-Development~306
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/6ef0cf67a77ec305d06c89e4d690c54e386929be

ANSI, const -> constant

SCCS-vsn: usr.bin/f77/include.tahoe/defines.h 5.2
---

diff --git a/usr/src/usr.bin/f77/include.tahoe/defines.h b/usr/src/usr.bin/f77/include.tahoe/defines.h
index 0ae763e16f..1d6a19a6d4 100644
--- a/usr/src/usr.bin/f77/include.tahoe/defines.h
+++ b/usr/src/usr.bin/f77/include.tahoe/defines.h
@@ -223,7 +223,7 @@ typedef long int ftnint;
 #define ISERROR(z) (z->tag==TERROR)
 #define ISPLUSOP(z) (z->tag==TEXPR && z->exprblock.opcode==OPPLUS)
 #define ISSTAROP(z) (z->tag==TEXPR && z->exprblock.opcode==OPSTAR)
-#define ISONE(z) (ISICON(z) && z->constblock.const.ci==1)
+#define ISONE(z) (ISICON(z) && z->constblock.constant.ci==1)
 #define INT(z) ONEOF(z, MSKINT|MSKCHAR)
 #define ICON(z) mkintcon( (ftnint)(z) )