diff options
Diffstat (limited to 'contrib/lua-torch/torch7/lib/TH/THLapack.h')
| -rw-r--r-- | contrib/lua-torch/torch7/lib/TH/THLapack.h | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/contrib/lua-torch/torch7/lib/TH/THLapack.h b/contrib/lua-torch/torch7/lib/TH/THLapack.h new file mode 100644 index 000000000..614d15f94 --- /dev/null +++ b/contrib/lua-torch/torch7/lib/TH/THLapack.h @@ -0,0 +1,27 @@ +#ifndef TH_LAPACK_INC +#define TH_LAPACK_INC + +#include "THGeneral.h" + +#define THLapack_(NAME) TH_CONCAT_4(TH,Real,Lapack_,NAME) + +#define THLapackCheck(fmt, func, info , ...) \ +if (info < 0) { \ + THError("Lapack Error in %s : Illegal Argument %d", func, -info); \ +} else if(info > 0) { \ + THError(fmt, func, info, ##__VA_ARGS__); \ +} \ + +#define THLapackCheckWithCleanup(fmt, cleanup, func, info , ...) \ +if (info < 0) { \ + cleanup \ + THError("Lapack Error in %s : Illegal Argument %d", func, -info); \ +} else if(info > 0) { \ + cleanup \ + THError(fmt, func, info, ##__VA_ARGS__); \ +} + +#include "generic/THLapack.h" +#include "THGenerateAllTypes.h" + +#endif |