1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Licensed under the Apache License, Version 2.0 (the "License");
4 # you may not use this file except in compliance with the License.
5 # You may obtain a copy of the License at
7 # http://www.apache.org/licenses/LICENSE-2.0
9 # Unless required by applicable law or agreed to in writing, software
10 # distributed under the License is distributed on an "AS IS" BASIS,
11 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 # See the License for the specific language governing permissions and
13 # limitations under the License.
19 var tree
= new OrderedTree[String]
20 var todo
= new Array[String]
22 print
"Usage: ./test [-q] paths"
25 if args
.first
== "-q" then
30 for a
in args
do tree
.add
(null, a
)
32 while todo
.not_empty
do
34 var entries
= file
.files
35 for entry
in entries
do
36 var sub
= file
/ entry
41 tree
.sort_with
(alpha_comparator
)
43 if not quiet
then tree
.write_to
(stdout
)