add iscell() function and tests

Whiteknight · Dec 3, 2009 · 2ab528a · 2ab528a
1 parent b5847f9
commit 2ab528a
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/t/functions/iscell.t b/t/functions/iscell.t
@@ -0,0 +1,4 @@
+plan(2);
+is(iscell(1), 0, "scalar is not cell");
+is(iscell({1}), 1, "cell is cell");
+
diff --git a/toolbox/iscell.m b/toolbox/iscell.m
@@ -0,0 +1,4 @@
+function what = iscell(var)
+	mytype = parrot_typeof(var);
+	what = (mytype == 'PMCMatrix2D');
+endfunction