/*  * This file is part of the UCB release of Plan 9. It is subject to the license * terms in the LICENSE file found in the top-level directory of this * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No * part of the UCB release of Plan 9, including this file, may be copied, * modified, propagated, or distributed except according to the terms contained * in the LICENSE file. */ /* tt.c: subroutines for drawing horizontal lines */# include "t.h" intctype(int il, int ic){	if (instead[il])		return(0);	if (fullbot[il])		return(0);	il = stynum[il];	return(style[ic][il]);}  intmin(int a, int b){	return(a < b ? a : b);}  intfspan(int i, int c){	c++;	return(c < ncol && ctype(i, c) == 's');}  intlspan(int i, int c){	int	k; 	if (ctype(i, c) != 's') 		return(0);	c++;	if (c < ncol && ctype(i, c) == 's')		return(0);	for (k = 0; ctype(i, --c) == 's'; k++)		;	return(k);}  intctspan(int i, int c){	int	k;	c++;	for (k = 1; c < ncol && ctype(i, c) == 's'; k++)		c++;	return(k);}  voidtohcol(int ic){	if (ic == 0)		Bprint(&tabout, "\\h'|0'");	else		Bprint(&tabout, "\\h'(|\\n(%2su+|\\n(%2su)/2u'", reg(ic, CLEFT),		     reg(ic - 1, CRIGHT));}  intallh(int i){			/* return true if every element in line i is horizontal */				/* also at least one must be horizontl */	int	c, one, k; 	if (fullbot[i]) 		return(1);	if (i >= nlin) 		return(dboxflg || boxflg);	for (one = c = 0; c < ncol; c++) {		k = thish(i, c);		if (k == 0) 			return(0);		if (k == 1) 			continue;		one = 1;	}	return(one);}  intthish(int i, int c){	int	t;	char	*s;	struct colstr *pc; 	if (c < 0)		return(0);	if (i < 0) 		return(0);	t = ctype(i, c);	if (t == '_' || t == '-')		return('-');	if (t == '=')		return('=');	if (t == '^') 		return(1);	if (fullbot[i] )		return(fullbot[i]);	if (t == 's') 		return(thish(i, c - 1));	if (t == 0) 		return(1);	pc = &table[i][c];	s = (t == 'a' ? pc->rcol : pc->col);	if (s == 0 || (point(s) && *s == 0))		return(1);	if (vspen(s)) 		return(1);	if (t = barent( s))		return(t);	return(0);}