1N/A/*********************************************************************** 1N/A* This software is part of the ast package * 1N/A* Copyright (c) 1992-2010 AT&T Intellectual Property * 1N/A* and is licensed under the * 1N/A* Common Public License, Version 1.0 * 1N/A* by AT&T Intellectual Property * 1N/A* A copy of the License is available at * 1N/A* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) * 1N/A* Information and Software Systems Research * 1N/A* Glenn Fowler <gsf@research.att.com> * 1N/A* David Korn <dgk@research.att.com> * 1N/A***********************************************************************/ 1N/A * Written by David Korn 1N/A * Tue Mar 25 11:03:23 EST 2003 1N/A"[-?\n@(#)$Id: asa (AT&T Research) 2003-03-25 $\n]" 1N/A"[-author?David Korn <dgk@research.att.com>]" 1N/A"[+NAME?asa - interpret carriage-control characters]" 1N/A"[+DESCRIPTION?\basa\b writes its input files to standard output mapping " 1N/A "carriage control characters to line-printer control sequences.]" 1N/A"[+?The first character of each line or record is removed from the input and " 1N/A "is processed as follows before the rest of the line is output:]{" 1N/A "[+0?A new-line is output.]" 1N/A "[+1?Advance to the next page.]" 1N/A "[++?Overwrite the previous line.]" 1N/A "[+\aspace\a?Just output the remainder of the line.]" 1N/A "[+?Any other character as the first character is treated as if " 1N/A"[+?If no \afile\a operands are given or if the \afile\a is \b-\b, \basa\b " 1N/A "reads from standard input. The start of the file is defined as the " 1N/A"[r]#[reclen?If \areclen\a is greater than zero, the file is assumed to " 1N/A "consist of fixed length records of length \areclen\a.]" 1N/A "[+>0?An error occurred.]" 1N/A"[+SEE ALSO?\blpr\b(1)]" 1N/A register int n, c = 0;
1N/A while(--n>0 &&
cp[n]==
' ');