*** empty log message ***

laerror.cc

@@ -25,6 +25,7 @@
 #include <errno.h>
 #include <stdarg.h>
 
+#include "cuda_la.h"
 
 #ifdef USE_TRACEBACK
 #include "traceback.h"
@@ -32,6 +33,11 @@
 
 namespace LA {
 
+//enforce GPU initialization by a global class instantization constructor
+#ifdef CUDALA
+GPU_START gpu_start_instant;
+#endif
+
 bool _LA_count_check=true;
 
 extern "C" void _findme(void) {}; //for autoconf test we need a function with C linkage
@@ -45,6 +51,13 @@ void laerror(const char *s1)
     std::cerr << s1  << "\n";
     std::cout << s1  << "\n";
   }
+#ifdef CUDALA
+{
+cublasStatus s=cublasGetError();
+std::cerr << "CUBLAS status = "<<s<<std::endl;
+std::cout << "CUBLAS status = "<<s<<std::endl;
+}
+#endif
   if(errno) perror("system error");
 
 throw LAerror(s1);