(Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).
| pdlchar.t (PDL-2.077) | : | pdlchar.t (PDL-2.078) |
|---|
| | |
| skipping to change at line 61 | | skipping to change at line 61 |
|---|
| "; | | "; |
| | |
| is("$varstr", $comp2); | | is("$varstr", $comp2); |
| } | | } |
| | |
| is +PDL::Char->new( "" ).'', q{'' }; | | is +PDL::Char->new( "" ).'', q{'' }; |
| | |
| { | | { |
| my $cp = PDL::Char->new(['aa'..'af'],['ba'..'bf']); | | my $cp = PDL::Char->new(['aa'..'af'],['ba'..'bf']); |
| my $got = $cp->dice('X',[0],[0]); | | my $got = $cp->dice('X',[0],[0]); |
|
| is $got.'', "[\n [ 'aa' ] \n] \n", 'can dice a P:C' or diag $got; | | is $got.'', "[\n [ 'aa' ] \n] \n", 'can dice a P:C'; |
| } | | } |
| | |
| done_testing; | | done_testing; |
| | | |
| End of changes. 1 change blocks. |
|---|
| 1 lines changed or deleted | | 1 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 