view os9/mc09/test/cp.c @ 132:36000611014b

micro-c buffering
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 06 Jan 2019 19:57:11 +0900
parents c5dd5c363d43
children
line wrap: on
line source

#include "mclibos9.c"

int
main(argc,argv) 
int argc;char *argv[]; {
    FILE *input ; 
    FILE *output ; 
    int c;
    int i;

    input = stdin;
    output = stdout;

    i = 1;
    if (argv[i]) { input = fopen(argv[i++],"r"); }
    if (argv[i]) { output = fopen(argv[i++],"w"); }
    if (input==0 || output==0) return 0;
    while( (c = getc(input) ) !=  -1) {
        putc(c,output);
    }
    return 1;
}