148506Sbostic /*- 2*61374Sbostic * Copyright (c) 1980, 1993 3*61374Sbostic * The Regents of the University of California. All rights reserved. 448506Sbostic * 548506Sbostic * %sccs.include.proprietary.c% 622635Sdist */ 722635Sdist 817633Sjak #ifndef lint 9*61374Sbostic static char sccsid[] = "@(#)label.c 8.1 (Berkeley) 06/04/93"; 1048506Sbostic #endif /* not lint */ 1122635Sdist label_(s,len)1217633Sjaklabel_(s, len) 1317633Sjak register char *s; 1417633Sjak long len; 1517633Sjak { 1617633Sjak char buf[260]; 1717633Sjak register char *cp, *cend; 1817633Sjak 1917633Sjak cp = buf; 2017633Sjak cend = cp + (len < 255 ? len : 255 ); 2117633Sjak while ( cp < cend ) 2217633Sjak *cp++ = *s++; 2317633Sjak *cp = 0; 2417633Sjak label( buf ); 2517633Sjak } 26