"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

---