2.9BSD - /usr/src/local/seqn/funny.c

   1: # include "e.h"
   2: # include "e.def"
   3: 
   4: funny(n) int n; {
   5:     char *f;
   6: 
   7:     yyval = oalloc();
   8: /*	switch(n) {
   9: 	case SUM:
  10: 		f = "\\(*S"; break;
  11: 	case UNION:
  12: 		f = "\\(cu"; break;
  13: 	case INTER:
  14: 		f = "\\(ca"; break;
  15: 	case PROD:
  16: 		f = "\\(*P"; break;
  17: 	default:
  18: 		error(FATAL, "funny type %d in funny", n);
  19: 	}   removed by stan */
  20:     printf(".ds %d %s\n", yyval, f);
  21:     eht[yyval] = VERT(2);
  22:     ebase[yyval] = 0;
  23:     if(dbg)printf(".\tfunny: S%d <- %s; h=%d b=%d\n",
  24:         yyval, f, eht[yyval], ebase[yyval]);
  25:     lfont[yyval] = rfont[yyval] = ROM;
  26: }

Defined functions