1 /* 2 * Copyright (c) 1980 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 */ 6 7 #ifndef lint 8 static char sccsid[] = "@(#)label.c 5.1 (Berkeley) 06/07/85"; 9 #endif not lint 10 11 label(s) 12 char *s; 13 { 14 register i,c; 15 putch(037); /* alpha mode */ 16 for(i=0; c=s[i]; i++) 17 putch(c); 18 } 19