Files
Arquivotheca.Solaris-2.5/lib/libplot/t4014/linemod.c
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

29 lines
534 B
C
Executable File

/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */
#ident "@(#)linemod.c 1.5 92/07/14 SMI" /* SVr4.0 1.2 */
linemod(s)
char *s;
{
char c;
putch(033);
switch(s[0]){
case 'l':
c = 'd';
break;
case 'd':
if(s[3] != 'd')c='a';
else c='b';
break;
case 's':
if(s[5] != '\0')c='c';
else c='`';
}
putch(c);
}