"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "t/pp_line_numbers.t" between
PDL-2.074.tar.gz and PDL-2.075.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

pp_line_numbers.t  (PDL-2.074):pp_line_numbers.t  (PDL-2.075)
skipping to change at line 15 skipping to change at line 15
# Five tests for each of two types: # Five tests for each of two types:
use Test::More tests => 10; use Test::More tests => 10;
use PDL::PP qw(foo::bar foo::bar foobar); use PDL::PP qw(foo::bar foo::bar foobar);
# Add some tests for pp_line_numbers: # Add some tests for pp_line_numbers:
pp_def(test1 => pp_def(test1 =>
Pars => 'a(n)', Pars => 'a(n)',
Code => pp_line_numbers (__LINE__, Code => pp_line_numbers (__LINE__,
q{/* line 13, First line */ q{/* line 13, First line */
threadloop %{ threadloop %{
/* line 15, Line after threadloop */ /* line 15, Line after broadcastloop */
loop (n) %{ loop (n) %{
/* line 17, Line after loop */ /* line 17, Line after loop */
%} %}
/* line 19, Line after close of loop */ /* line 19, Line after close of loop */
%} %}
/* line 21, Line after close of threadloop */ /* line 21, Line after close of broadcastloop */
}), }),
GenericTypes => [qw(F D)], GenericTypes => [qw(F D)],
); );
pp_done; pp_done;
unlink 'foobar.pm'; unlink 'foobar.pm';
# Analyze the output of pp_line_numbers by checking the line numbering in # Analyze the output of pp_line_numbers by checking the line numbering in
# foobar.xs. Note that the line *after* the #line directive is assigned the # foobar.xs. Note that the line *after* the #line directive is assigned the
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)