RosettaCodeData/Task/Unix-ls/Objeck/unix-ls.objeck
2023-07-01 13:44:08 -04:00

12 lines
306 B
Text

class Test {
function : Main(args : String[]) ~ Nil {
file_names := System.IO.File.Directory->List(".");
each(i : file_names) {
file_name := file_names[i];
if(System.IO.File.Directory->Exists(file_name)) {
file_name += '/';
};
file_name->PrintLine();
};
}
}