Does anyone see a problem with this? If so, I will submit the PR.
diff --git a/src/core.c/RakuAST/Deparse.pm6 b/src/core.c/RakuAST/Deparse.pm6
index ef073dbba..62410a414 100644
--- a/src/core.c/RakuAST/Deparse.pm6
+++ b/src/core.c/RakuAST/Deparse.pm6
@@ -619,6 +619,9 @@ class RakuAST::Deparse {
my $target := $ast.target;
my str @parts;
+ if $ast.value -> $value {
+ return $value.raku;
+ }
if $ast.type -> $type {
my str $deparsed = self.deparse($type);
if $deparsed ne 'Any' {
@@ -673,6 +676,11 @@ class RakuAST::Deparse {
}
}
+ if $.where {
+ @parts.push(' ');
+ @parts.push( $.where.DEPARSE );
+ }
+
@parts.join
}