Fix "Arrow functions on the right hand side of |> must be parenthesized" for clone(...)

Author: thekid

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

@@ -13,7 +13,7 @@ trait RewriteCallables {
 
   protected function emitCallable($result, $callable) {
     if ($callable->expression instanceof Literal && 'clone' === $callable->expression->expression) {
-      $result->out->write('fn($o) => clone $o');
+      $result->out->write('(fn($o) => clone $o)');
     } else {
       $this->emitPartial($result, $callable);
     }

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

@@ -228,6 +228,18 @@ public function run() {
     Assert::equals('cba', $f('abc'));
   }
 
+  #[Test]
+  public function clone() {
+    $handles= $this->run('use lang\ast\unittest\emit\Handle; class %T {
+      public function run() {
+        $a= new Handle(0);
+        return [$a, $a |> clone(...)];
+      }
+    }');
+    $handles[1]->redirect(4);
+    Assert::notEquals($handles[0], $handles[1]);
+  }
+
   #[Test]
   public function partial_function_application() {
     $f= $this->run('class %T {