1*48518Sbostic /*- 2*48518Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*48518Sbostic * All rights reserved. 4*48518Sbostic * 5*48518Sbostic * %sccs.include.proprietary.c% 619978Sdist */ 719978Sdist 815471Sralph #ifndef lint 9*48518Sbostic static char sccsid[] = "@(#)label.c 5.2 (Berkeley) 04/22/91"; 10*48518Sbostic #endif /* not lint */ 1115471Sralph 1215471Sralph #include "hp7221.h" 1315471Sralph 1415471Sralph label(s) 1515471Sralph char *s; 1615471Sralph { 1715471Sralph printf("~'%s", s); 1815471Sralph putchar( ENDOFSTRING ); 1915471Sralph } 20