20 lines
472 B
Text
20 lines
472 B
Text
use IO;
|
|
|
|
bundle Default {
|
|
class Test {
|
|
function : Main(args : String[]) ~ Nil {
|
|
len := File->Size("input.txt");
|
|
buffer := Byte->New[len];
|
|
in := FileReader->New("input.txt");
|
|
if(in->IsOpen() <> Nil) {
|
|
in->ReadBuffer(0, len, buffer);
|
|
out := FileWriter->New("output.txt");
|
|
if(out->IsOpen() <> Nil) {
|
|
out->WriteBuffer(0, len, buffer);
|
|
out->Close();
|
|
};
|
|
in->Close();
|
|
};
|
|
}
|
|
}
|
|
}
|