xref: /csrg-svn/lib/libplot/f77plot/label.c (revision 22635)
1*22635Sdist /*
2*22635Sdist  * Copyright (c) 1980 Regents of the University of California.
3*22635Sdist  * All rights reserved.  The Berkeley software License Agreement
4*22635Sdist  * specifies the terms and conditions for redistribution.
5*22635Sdist  */
6*22635Sdist 
717633Sjak #ifndef lint
8*22635Sdist static char sccsid[] = "@(#)label.c	5.1 (Berkeley) 06/07/85";
9*22635Sdist #endif not lint
10*22635Sdist 
1117633Sjak label_(s, len)
1217633Sjak register char *s;
1317633Sjak long len;
1417633Sjak {
1517633Sjak 	char buf[260];
1617633Sjak 	register char *cp, *cend;
1717633Sjak 
1817633Sjak 	cp = buf;
1917633Sjak 	cend = cp + (len < 255 ? len : 255 );
2017633Sjak 	while ( cp < cend )
2117633Sjak 		*cp++ = *s++;
2217633Sjak 	*cp = 0;
2317633Sjak 	label( buf );
2417633Sjak }
25