Make IO::Spec.curupdir about 25% faster

By having it return a Block rather than a Junction. This should make IO::Path.dir a bit faster.
rakudo · May 19, 2020 · 6a0eaab · 6a0eaab
1 parent 2a88990
commit 6a0eaab
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/core.c/IO/Spec/Unix.pm6 b/src/core.c/IO/Spec/Unix.pm6
@@ -60,7 +60,11 @@ my class IO::Spec::Unix is IO::Spec {
     method dir-sep  {  '/' } # NOTE: IO::Path.resolve assumes dir sep is 1 char
     method curdir   {  '.' }
     method updir    { '..' }
-    method curupdir { none('.','..') }
+    method curupdir {
+        -> str $dir {
+            nqp::hllbool(nqp::isne_s($dir,'.') && nqp::isne_s($dir,'..'))
+        }
+    }
     method rootdir  { '/' }
     method devnull  { '/dev/null' }