We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 240bbf3 commit b028362Copy full SHA for b028362
macros/PGmatrixmacros.pl
@@ -769,11 +769,14 @@ =head2 convert_to_array_ref {
769
sub convert_to_array_ref {
770
my $input = shift;
771
if (Value::isValue($input) and Value::classMatch($input,"Matrix")) {
772
- $input = [$input->value];
+ # handles Value::Matrix (MathObject matrices)
773
+ $input = [$input->value]; # convert an array to an array_ref (see POD comment above)
774
} elsif (ref($input) eq 'Matrix' ) {
775
+ # handles wwMatrix objects (old style)
776
$input = $input->array_ref;
777
} elsif (ref($input) =~/ARRAY/) {
778
# no change to input value
779
+ # handles raw perl array_ref types
780
} else {
781
WARN_MESSAGE("This does not appear to be a matrix ");
782
}
0 commit comments