1*48506Sbostic /*- 2*48506Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*48506Sbostic * All rights reserved. 4*48506Sbostic * 5*48506Sbostic * %sccs.include.proprietary.c% 622635Sdist */ 722635Sdist 817633Sjak #ifndef lint 9*48506Sbostic static char sccsid[] = "@(#)label.c 5.2 (Berkeley) 04/22/91"; 10*48506Sbostic #endif /* not lint */ 1122635Sdist 1217633Sjak label_(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