/********************************************************************** * Copyright (c) Digital Equipment Corporation 1984, 1985, 1986. * * All Rights Reserved. * * Reference "/usr/src/COPYRIGHT" for applicable restrictions. * **********************************************************************/ static char Sccsid[] = "@(#)funny.c 3.0 4/22/86"; # 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; }