Verify parameter default is accessible via reflection

See xp-framework/core#259

Author: thekid

src/main/php/lang/ast/emit/PHP.class.php

@@ -554,6 +554,9 @@ protected function emitMethod($result, $method) {
 
     $promoted= '';
     foreach ($method->signature->parameters as $param) {
+      $meta[DETAIL_TARGET_ANNO][$param->name]= $param->annotations;
+      $meta[DETAIL_ARGUMENTS][]= $param->type ? $param->type->name() : 'var';
+
       if (isset($param->promote)) {
         $promoted.= $param->promote.' $'.$param->name.';';
         $result->locals[1]['$this->'.$param->name]= new Code(($param->reference ? '&$' : '$').$param->name);
@@ -565,8 +568,10 @@ protected function emitMethod($result, $method) {
           DETAIL_ARGUMENTS   => []
         ];
       }
-      $meta[DETAIL_TARGET_ANNO][$param->name]= $param->annotations;
-      $meta[DETAIL_ARGUMENTS][]= $param->type ? $param->type->name() : 'var';
+
+      if (isset($param->default) && !$this->isConstant($param->default)) {
+        $meta[DETAIL_TARGET_ANNO][$param->name]['default']= [$param->default];
+      }
     }
 
     if (null === $method->body) {

src/test/php/lang/ast/unittest/emit/InitializeWithExpressionsTest.class.php

@@ -149,6 +149,16 @@ public function run($h= new Handle(0)) {
     Assert::equals(new Handle(1), $r);
   }
 
+  #[Test]
+  public function parameter_default_reflective_access() {
+    $r= $this->run('use lang\ast\unittest\emit\Handle; class <T> {
+      public function run($h= new Handle(0)) {
+        return typeof($this)->getMethod("run")->getParameter(0)->getDefaultValue();
+      }
+    }');
+    Assert::equals(new Handle(0), $r);
+  }
+
   #[Test]
   public function property_reference_as_parameter_default() {
     $r= $this->run('use lang\ast\unittest\emit\Handle; class <T> {