usr/src/cmd/neqn/funny.c

# include "e.h"
# include "e.def"

funny(n) int n; {
        char *f;

        yyval = oalloc();
        switch(n) {
        case SUM:
                f = "\\(*S"; break;
        case UNION:
                f = "\\(cu"; break;
        case INTER:     /* intersection */
                f = "\\(ca"; break;
        case PROD:
                f = "\\(*P"; break;
        default:
                error(FATAL, "funny type %d in funny", n);
        }
        printf(".ds %d %s\n", yyval, f);
        eht[yyval] = VERT(2);
        ebase[yyval] = 0;
        if(dbg)printf(".\tfunny: S%d <- %s; h=%d b=%d\n",
                yyval, f, eht[yyval], ebase[yyval]);
        lfont[yyval] = rfont[yyval] = ROM;
}