diff options
Diffstat (limited to 'src/clblast_c.cpp')
| -rw-r--r-- | src/clblast_c.cpp | 3187 |
1 files changed, 1688 insertions, 1499 deletions
diff --git a/src/clblast_c.cpp b/src/clblast_c.cpp index 9ea2c884..0174fd19 100644 --- a/src/clblast_c.cpp +++ b/src/clblast_c.cpp @@ -31,24 +31,26 @@ StatusCode CLBlastSrotg(cl_mem sa_buffer, const size_t sa_offset, cl_mem sc_buffer, const size_t sc_offset, cl_mem ss_buffer, const size_t ss_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotg<float>(sa_buffer, sa_offset, - sb_buffer, sb_offset, - sc_buffer, sc_offset, - ss_buffer, ss_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotg<float>(sa_buffer, sa_offset, + sb_buffer, sb_offset, + sc_buffer, sc_offset, + ss_buffer, ss_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDrotg(cl_mem sa_buffer, const size_t sa_offset, cl_mem sb_buffer, const size_t sb_offset, cl_mem sc_buffer, const size_t sc_offset, cl_mem ss_buffer, const size_t ss_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotg<double>(sa_buffer, sa_offset, - sb_buffer, sb_offset, - sc_buffer, sc_offset, - ss_buffer, ss_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotg<double>(sa_buffer, sa_offset, + sb_buffer, sb_offset, + sc_buffer, sc_offset, + ss_buffer, ss_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ROTMG @@ -58,13 +60,14 @@ StatusCode CLBlastSrotmg(cl_mem sd1_buffer, const size_t sd1_offset, const cl_mem sy1_buffer, const size_t sy1_offset, cl_mem sparam_buffer, const size_t sparam_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotmg<float>(sd1_buffer, sd1_offset, - sd2_buffer, sd2_offset, - sx1_buffer, sx1_offset, - sy1_buffer, sy1_offset, - sparam_buffer, sparam_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotmg<float>(sd1_buffer, sd1_offset, + sd2_buffer, sd2_offset, + sx1_buffer, sx1_offset, + sy1_buffer, sy1_offset, + sparam_buffer, sparam_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDrotmg(cl_mem sd1_buffer, const size_t sd1_offset, cl_mem sd2_buffer, const size_t sd2_offset, @@ -72,13 +75,14 @@ StatusCode CLBlastDrotmg(cl_mem sd1_buffer, const size_t sd1_offset, const cl_mem sy1_buffer, const size_t sy1_offset, cl_mem sparam_buffer, const size_t sparam_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotmg<double>(sd1_buffer, sd1_offset, - sd2_buffer, sd2_offset, - sx1_buffer, sx1_offset, - sy1_buffer, sy1_offset, - sparam_buffer, sparam_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotmg<double>(sd1_buffer, sd1_offset, + sd2_buffer, sd2_offset, + sx1_buffer, sx1_offset, + sy1_buffer, sy1_offset, + sparam_buffer, sparam_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ROT @@ -88,13 +92,14 @@ StatusCode CLBlastSrot(const size_t n, const float cos, const float sin, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rot(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - cos, - sin, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rot(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + cos, + sin, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDrot(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, @@ -102,13 +107,14 @@ StatusCode CLBlastDrot(const size_t n, const double cos, const double sin, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rot(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - cos, - sin, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rot(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + cos, + sin, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ROTM @@ -117,24 +123,26 @@ StatusCode CLBlastSrotm(const size_t n, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem sparam_buffer, const size_t sparam_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotm<float>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - sparam_buffer, sparam_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotm<float>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + sparam_buffer, sparam_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDrotm(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem sparam_buffer, const size_t sparam_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Rotm<double>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - sparam_buffer, sparam_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Rotm<double>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + sparam_buffer, sparam_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SWAP @@ -142,51 +150,56 @@ StatusCode CLBlastSswap(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Swap<float>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Swap<float>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDswap(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Swap<double>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Swap<double>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCswap(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Swap<float2>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Swap<float2>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZswap(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Swap<double2>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Swap<double2>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHswap(const size_t n, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Swap<half>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Swap<half>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SCAL @@ -194,51 +207,56 @@ StatusCode CLBlastSscal(const size_t n, const float alpha, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Scal(n, - alpha, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Scal(n, + alpha, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDscal(const size_t n, const double alpha, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Scal(n, - alpha, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Scal(n, + alpha, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCscal(const size_t n, const cl_float2 alpha, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Scal(n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Scal(n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZscal(const size_t n, const cl_double2 alpha, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Scal(n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Scal(n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHscal(const size_t n, const cl_half alpha, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Scal(n, - alpha, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Scal(n, + alpha, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // COPY @@ -246,51 +264,56 @@ StatusCode CLBlastScopy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Copy<float>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Copy<float>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDcopy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Copy<double>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Copy<double>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCcopy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Copy<float2>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Copy<float2>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZcopy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Copy<double2>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Copy<double2>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHcopy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Copy<half>(n, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Copy<half>(n, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // AXPY @@ -299,60 +322,65 @@ StatusCode CLBlastSaxpy(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Axpy(n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Axpy(n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDaxpy(const size_t n, const double alpha, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Axpy(n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Axpy(n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCaxpy(const size_t n, const cl_float2 alpha, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Axpy(n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Axpy(n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZaxpy(const size_t n, const cl_double2 alpha, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Axpy(n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Axpy(n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHaxpy(const size_t n, const cl_half alpha, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Axpy(n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Axpy(n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // DOT @@ -361,36 +389,39 @@ StatusCode CLBlastSdot(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dot<float>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dot<float>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDdot(const size_t n, cl_mem dot_buffer, const size_t dot_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dot<double>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dot<double>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHdot(const size_t n, cl_mem dot_buffer, const size_t dot_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dot<half>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dot<half>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // DOTU @@ -399,24 +430,26 @@ StatusCode CLBlastCdotu(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dotu<float2>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dotu<float2>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZdotu(const size_t n, cl_mem dot_buffer, const size_t dot_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dotu<double2>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dotu<double2>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // DOTC @@ -425,24 +458,26 @@ StatusCode CLBlastCdotc(const size_t n, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dotc<float2>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dotc<float2>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZdotc(const size_t n, cl_mem dot_buffer, const size_t dot_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Dotc<double2>(n, - dot_buffer, dot_offset, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Dotc<double2>(n, + dot_buffer, dot_offset, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // NRM2 @@ -450,51 +485,56 @@ StatusCode CLBlastSnrm2(const size_t n, cl_mem nrm2_buffer, const size_t nrm2_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Nrm2<float>(n, - nrm2_buffer, nrm2_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Nrm2<float>(n, + nrm2_buffer, nrm2_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDnrm2(const size_t n, cl_mem nrm2_buffer, const size_t nrm2_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Nrm2<double>(n, - nrm2_buffer, nrm2_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Nrm2<double>(n, + nrm2_buffer, nrm2_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastScnrm2(const size_t n, cl_mem nrm2_buffer, const size_t nrm2_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Nrm2<float2>(n, - nrm2_buffer, nrm2_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Nrm2<float2>(n, + nrm2_buffer, nrm2_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDznrm2(const size_t n, cl_mem nrm2_buffer, const size_t nrm2_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Nrm2<double2>(n, - nrm2_buffer, nrm2_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Nrm2<double2>(n, + nrm2_buffer, nrm2_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHnrm2(const size_t n, cl_mem nrm2_buffer, const size_t nrm2_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Nrm2<half>(n, - nrm2_buffer, nrm2_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Nrm2<half>(n, + nrm2_buffer, nrm2_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ASUM @@ -502,51 +542,56 @@ StatusCode CLBlastSasum(const size_t n, cl_mem asum_buffer, const size_t asum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Asum<float>(n, - asum_buffer, asum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Asum<float>(n, + asum_buffer, asum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDasum(const size_t n, cl_mem asum_buffer, const size_t asum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Asum<double>(n, - asum_buffer, asum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Asum<double>(n, + asum_buffer, asum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastScasum(const size_t n, cl_mem asum_buffer, const size_t asum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Asum<float2>(n, - asum_buffer, asum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Asum<float2>(n, + asum_buffer, asum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDzasum(const size_t n, cl_mem asum_buffer, const size_t asum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Asum<double2>(n, - asum_buffer, asum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Asum<double2>(n, + asum_buffer, asum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHasum(const size_t n, cl_mem asum_buffer, const size_t asum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Asum<half>(n, - asum_buffer, asum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Asum<half>(n, + asum_buffer, asum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SUM @@ -554,51 +599,56 @@ StatusCode CLBlastSsum(const size_t n, cl_mem sum_buffer, const size_t sum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sum<float>(n, - sum_buffer, sum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sum<float>(n, + sum_buffer, sum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsum(const size_t n, cl_mem sum_buffer, const size_t sum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sum<double>(n, - sum_buffer, sum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sum<double>(n, + sum_buffer, sum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastScsum(const size_t n, cl_mem sum_buffer, const size_t sum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sum<float2>(n, - sum_buffer, sum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sum<float2>(n, + sum_buffer, sum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDzsum(const size_t n, cl_mem sum_buffer, const size_t sum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sum<double2>(n, - sum_buffer, sum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sum<double2>(n, + sum_buffer, sum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsum(const size_t n, cl_mem sum_buffer, const size_t sum_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sum<half>(n, - sum_buffer, sum_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sum<half>(n, + sum_buffer, sum_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // AMAX @@ -606,51 +656,56 @@ StatusCode CLBlastiSamax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Amax<float>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Amax<float>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiDamax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Amax<double>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Amax<double>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiCamax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Amax<float2>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Amax<float2>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiZamax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Amax<double2>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Amax<double2>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiHamax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Amax<half>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Amax<half>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // MAX @@ -658,51 +713,56 @@ StatusCode CLBlastiSmax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Max<float>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Max<float>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiDmax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Max<double>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Max<double>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiCmax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Max<float2>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Max<float2>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiZmax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Max<double2>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Max<double2>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiHmax(const size_t n, cl_mem imax_buffer, const size_t imax_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Max<half>(n, - imax_buffer, imax_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Max<half>(n, + imax_buffer, imax_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // MIN @@ -710,51 +770,56 @@ StatusCode CLBlastiSmin(const size_t n, cl_mem imin_buffer, const size_t imin_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Min<float>(n, - imin_buffer, imin_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Min<float>(n, + imin_buffer, imin_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiDmin(const size_t n, cl_mem imin_buffer, const size_t imin_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Min<double>(n, - imin_buffer, imin_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Min<double>(n, + imin_buffer, imin_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiCmin(const size_t n, cl_mem imin_buffer, const size_t imin_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Min<float2>(n, - imin_buffer, imin_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Min<float2>(n, + imin_buffer, imin_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiZmin(const size_t n, cl_mem imin_buffer, const size_t imin_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Min<double2>(n, - imin_buffer, imin_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Min<double2>(n, + imin_buffer, imin_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastiHmin(const size_t n, cl_mem imin_buffer, const size_t imin_offset, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Min<half>(n, - imin_buffer, imin_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Min<half>(n, + imin_buffer, imin_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ================================================================================================= @@ -770,16 +835,17 @@ StatusCode CLBlastSgemv(const Layout layout, const Transpose a_transpose, const float beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDgemv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -789,16 +855,17 @@ StatusCode CLBlastDgemv(const Layout layout, const Transpose a_transpose, const double beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCgemv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -808,16 +875,17 @@ StatusCode CLBlastCgemv(const Layout layout, const Transpose a_transpose, const cl_float2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - float2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + float2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZgemv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -827,16 +895,17 @@ StatusCode CLBlastZgemv(const Layout layout, const Transpose a_transpose, const cl_double2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - double2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + double2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHgemv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -846,16 +915,17 @@ StatusCode CLBlastHgemv(const Layout layout, const Transpose a_transpose, const cl_half beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // GBMV @@ -867,16 +937,17 @@ StatusCode CLBlastSgbmv(const Layout layout, const Transpose a_transpose, const float beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, kl, ku, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, kl, ku, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDgbmv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, const size_t kl, const size_t ku, @@ -886,16 +957,17 @@ StatusCode CLBlastDgbmv(const Layout layout, const Transpose a_transpose, const double beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, kl, ku, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, kl, ku, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCgbmv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, const size_t kl, const size_t ku, @@ -905,16 +977,17 @@ StatusCode CLBlastCgbmv(const Layout layout, const Transpose a_transpose, const cl_float2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, kl, ku, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - float2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, kl, ku, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + float2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZgbmv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, const size_t kl, const size_t ku, @@ -924,16 +997,17 @@ StatusCode CLBlastZgbmv(const Layout layout, const Transpose a_transpose, const cl_double2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, kl, ku, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - double2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, kl, ku, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + double2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHgbmv(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, const size_t kl, const size_t ku, @@ -943,16 +1017,17 @@ StatusCode CLBlastHgbmv(const Layout layout, const Transpose a_transpose, const cl_half beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, kl, ku, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, kl, ku, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HEMV @@ -964,16 +1039,17 @@ StatusCode CLBlastChemv(const Layout layout, const Triangle triangle, const cl_float2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - float2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + float2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhemv(const Layout layout, const Triangle triangle, const size_t n, @@ -983,16 +1059,17 @@ StatusCode CLBlastZhemv(const Layout layout, const Triangle triangle, const cl_double2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hemv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - double2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hemv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + double2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HBMV @@ -1004,16 +1081,17 @@ StatusCode CLBlastChbmv(const Layout layout, const Triangle triangle, const cl_float2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, k, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - float2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, k, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + float2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhbmv(const Layout layout, const Triangle triangle, const size_t n, const size_t k, @@ -1023,16 +1101,17 @@ StatusCode CLBlastZhbmv(const Layout layout, const Triangle triangle, const cl_double2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, k, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - double2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, k, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + double2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HPMV @@ -1044,16 +1123,17 @@ StatusCode CLBlastChpmv(const Layout layout, const Triangle triangle, const cl_float2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - float2{alpha.s[0], alpha.s[1]}, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - float2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + float2{alpha.s[0], alpha.s[1]}, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + float2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhpmv(const Layout layout, const Triangle triangle, const size_t n, @@ -1063,16 +1143,17 @@ StatusCode CLBlastZhpmv(const Layout layout, const Triangle triangle, const cl_double2 beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - double2{alpha.s[0], alpha.s[1]}, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - double2{beta.s[0], beta.s[1]}, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + double2{alpha.s[0], alpha.s[1]}, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + double2{beta.s[0], beta.s[1]}, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYMV @@ -1084,16 +1165,17 @@ StatusCode CLBlastSsymv(const Layout layout, const Triangle triangle, const float beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsymv(const Layout layout, const Triangle triangle, const size_t n, @@ -1103,16 +1185,17 @@ StatusCode CLBlastDsymv(const Layout layout, const Triangle triangle, const double beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsymv(const Layout layout, const Triangle triangle, const size_t n, @@ -1122,16 +1205,17 @@ StatusCode CLBlastHsymv(const Layout layout, const Triangle triangle, const cl_half beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SBMV @@ -1143,16 +1227,17 @@ StatusCode CLBlastSsbmv(const Layout layout, const Triangle triangle, const float beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, k, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, k, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsbmv(const Layout layout, const Triangle triangle, const size_t n, const size_t k, @@ -1162,16 +1247,17 @@ StatusCode CLBlastDsbmv(const Layout layout, const Triangle triangle, const double beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, k, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, k, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsbmv(const Layout layout, const Triangle triangle, const size_t n, const size_t k, @@ -1181,16 +1267,17 @@ StatusCode CLBlastHsbmv(const Layout layout, const Triangle triangle, const cl_half beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Sbmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, k, - alpha, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Sbmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, k, + alpha, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SPMV @@ -1202,16 +1289,17 @@ StatusCode CLBlastSspmv(const Layout layout, const Triangle triangle, const float beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDspmv(const Layout layout, const Triangle triangle, const size_t n, @@ -1221,16 +1309,17 @@ StatusCode CLBlastDspmv(const Layout layout, const Triangle triangle, const double beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHspmv(const Layout layout, const Triangle triangle, const size_t n, @@ -1240,16 +1329,17 @@ StatusCode CLBlastHspmv(const Layout layout, const Triangle triangle, const cl_half beta, cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spmv(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - beta, - y_buffer, y_offset, y_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spmv(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + beta, + y_buffer, y_offset, y_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TRMV @@ -1258,75 +1348,80 @@ StatusCode CLBlastStrmv(const Layout layout, const Triangle triangle, const Tran const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtrmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtrmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtrmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHtrmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmv<half>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmv<half>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TBMV @@ -1335,75 +1430,80 @@ StatusCode CLBlastStbmv(const Layout layout, const Triangle triangle, const Tran const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbmv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbmv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtbmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbmv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbmv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtbmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbmv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbmv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtbmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbmv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbmv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHtbmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbmv<half>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbmv<half>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TPMV @@ -1412,75 +1512,80 @@ StatusCode CLBlastStpmv(const Layout layout, const Triangle triangle, const Tran const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpmv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpmv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtpmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpmv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpmv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtpmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpmv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpmv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtpmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpmv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpmv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHtpmv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpmv<half>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpmv<half>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TRSV @@ -1489,60 +1594,64 @@ StatusCode CLBlastStrsv(const Layout layout, const Triangle triangle, const Tran const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtrsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtrsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtrsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TBSV @@ -1551,60 +1660,64 @@ StatusCode CLBlastStbsv(const Layout layout, const Triangle triangle, const Tran const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbsv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbsv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtbsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbsv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbsv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtbsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbsv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbsv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtbsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const size_t k, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tbsv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, k, - a_buffer, a_offset, a_ld, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tbsv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, k, + a_buffer, a_offset, a_ld, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TPSV @@ -1613,60 +1726,64 @@ StatusCode CLBlastStpsv(const Layout layout, const Triangle triangle, const Tran const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpsv<float>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpsv<float>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtpsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpsv<double>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpsv<double>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtpsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpsv<float2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpsv<float2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtpsv(const Layout layout, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t n, const cl_mem ap_buffer, const size_t ap_offset, cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Tpsv<double2>(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - n, - ap_buffer, ap_offset, - x_buffer, x_offset, x_inc, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Tpsv<double2>(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + n, + ap_buffer, ap_offset, + x_buffer, x_offset, x_inc, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // GER @@ -1677,14 +1794,15 @@ StatusCode CLBlastSger(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Ger(static_cast<clblast::Layout>(layout), - m, n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Ger(static_cast<clblast::Layout>(layout), + m, n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDger(const Layout layout, const size_t m, const size_t n, @@ -1693,14 +1811,15 @@ StatusCode CLBlastDger(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Ger(static_cast<clblast::Layout>(layout), - m, n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Ger(static_cast<clblast::Layout>(layout), + m, n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHger(const Layout layout, const size_t m, const size_t n, @@ -1709,14 +1828,15 @@ StatusCode CLBlastHger(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Ger(static_cast<clblast::Layout>(layout), - m, n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Ger(static_cast<clblast::Layout>(layout), + m, n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // GERU @@ -1727,14 +1847,15 @@ StatusCode CLBlastCgeru(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Geru(static_cast<clblast::Layout>(layout), - m, n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Geru(static_cast<clblast::Layout>(layout), + m, n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZgeru(const Layout layout, const size_t m, const size_t n, @@ -1743,14 +1864,15 @@ StatusCode CLBlastZgeru(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Geru(static_cast<clblast::Layout>(layout), - m, n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Geru(static_cast<clblast::Layout>(layout), + m, n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // GERC @@ -1761,14 +1883,15 @@ StatusCode CLBlastCgerc(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gerc(static_cast<clblast::Layout>(layout), - m, n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gerc(static_cast<clblast::Layout>(layout), + m, n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZgerc(const Layout layout, const size_t m, const size_t n, @@ -1777,14 +1900,15 @@ StatusCode CLBlastZgerc(const Layout layout, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gerc(static_cast<clblast::Layout>(layout), - m, n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gerc(static_cast<clblast::Layout>(layout), + m, n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HER @@ -1794,14 +1918,15 @@ StatusCode CLBlastCher(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZher(const Layout layout, const Triangle triangle, const size_t n, @@ -1809,14 +1934,15 @@ StatusCode CLBlastZher(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HPR @@ -1826,14 +1952,15 @@ StatusCode CLBlastChpr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhpr(const Layout layout, const Triangle triangle, const size_t n, @@ -1841,14 +1968,15 @@ StatusCode CLBlastZhpr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HER2 @@ -1859,15 +1987,16 @@ StatusCode CLBlastCher2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZher2(const Layout layout, const Triangle triangle, const size_t n, @@ -1876,15 +2005,16 @@ StatusCode CLBlastZher2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HPR2 @@ -1895,15 +2025,16 @@ StatusCode CLBlastChpr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - float2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + float2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhpr2(const Layout layout, const Triangle triangle, const size_t n, @@ -1912,15 +2043,16 @@ StatusCode CLBlastZhpr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hpr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - double2{alpha.s[0], alpha.s[1]}, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hpr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + double2{alpha.s[0], alpha.s[1]}, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYR @@ -1930,14 +2062,15 @@ StatusCode CLBlastSsyr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsyr(const Layout layout, const Triangle triangle, const size_t n, @@ -1945,14 +2078,15 @@ StatusCode CLBlastDsyr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsyr(const Layout layout, const Triangle triangle, const size_t n, @@ -1960,14 +2094,15 @@ StatusCode CLBlastHsyr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SPR @@ -1977,14 +2112,15 @@ StatusCode CLBlastSspr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDspr(const Layout layout, const Triangle triangle, const size_t n, @@ -1992,14 +2128,15 @@ StatusCode CLBlastDspr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHspr(const Layout layout, const Triangle triangle, const size_t n, @@ -2007,14 +2144,15 @@ StatusCode CLBlastHspr(const Layout layout, const Triangle triangle, const cl_mem x_buffer, const size_t x_offset, const size_t x_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYR2 @@ -2025,15 +2163,16 @@ StatusCode CLBlastSsyr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsyr2(const Layout layout, const Triangle triangle, const size_t n, @@ -2042,15 +2181,16 @@ StatusCode CLBlastDsyr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsyr2(const Layout layout, const Triangle triangle, const size_t n, @@ -2059,15 +2199,16 @@ StatusCode CLBlastHsyr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - a_buffer, a_offset, a_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + a_buffer, a_offset, a_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SPR2 @@ -2078,15 +2219,16 @@ StatusCode CLBlastSspr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDspr2(const Layout layout, const Triangle triangle, const size_t n, @@ -2095,15 +2237,16 @@ StatusCode CLBlastDspr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHspr2(const Layout layout, const Triangle triangle, const size_t n, @@ -2112,15 +2255,16 @@ StatusCode CLBlastHspr2(const Layout layout, const Triangle triangle, const cl_mem y_buffer, const size_t y_offset, const size_t y_inc, cl_mem ap_buffer, const size_t ap_offset, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Spr2(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - n, - alpha, - x_buffer, x_offset, x_inc, - y_buffer, y_offset, y_inc, - ap_buffer, ap_offset, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Spr2(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + n, + alpha, + x_buffer, x_offset, x_inc, + y_buffer, y_offset, y_inc, + ap_buffer, ap_offset, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ================================================================================================= @@ -2136,17 +2280,18 @@ StatusCode CLBlastSgemm(const Layout layout, const Transpose a_transpose, const const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Transpose>(b_transpose), - m, n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Transpose>(b_transpose), + m, n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDgemm(const Layout layout, const Transpose a_transpose, const Transpose b_transpose, const size_t m, const size_t n, const size_t k, @@ -2156,17 +2301,18 @@ StatusCode CLBlastDgemm(const Layout layout, const Transpose a_transpose, const const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Transpose>(b_transpose), - m, n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Transpose>(b_transpose), + m, n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCgemm(const Layout layout, const Transpose a_transpose, const Transpose b_transpose, const size_t m, const size_t n, const size_t k, @@ -2176,17 +2322,18 @@ StatusCode CLBlastCgemm(const Layout layout, const Transpose a_transpose, const const cl_float2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Transpose>(b_transpose), - m, n, k, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - float2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Transpose>(b_transpose), + m, n, k, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + float2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZgemm(const Layout layout, const Transpose a_transpose, const Transpose b_transpose, const size_t m, const size_t n, const size_t k, @@ -2196,17 +2343,18 @@ StatusCode CLBlastZgemm(const Layout layout, const Transpose a_transpose, const const cl_double2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Transpose>(b_transpose), - m, n, k, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - double2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Transpose>(b_transpose), + m, n, k, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + double2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHgemm(const Layout layout, const Transpose a_transpose, const Transpose b_transpose, const size_t m, const size_t n, const size_t k, @@ -2216,17 +2364,18 @@ StatusCode CLBlastHgemm(const Layout layout, const Transpose a_transpose, const const cl_half beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Gemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Transpose>(b_transpose), - m, n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Gemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Transpose>(b_transpose), + m, n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYMM @@ -2238,17 +2387,18 @@ StatusCode CLBlastSsymm(const Layout layout, const Side side, const Triangle tri const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsymm(const Layout layout, const Side side, const Triangle triangle, const size_t m, const size_t n, @@ -2258,17 +2408,18 @@ StatusCode CLBlastDsymm(const Layout layout, const Side side, const Triangle tri const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCsymm(const Layout layout, const Side side, const Triangle triangle, const size_t m, const size_t n, @@ -2278,17 +2429,18 @@ StatusCode CLBlastCsymm(const Layout layout, const Side side, const Triangle tri const cl_float2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - float2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + float2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZsymm(const Layout layout, const Side side, const Triangle triangle, const size_t m, const size_t n, @@ -2298,17 +2450,18 @@ StatusCode CLBlastZsymm(const Layout layout, const Side side, const Triangle tri const cl_double2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - double2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + double2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsymm(const Layout layout, const Side side, const Triangle triangle, const size_t m, const size_t n, @@ -2318,17 +2471,18 @@ StatusCode CLBlastHsymm(const Layout layout, const Side side, const Triangle tri const cl_half beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Symm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Symm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HEMM @@ -2340,17 +2494,18 @@ StatusCode CLBlastChemm(const Layout layout, const Side side, const Triangle tri const cl_float2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - float2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + float2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZhemm(const Layout layout, const Side side, const Triangle triangle, const size_t m, const size_t n, @@ -2360,17 +2515,18 @@ StatusCode CLBlastZhemm(const Layout layout, const Side side, const Triangle tri const cl_double2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Hemm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - double2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Hemm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + double2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYRK @@ -2381,16 +2537,17 @@ StatusCode CLBlastSsyrk(const Layout layout, const Triangle triangle, const Tran const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syrk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syrk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsyrk(const Layout layout, const Triangle triangle, const Transpose a_transpose, const size_t n, const size_t k, @@ -2399,16 +2556,17 @@ StatusCode CLBlastDsyrk(const Layout layout, const Triangle triangle, const Tran const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syrk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syrk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCsyrk(const Layout layout, const Triangle triangle, const Transpose a_transpose, const size_t n, const size_t k, @@ -2417,16 +2575,17 @@ StatusCode CLBlastCsyrk(const Layout layout, const Triangle triangle, const Tran const cl_float2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syrk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - float2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syrk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + float2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZsyrk(const Layout layout, const Triangle triangle, const Transpose a_transpose, const size_t n, const size_t k, @@ -2435,16 +2594,17 @@ StatusCode CLBlastZsyrk(const Layout layout, const Triangle triangle, const Tran const cl_double2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syrk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - double2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syrk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + double2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsyrk(const Layout layout, const Triangle triangle, const Transpose a_transpose, const size_t n, const size_t k, @@ -2453,16 +2613,17 @@ StatusCode CLBlastHsyrk(const Layout layout, const Triangle triangle, const Tran const cl_half beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syrk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syrk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HERK @@ -2473,16 +2634,17 @@ StatusCode CLBlastCherk(const Layout layout, const Triangle triangle, const Tran const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Herk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Herk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZherk(const Layout layout, const Triangle triangle, const Transpose a_transpose, const size_t n, const size_t k, @@ -2491,16 +2653,17 @@ StatusCode CLBlastZherk(const Layout layout, const Triangle triangle, const Tran const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Herk(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Herk(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // SYR2K @@ -2512,17 +2675,18 @@ StatusCode CLBlastSsyr2k(const Layout layout, const Triangle triangle, const Tra const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDsyr2k(const Layout layout, const Triangle triangle, const Transpose ab_transpose, const size_t n, const size_t k, @@ -2532,17 +2696,18 @@ StatusCode CLBlastDsyr2k(const Layout layout, const Triangle triangle, const Tra const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCsyr2k(const Layout layout, const Triangle triangle, const Transpose ab_transpose, const size_t n, const size_t k, @@ -2552,17 +2717,18 @@ StatusCode CLBlastCsyr2k(const Layout layout, const Triangle triangle, const Tra const cl_float2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - float2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + float2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZsyr2k(const Layout layout, const Triangle triangle, const Transpose ab_transpose, const size_t n, const size_t k, @@ -2572,17 +2738,18 @@ StatusCode CLBlastZsyr2k(const Layout layout, const Triangle triangle, const Tra const cl_double2 beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - double2{beta.s[0], beta.s[1]}, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + double2{beta.s[0], beta.s[1]}, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHsyr2k(const Layout layout, const Triangle triangle, const Transpose ab_transpose, const size_t n, const size_t k, @@ -2592,17 +2759,18 @@ StatusCode CLBlastHsyr2k(const Layout layout, const Triangle triangle, const Tra const cl_half beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Syr2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Syr2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // HER2K @@ -2614,17 +2782,18 @@ StatusCode CLBlastCher2k(const Layout layout, const Triangle triangle, const Tra const float beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZher2k(const Layout layout, const Triangle triangle, const Transpose ab_transpose, const size_t n, const size_t k, @@ -2634,17 +2803,18 @@ StatusCode CLBlastZher2k(const Layout layout, const Triangle triangle, const Tra const double beta, cl_mem c_buffer, const size_t c_offset, const size_t c_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Her2k(static_cast<clblast::Layout>(layout), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(ab_transpose), - n, k, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - beta, - c_buffer, c_offset, c_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Her2k(static_cast<clblast::Layout>(layout), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(ab_transpose), + n, k, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + beta, + c_buffer, c_offset, c_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TRMM @@ -2654,17 +2824,18 @@ StatusCode CLBlastStrmm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtrmm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2672,17 +2843,18 @@ StatusCode CLBlastDtrmm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtrmm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2690,17 +2862,18 @@ StatusCode CLBlastCtrmm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtrmm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2708,17 +2881,18 @@ StatusCode CLBlastZtrmm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHtrmm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2726,17 +2900,18 @@ StatusCode CLBlastHtrmm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trmm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trmm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // TRSM @@ -2746,17 +2921,18 @@ StatusCode CLBlastStrsm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDtrsm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2764,17 +2940,18 @@ StatusCode CLBlastDtrsm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastCtrsm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2782,17 +2959,18 @@ StatusCode CLBlastCtrsm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZtrsm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2800,17 +2978,18 @@ StatusCode CLBlastZtrsm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHtrsm(const Layout layout, const Side side, const Triangle triangle, const Transpose a_transpose, const Diagonal diagonal, const size_t m, const size_t n, @@ -2818,17 +2997,18 @@ StatusCode CLBlastHtrsm(const Layout layout, const Side side, const Triangle tri const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Trsm(static_cast<clblast::Layout>(layout), - static_cast<clblast::Side>(side), - static_cast<clblast::Triangle>(triangle), - static_cast<clblast::Transpose>(a_transpose), - static_cast<clblast::Diagonal>(diagonal), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Trsm(static_cast<clblast::Layout>(layout), + static_cast<clblast::Side>(side), + static_cast<clblast::Triangle>(triangle), + static_cast<clblast::Transpose>(a_transpose), + static_cast<clblast::Diagonal>(diagonal), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ================================================================================================= @@ -2842,14 +3022,15 @@ StatusCode CLBlastSomatcopy(const Layout layout, const Transpose a_transpose, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Omatcopy(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Omatcopy(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastDomatcopy(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -2857,14 +3038,15 @@ StatusCode CLBlastDomatcopy(const Layout layout, const Transpose a_transpose, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Omatcopy(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Omatcopy(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastComatcopy(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -2872,14 +3054,15 @@ StatusCode CLBlastComatcopy(const Layout layout, const Transpose a_transpose, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Omatcopy(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - float2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Omatcopy(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + float2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastZomatcopy(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -2887,14 +3070,15 @@ StatusCode CLBlastZomatcopy(const Layout layout, const Transpose a_transpose, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Omatcopy(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - double2{alpha.s[0], alpha.s[1]}, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Omatcopy(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + double2{alpha.s[0], alpha.s[1]}, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } StatusCode CLBlastHomatcopy(const Layout layout, const Transpose a_transpose, const size_t m, const size_t n, @@ -2902,26 +3086,31 @@ StatusCode CLBlastHomatcopy(const Layout layout, const Transpose a_transpose, const cl_mem a_buffer, const size_t a_offset, const size_t a_ld, cl_mem b_buffer, const size_t b_offset, const size_t b_ld, cl_command_queue* queue, cl_event* event) { - auto status = clblast::Omatcopy(static_cast<clblast::Layout>(layout), - static_cast<clblast::Transpose>(a_transpose), - m, n, - alpha, - a_buffer, a_offset, a_ld, - b_buffer, b_offset, b_ld, - queue, event); - return static_cast<StatusCode>(status); + try { + return static_cast<StatusCode>(clblast::Omatcopy(static_cast<clblast::Layout>(layout), + static_cast<clblast::Transpose>(a_transpose), + m, n, + alpha, + a_buffer, a_offset, a_ld, + b_buffer, b_offset, b_ld, + queue, event)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ================================================================================================= // Clears the cache of stored binaries StatusCode CLBlastClearCache() { - return static_cast<StatusCode>(clblast::ClearCache()); + try { + return static_cast<StatusCode>(clblast::ClearCache()); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // Fills the cache with binaries for a specific device StatusCode CLBlastFillCache(const cl_device_id device) { - return static_cast<StatusCode>(clblast::FillCache(device)); + try { + return static_cast<StatusCode>(clblast::FillCache(device)); + } catch (...) { return static_cast<StatusCode>(clblast::DispatchExceptionForC()); } } // ================================================================================================= |