X-Git-Url: http://nitlanguage.org

diff --git a/src/test_parser.nit b/src/test_parser.nit
index 78f5799..674753c 100644
--- a/src/test_parser.nit
+++ b/src/test_parser.nit
@@ -15,7 +15,7 @@
 # limitations under the License.
 
 # Program used to test the NIT parser
-package test_parser
+module test_parser
 
 import parser
 
@@ -25,9 +25,9 @@ class PrintTreeVisitor
 	redef fun visit(n)
 	do
 		if n isa Token then
-			printn("  " * _rank, n.to_s, " ... ", n.location, "\n")
+			printn("  " * _rank, n.class_name, " \"", n.text.escape_to_c, "\" ", n.location, "\n")
 		else
-			printn("  " * _rank, n.location, "\n")
+			printn("  " * _rank, n.class_name, " ", n.location, "\n")
 		end
 		_rank = _rank + 1
 		n.visit_all(self)
@@ -45,7 +45,7 @@ var only_lexer = false
 var need_help = false
 var no_file = false
 
-while not args.is_empty and args.first.first == '-' do
+while not args.is_empty and args.first.chars.first == '-' do
 	if args.first == "-n" then
 		no_print = true
 	else if args.first == "-l" then