simplify compfuffix/comptarget, tadzik++

tadzik · Feb 27, 2014 · 9fb996e · 9fb996e
1 parent 441d2ce
commit 9fb996e
Showing 1 changed file with 3 additions and 14 deletions.
diff --git a/lib/Panda/Common.pm b/lib/Panda/Common.pm
@@ -30,20 +30,9 @@ sub withp6lib(&what) is export {
 }
 
 sub compsuffix is export {
-    given $*VM<name> {
-        when 'parrot' {
-            return 'pir';
-        }
-        when 'jvm' {
-            return 'jar';
-        }
-        when 'moar' {
-            return 'moarvm';
-        }
-        default {
-            die($_ ~ ' is an unsupported backend VM.');
-        }
-    }
+    $*VM<name> eq 'moar'
+        ?? 'moarvm'
+        !! comptarget
 }
 
 sub comptarget is export {