1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2008 Jean Privat <jean@pryen.org>
5 # Licensed under the Apache License, Version 2.0 (the "License");
6 # you may not use this file except in compliance with the License.
7 # You may obtain a copy of the License at
9 # http://www.apache.org/licenses/LICENSE-2.0
11 # Unless required by applicable law or agreed to in writing, software
12 # distributed under the License is distributed on an "AS IS" BASIS,
13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 # See the License for the specific language governing permissions and
15 # limitations under the License.
17 # Program used to test the NIT parser
22 class PrintTreeVisitor
25 redef fun visit
(n
: nullable ANode)
27 if n
== null then return
29 printn
(" " * _rank
, n
.to_s
, " ... ", n
.location
, "\n")
31 printn
(" " * _rank
, n
.location
, "\n")
45 var only_lexer
= false
48 while not args
.is_empty
and args
.first
.first
== '-' do
49 if args
.first
== "-n" then
51 else if args
.first
== "-l" then
53 else if args
.first
== "-p" then
55 else if args
.first
== "-h" or args
.first
== "-?" then
58 stderr
.write
("Unknown option {args.first}.\n")
64 if args
.is_empty
or need_help
then
66 print
(" test_parser [options]... <filename.nit>...")
68 print
(" -n do not print anything")
69 print
(" -l only lexer")
70 print
(" -p lexer and parser (default)")
71 print
(" -h print this help")
74 var f
= new IFStream.open
(a
)
75 var lexer
= new Lexer(new SourceFile(a
, f
))
77 var token
= lexer
.next
78 while not token
isa EOF do
80 print
("Read token at {token.location} text='{token.text}'")
86 var parser
= new Parser(lexer
)
87 var tree
= parser
.parse
90 var error
= tree
.n_eof
91 if error
isa AError then
92 print
("Error at {error.location}:\n\t{error.message}")
97 (new PrintTreeVisitor).enter_visit
(tree
)