VM: Fix crash parsing metadata with a closure as a const constructor argument.

tests/lib/mirrors/metadata_allowed_values_test.dart

 // Copyright (c) 2013, 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.
 
 library test.metadata_allowed_values;
 
 import 'dart:mirrors';
 import 'package:expect/expect.dart';
 
 import 'metadata_allowed_values_import.dart';  // Unprefixed.
@@ skipping 131 matching lines @@
 
 @a[0]  /// 26: compile-time error
 class JJ {}
 
 @kk  /// 27: compile-time error
 class KK {
   const KK();
 }
 get kk => const KK();
 
+@LL(() => 42)  /// 28: compile-time error
+class LL {
+  final field;
+  const LL(this.field);
+}
+
+@MM((x) => 42)  /// 29: compile-time error
+class MM {
+  final field;
+  const MM(this.field);
+}
+
+@NN(() {})  /// 30: compile-time error
+class NN {
+  final field;
+  const NN(this.field);
+}
+
+@OO(() { () {} })  /// 31: compile-time error
+class OO {
+  final field;
+  const OO(this.field);
+}
+
 checkMetadata(DeclarationMirror mirror, List expectedMetadata) {
   Expect.listEquals(expectedMetadata.map(reflect).toList(), mirror.metadata);
 }
 
 main() {
   reflectClass(A).metadata;
   checkMetadata(reflectClass(B), [B.CONSTANT]);
   checkMetadata(reflectClass(C), [const C(3)]);
   checkMetadata(reflectClass(D), [const D.named(4)]);
   reflectClass(E).metadata;
@@ skipping 22 matching lines @@
   reflectClass(BB).metadata;
   reflectClass(CC).metadata;
   reflectClass(DD).metadata;
   reflectClass(EE).metadata;
   reflectClass(FF).metadata;
   reflectClass(GG).metadata;
   reflectClass(HH).metadata;
   reflectClass(II).metadata;
   reflectClass(JJ).metadata;
   reflectClass(KK).metadata;
+  reflectClass(LL).metadata;
+  reflectClass(MM).metadata;
+  reflectClass(NN).metadata;
+  reflectClass(OO).metadata;
 }