Allow passing anonymous class' names to Typed::named()

See #351 (comment)

Author: thekid

src/main/php/lang/Type.class.php

@@ -287,7 +287,7 @@ public static function named($name, $context) {
     //   card type.
     // * Anything else is a qualified or unqualified class name
     $l= strlen($name);
-    $p= strcspn($name, '<&|[*(');
+    $p= strcspn($name, '<&|[*(@');
     if ($p === $l) {
       return isset($context[$name]) ? $context[$name]() : ((isset($context['*']) && strcspn($name, '.\\') === $l)
         ? $context['*']($name)
@@ -334,6 +334,8 @@ public static function named($name, $context) {
       } else {
         $t= self::named($base, $context)->newGenericType($components);
       }
+    } else if ('@' === $name[$p]) {
+      return new XPClass($name);
     } else {
       $t= self::named(trim(substr($name, 0, $p)), $context);
       $name= substr($name, $p);

src/test/php/lang/unittest/TypeTest.class.php

@@ -504,4 +504,10 @@ public function function_return_type($fixture, $expected) {
   public function split($names, $expected) {
     Assert::equals($expected, [...Type::split($names, ',')]);
   }
+
+  #[Test]
+  public function anonymous_classes_in_named() {
+    $t= new class() { };
+    Assert::equals(new XPClass($t), Type::named(get_class($t), []));
+  }
 }