From: bangerth Date: Sun, 4 Mar 2012 14:49:54 +0000 (+0000) Subject: Use new scheme for #include paths. X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7a8de3ef29eba04f6663a8185b3fdb628b811c74;p=dealii-svn.git Use new scheme for #include paths. git-svn-id: https://svn.dealii.org/trunk@25206 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/deal.II/common/scripts/lapack_templates.pl b/deal.II/common/scripts/lapack_templates.pl index 886e9f9ee5..7d5dd0342c 100644 --- a/deal.II/common/scripts/lapack_templates.pl +++ b/deal.II/common/scripts/lapack_templates.pl @@ -2,7 +2,7 @@ # $Id$ # Version: $Name$ # -# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010 by the deal authors +# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010, 2012 by the deal authors # # This file is subject to QPL and may not be distributed # without copyright and license information. Please refer @@ -54,8 +54,8 @@ print << 'EOT' #ifndef __LAPACK_TEMPLATES_H #define __LAPACK_TEMPLATES_H -#include -#include +#include +#include extern "C" { @@ -89,7 +89,7 @@ while(<>) $single =~ s/d$name/s$name/; $single =~ s/double/float/g; print $double,$single; - + $double =~ m/\(([^\)]*)/; my $args = $1; # The arglist for the C++ function @@ -116,7 +116,7 @@ while(<>) $numbers++; } $typet =~ s/double/number1/g; - + $templates .= "\n\n//--------------------------------------------------------------------------------//\ntemplate) $templates .= "\ninline $type\n$name ($args)\n{\n d$name\_ ($args2);\n}\n"; $templates .= "#else\ninline $type\n$name ($args0)\n"; $templates .= "{\n Assert (false, LAPACKSupport::ExcMissing(\"d$name\"));\n}\n#endif\n"; - + $args =~ s/double/float/g; $args0 =~ s/double/float/g; $type =~ s/double/float/g;