Check input for definedness instead of passing everything to &val and…

… muting potential warnings.
rakudo · Jul 4, 2018 · 07b032d · 07b032d
1 parent 0275ea2
commit 07b032d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/io_operators.pm6 b/src/core/io_operators.pm6
@@ -63,13 +63,13 @@ multi sub gist(|) {
 
 proto sub prompt($?, *%) {*}
 multi sub prompt() {
-    quietly val $*IN.get
+    nqp::defined(my \res := $*IN.get) ?? val(res) !! res;
 }
 multi sub prompt($msg) {
     my $out := $*OUT;
     $out.print($msg);
     $out.flush();
-    quietly val $*IN.get;
+    nqp::defined(my \res := $*IN.get) ?? val(res) !! res;
 }
 
 proto sub dir(|) {*}