Add missing lang.ast.types package

Author: thekid

src/main/php/lang/ast/types/Declaration.class.php

@@ -0,0 +1,34 @@
+<?php namespace lang\ast\types;
+
+use lang\ast\nodes\{EnumCase, Property};
+
+class Declaration implements Type {
+  private $type, $result;
+
+  /**
+   * @param  lang.ast.nodes.TypeDeclaration $type
+   * @param  lang.ast.Result $result
+   */
+  public function __construct($type, $result) {
+    $this->type= $type;
+    $this->result= $result;
+  }
+
+  /** @return string */
+  public function name() { return ltrim($this->type->name, '\\'); }
+
+  /**
+   * Returns whether a given member is an enum case
+   *
+   * @param  string $member
+   * @return bool
+   */
+  public function isEnumCase($member) {
+    if ('enum' === $this->type->kind) {
+      return ($this->type->body[$member] ?? null) instanceof EnumCase;
+    } else if ('class' === $this->type->kind && '\\lang\\Enum' === $this->type->parent) {
+      return ($this->type->body['$'.$member] ?? null) instanceof Property;
+    }
+    return false;
+  }
+}

src/main/php/lang/ast/types/Reflection.class.php

@@ -0,0 +1,35 @@
+<?php namespace lang\ast\types;
+
+use lang\{Enum, ClassNotFoundException};
+
+class Reflection implements Type {
+  private $reflect;
+
+  /** @param string $type */
+  public function __construct($type) {
+    try {
+      $this->reflect= new \ReflectionClass($type);
+    } catch (\ReflectionException $e) {
+      throw new ClassNotFoundException($type);
+    }
+  }
+
+  /** @return string */
+  public function name() { return $this->reflect->name; }
+
+  /**
+   * Returns whether a given member is an enum case
+   *
+   * @param  string $member
+   * @return bool
+   */
+  public function isEnumCase($member) {
+    if ($this->reflect->isSubclassOf(Enum::class)) {
+      return $this->reflect->getStaticPropertyValue($member, null) instanceof Enum;
+    } else if ($this->reflect->isSubclassOf(\UnitEnum::class)) {
+      $value= $this->reflect->getConstant($member) ?: $this->reflect->getStaticPropertyValue($member, null);
+      return $value instanceof \UnitEnum;
+    }
+    return false;
+  }
+}

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

@@ -0,0 +1,15 @@
+<?php namespace lang\ast\types;
+
+interface Type {
+
+  /** @return string */
+  public function name();
+
+  /**
+   * Returns whether a given member is an enum case
+   *
+   * @param  string $member
+   * @return bool
+   */
+  public function isEnumCase($member);
+}