fix is_scalar

Whiteknight · Nov 23, 2009 · 71b66d9 · 71b66d9
1 parent ec06f75
commit 71b66d9
Showing 1 changed file with 3 additions and 6 deletions.
diff --git a/src/internals/dispatch.pir b/src/internals/dispatch.pir
@@ -168,12 +168,9 @@ TODO: This is probably redundant and unneccessary. Remove this if not needed.
 
 .sub '!is_scalar'
     .param pmc var
-    $S0 = typeof var
-    # TODO: When matrix types does the role "matrix" check that instead
-    if $S0 == 'NumMatrix2D' goto is_not_scalar
-    .return(1)
-  is_not_scalar:
-    .return(0)
+    $I0 = does var, "matrix"
+    $I1 = not $I0
+    .return($I1)
 .end
 
 =item !indexed_assign