[svn] r6413: nemerle/trunk/ncc/parsing/PreParser.n

[VladD2]

Log:
Added "push_back (t)"  to qualified identifier parsing function.
It's need for correct error reporting and correct parsing in complete mode. 

Author: VladD2
Date: Sun Jul  2 05:31:44 2006
New Revision: 6413

Modified:
   nemerle/trunk/ncc/parsing/PreParser.n

Modified: nemerle/trunk/ncc/parsing/PreParser.n
==============================================================================
--- nemerle/trunk/ncc/parsing/PreParser.n	(original)
+++ nemerle/trunk/ncc/parsing/PreParser.n	Sun Jul  2 05:31:44 2006
@@ -336,14 +336,22 @@
       def parent_begin = parent_stream.Count;
       def current_begin = current_stream.Count;
 
-      def get_qid () {
-        match (get_token ()) {
+      def get_qid ()
+      {
+        def tok1 = get_token ();
+        match (tok1)
+        {
           | Token.Identifier (x) =>
-            match (get_token ()) {
+            def tok2 = get_token ();
+            match (tok2)
+            {
               | Token.Operator (".") => x :: get_qid ()
               | t => push_back (t); [x]
             }
-          | t => Message.Error (t.Location, "expected qualified identifier"); []
+          | t =>
+            Message.Error (t.Location, "expected qualified identifier");
+            push_back (t);
+            []
         }
       }