projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
BSD 4_2 release
[unix-history]
/
usr
/
src
/
usr.lib
/
libplot
/
t4014
/
linemod.c
#ifndef lint
static char
sccsid
[] =
"@(#)linemod.c 4.1 (Berkeley) 6/27/83"
;
#endif
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
);
}