8 lines
156 B
Text
8 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
|