mirror of
https://github.com/Orc/discount.git
synced 2026-10-01 04:03:54 +03:00
David Seifert
7afa5c6242
* Clang 16 (and likely GCC 14) will enforce strict C99 semantics and break old K&R C declarations and require correct C89 function prototypes. Bug: https://bugs.gentoo.org/870952 Clang: https://discourse.llvm.org/t/configure-script-breakage-with-the-new-werror-implicit-function-declaration/65213/9
39 lines
758 B
C
39 lines
758 B
C
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
int
|
|
main(int argc, char **argv)
|
|
{
|
|
register int c;
|
|
int xp;
|
|
int width;
|
|
|
|
if ( argc != 2 ) {
|
|
fprintf(stderr, "usage: %s width\n", argv[0]);
|
|
exit(1);
|
|
}
|
|
else if ( (width=atoi(argv[1])) < 1 ) {
|
|
fprintf(stderr, "%s: please set width to > 0\n", argv[0]);
|
|
exit(1);
|
|
}
|
|
|
|
|
|
for ( xp = 1; (c = getchar()) != EOF; xp++ ) {
|
|
while ( c & 0xC0 ) {
|
|
/* assume that (1) the output device understands utf-8, and
|
|
* (2) the only c & 0x80 input is utf-8.
|
|
*/
|
|
do {
|
|
if ( xp <= width )
|
|
putchar(c);
|
|
} while ( (c = getchar()) != EOF && (c & 0x80) && !(c & 0x40) );
|
|
++xp;
|
|
}
|
|
if ( c == '\n' )
|
|
xp = 0;
|
|
if ( xp <= width )
|
|
putchar(c);
|
|
}
|
|
exit(0);
|
|
}
|