#!/usr/bin/perl

use B::Deparse ();

my $deparse = B::Deparse->new;

use rperlgsl;

#my $code = \&gsl_matrix_rows;
my $code = \&RPerl::Operation::Expression::Operator::GSLFunctions::gsl_matrix_rows;

print 'sub ', $deparse->coderef2text($code), "\n";