1#!/usr/local/bin/perl
2use strict;
3use warnings;
4use PDL;
5use Inline qw{Pdlpp};
6
7my $v = pdl(1)->pdl_core_version()->at(0);
8
9print <<"EOPM";
10package PDL::Config::Debian;
11our \$pdl_core_version = $v;
121;
13EOPM
14
15__DATA__
16
17__Pdlpp__
18
19pp_def('pdl_core_version',
20	Pars => 'dummy(); int [o] pcv();',
21	Code => '$pcv() = PDL_CORE_VERSION;');
22
23pp_done;
24