Correc the order we do checks of subtypes from most general to most s…

…pecific, so we at least always consider type first before the extra conditions.

src/glue/subset.pm

@@ -3,10 +3,10 @@
 role SubType {
     has $!checker;
     method ACCEPTS(Mu $topic) {
-        unless $!checker.ACCEPTS($topic) {
-            return Bool::False;
+        unless callsame() {
+            return Bool::False
         }
-        nextsame();
+        $!checker.ACCEPTS($topic)
     }
 }