7 lines
156 B
Text
7 lines
156 B
Text
decl file f
|
|
decl string<> fnames
|
|
set fnames (sort (f.listdir "."))
|
|
|
|
for (decl int i) (< i (size fnames)) (inc i)
|
|
out fnames<i> endl console
|
|
end for
|