The R Project SVN R-packages

Rev

Rev 4972 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4972 Rev 4976
Line 1... Line 1...
1
#include "Mutils.h"
1
#include "Mutils.h"
2
#include <R_ext/Lapack.h>
2
#include <R_ext/Lapack.h>
3
 
3
 
4
#include <Rversion.h>
4
#include <Rversion.h>
5
 
5
 
6
#if defined(R_VERSION) && R_VERSION >= R_Version(2, 7, 0)
6
#if 0 /* defined(R_VERSION) && R_VERSION >= R_Version(2, 7, 0) *
7
/* La_norm_type() & La_rcond_type() are now in R_ext/Lapack.h */
7
       * La_norm_type() & La_rcond_type() are now in R_ext/Lapack.h
-
 
8
       * but because of the 'module-mess' that's not sufficient */
8
#else
9
#else
9
char La_norm_type(const char *typstr)
10
char La_norm_type(const char *typstr)
10
{
11
{
11
    char typup;
12
    char typup;
12
 
13