Implement named constructors and resolving of redirecting constructors and super-initializers.

frog/leg/scanner/class_element_parser.dart

 // Copyright (c) 2011, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 class ClassElementParser extends PartialParser {
   ClassElementParser(Listener listener) : super(listener);
 
   Token parseClassBody(Token token) => fullParseClassBody(token);
 }
 
@@ skipping 20 matching lines @@
   }
 }
 
 class MemberListener extends NodeListener {
   final ClassElement enclosingElement;
 
   MemberListener(Canceler canceler, Logger logger,
                  [Element this.enclosingElement = null])
     : super(canceler, logger);
 
-  bool isConstructor(Identifier name) {
-    return enclosingElement !== null &&
-           enclosingElement.kind == ElementKind.CLASS &&
-           enclosingElement.name == name.source;
+  bool isConstructorName(Node nameNode) {
+    if (enclosingElement === null ||
+        enclosingElement.kind != ElementKind.CLASS) {
+      return false;
+    }
+    SourceString name;
+    if (nameNode.asIdentifier() != null) {
+      name = nameNode.asIdentifier().source;
+    } else {
+      Send send = nameNode.asSend();
+      name = send.receiver.asIdentifier().source;
+    }
+    return enclosingElement.name == name;
   }
 
   void endMethod(Token beginToken, Token endToken) {
     super.endMethod(beginToken, endToken);
     FunctionExpression method = popNode();
     pushNode(null);
-    Expression qualified = method.name;
-    Identifier name = qualified.asIdentifier();
-    if (name === null) {
-      canceler.cancel('qualified names are not implemented', node: qualified);
+    bool isConstructor = isConstructorName(method.name);
+    SourceString name;
+    if (method.name.asSend() != null) {
+      Identifier receiver = method.name.asSend().receiver.asIdentifier();
+      Identifier selector = method.name.asSend().selector.asIdentifier();
+      SourceString className = receiver.source;
+      SourceString constructorName = selector.source;
+      name = new SourceString('$className.$constructorName');
+    } else {
+      name = method.name.asIdentifier().source;
     }
-    ElementKind kind = isConstructor(name) ?
+    ElementKind kind = isConstructor ?
                        ElementKind.GENERATIVE_CONSTRUCTOR :
                        ElementKind.FUNCTION;
     Element memberElement =
-        new PartialFunctionElement(name.source, beginToken, endToken,
+        new PartialFunctionElement(name, beginToken, endToken,
                                    kind, method.modifiers, enclosingElement);
     enclosingElement.addMember(memberElement);
   }
 
   void endFactoryMethod(Token factoryKeyword, Token periodBeforeName,
                         Token endToken) {
     super.endFactoryMethod(factoryKeyword, periodBeforeName, endToken);
     FunctionExpression method = popNode();
     pushNode(null);
     // TODO(ahe): Named constructors.
@@ skipping 25 matching lines @@
   void endInitializer(Token assignmentOperator) {
     pushNode(null); // Super expects an expression, but
                     // ClassElementParser just skips expressions.
     super.endInitializer(assignmentOperator);
   }
 
   void endInitializers(int count, Token beginToken, Token endToken) {
     pushNode(null);
   }
 }