[svn] r7257: nemerle/trunk/ncc/parsing: AST.n MainParser.n

[VladD2]

Log:
Fix location of array type (previously it not include type arguments).

Author: VladD2
Date: Fri Jan 12 12:43:24 2007
New Revision: 7257

Modified:
   nemerle/trunk/ncc/parsing/AST.n
   nemerle/trunk/ncc/parsing/MainParser.n

Modified: nemerle/trunk/ncc/parsing/AST.n
==============================================================================

Modified: nemerle/trunk/ncc/parsing/MainParser.n
==============================================================================
--- nemerle/trunk/ncc/parsing/MainParser.n	(original)
+++ nemerle/trunk/ncc/parsing/MainParser.n	Fri Jan 12 12:43:24 2007
@@ -1953,7 +1953,7 @@
             def body = peek_token ();              
             match (body) {
               | Token.SquareGroup | Token.Operator ("$") =>
-                PExpr.Array (loc, rank, parse_embedded_expr (TokenStoppers.All))
+                PExpr.Array (loc + body.Location, rank, parse_embedded_expr (TokenStoppers.All))
 
               | Token.RoundGroup (groups) =>
                 shift ();