Commit db513394 authored by John van Groningen's avatar John van Groningen
Browse files

fix toString of QualifiedIdentToken in module scanner

parent 01768af2
......@@ -1555,7 +1555,7 @@ where
toString EndOfFileToken = "end of file"
toString (ErrorToken id) = "Scanner error: " + id
toString (QualifiedIdentToken module_name ident_name) = module_name+++"@"+++ident_name
toString (QualifiedIdentToken module_name ident_name) = "'"+++module_name+++"'."+++ident_name
toString GenericToken = "generic"
toString DeriveToken = "derive"
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment