BSD 4_4 release
[unix-history] / usr / src / old / eqn / common_source / funny.c
index a1c019f..938cec3 100644 (file)
@@ -1,4 +1,15 @@
-/*     funny.c 4.1     83/02/11        */
+/*-
+ * Copyright (c) 1991 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * This module is believed to contain source code proprietary to AT&T.
+ * Use and redistribution is subject to the Berkeley Software License
+ * Agreement and your Software Agreement with AT&T (Western Electric).
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)funny.c    4.4 (Berkeley) 4/17/91";
+#endif /* not lint */
 
 # include "e.h"
 # include "e.def"
 
 # include "e.h"
 # include "e.def"
@@ -19,9 +30,15 @@ funny(n) int n; {
        default:
                error(FATAL, "funny type %d in funny", n);
        }
        default:
                error(FATAL, "funny type %d in funny", n);
        }
+#ifndef NEQN
        printf(".ds %d \\s%d\\v'.3m'\\s+5%s\\s-5\\v'-.3m'\\s%d\n", yyval, ps, f, ps);
        eht[yyval] = VERT( (ps+5)*6 -(ps*6*2)/10 );
        ebase[yyval] = VERT( (ps*6*3)/10 );
        printf(".ds %d \\s%d\\v'.3m'\\s+5%s\\s-5\\v'-.3m'\\s%d\n", yyval, ps, f, ps);
        eht[yyval] = VERT( (ps+5)*6 -(ps*6*2)/10 );
        ebase[yyval] = VERT( (ps*6*3)/10 );
+#else NEQN
+       printf(".ds %d %s\n", yyval, f);
+       eht[yyval] = VERT(2);
+       ebase[yyval] = 0;
+#endif NEQN
        if(dbg)printf(".\tfunny: S%d <- %s; h=%d b=%d\n", 
                yyval, f, eht[yyval], ebase[yyval]);
        lfont[yyval] = rfont[yyval] = ROM;
        if(dbg)printf(".\tfunny: S%d <- %s; h=%d b=%d\n", 
                yyval, f, eht[yyval], ebase[yyval]);
        lfont[yyval] = rfont[yyval] = ROM;