view mc09/test/cp.c @ 160:1a30cd6e5973

move mc09 to top
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 05 Feb 2019 09:03:07 +0900
parents os9/mc09/test/cp.c@36000611014b
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;
}