aboutsummaryrefslogtreecommitdiff
path: root/COSMIC/srmtrblk.c
blob: b4cb809ec52590e2220b2cad158d4e5a0911db60 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include <stdio.h>
#include <ctype.h>

/* srmtrblk: remove trailing blanks from string s */
#ifdef __PROTOTYPE__
void srmtrblk(char *s)
#else	/* __PROTOTYPE__ */
void srmtrblk(s)
char *s;
#endif	/* __PROTOTYPE__ */
{
char *ss;
for(ss= s; *ss; ++ss);	/* find end of string */
for(--ss; ss >= s && isspace(*ss) && *ss != '\f'; --ss) *ss= '\0';
}