Don't treat trailing dot as part of variable name

So we can write $major.$minor

1 files changed, 11 insertions, 0 deletions

diff --git a/build2/lexer.cxx b/build2/lexer.cxx
index 8124765..a5a4a3a 100644
--- a/build2/lexer.cxx
+++ b/build2/lexer.cxx
@@ -280,6 +280,17 @@ namespace build2
             done = true;
             break;
           }
+        case '.':
+          {
+            // Normally '.' is part of the variable (namespace separator)
+            // unless it is trailing (think $major.$minor).
+            //
+            get ();
+            xchar p (peek ());
+            done = eos (p) || !(alnum (p) ||  p == '_');
+            unget (c);
+            break;
+          }
         }
 
         if (done)