ocl: final code cleanup (#923)

- Introduced OPENCL_LIBSMM_TODO.
- Adjusted quick-option.

Author: hfp

src/acc/opencl/smm/opencl_libsmm.c

@@ -40,6 +40,9 @@
 #  if !defined(OPENCL_LIBSMM_CMEM) && 1
 #    define OPENCL_LIBSMM_CMEM
 #  endif
+#  if !defined(OPENCL_LIBSMM_TODO) && 0
+#    define OPENCL_LIBSMM_TODO
+#  endif
 /* default: decompose C-matrix into column-vectors (BMxBN) */
 #  if !defined(OPENCL_LIBSMM_DEFAULT_BM)
 #    define OPENCL_LIBSMM_DEFAULT_BM INT_MAX
@@ -1006,15 +1009,20 @@ int opencl_libsmm_acc_process(const int* host_param_stack, const int* dev_param_
               (NULL == env_wg || '\0' == *env_wg) ? (0 != defaults ? default_wg : config->wg) : atoi(env_wg), -2, 2);
             new_config.nz = LIBXSMM_CLMP(
               (NULL == env_nz || '\0' == *env_nz) ? (0 != defaults ? /*default*/ 0 : config->nz) : atoi(env_nz), 0, 1);
-            new_config.al = LIBXSMM_CLMP(/* bug with AL=1? */
+#  if defined(OPENCL_LIBSMM_TODO)
+            new_config.al = LIBXSMM_CLMP(/* bug with AL=1 and XF=1? */
               (NULL == env_al || '\0' == *env_al) ? (0 != defaults ? /*default*/ 0 : config->al) : atoi(env_al), 0, 1);
+#  else
+            LIBXSMM_UNUSED(env_al);
+            new_config.al = 0;
+#  endif
             new_config.tb = LIBXSMM_CLMP(
               (NULL == env_tb || '\0' == *env_tb) ? (0 != defaults ? /*default*/ 0 : config->tb) : atoi(env_tb), 0, 1);
             new_config.tc = LIBXSMM_CLMP(
               (NULL == env_tc || '\0' == *env_tc) ? (0 != defaults ? /*default*/ 1 : config->tc) : atoi(env_tc), 0, 1);
             new_config.ap = LIBXSMM_CLMP(
               (NULL == env_ap || '\0' == *env_ap) ? (0 != defaults ? /*default*/ 0 : config->ap) : atoi(env_ap), 0, 1);
-            new_config.aa = LIBXSMM_CLMP(/* bug with AA=2 XF=1? */
+            new_config.aa = LIBXSMM_CLMP(/* bug with AA=2 and XF=1? */
               (NULL == env_aa || '\0' == *env_aa) ? (0 != defaults ? default_aa : config->aa) : atoi(env_aa), 0, 2);
             new_config.ab = LIBXSMM_CLMP(
               (NULL == env_ab || '\0' == *env_ab) ? (0 != defaults ? default_ab : config->ab) : atoi(env_ab), 0, 2);

src/acc/opencl/smm/tune_multiply.py

@@ -936,6 +936,7 @@ def handle_sigint(self, signum, frame):
     if 1 <= args.tlevel or 0 > args.tlevel:
         os.environ["OPENCL_LIBSMM_SMM_BM"] = "{}".format(args.bm)
         os.environ["OPENCL_LIBSMM_SMM_BN"] = "{}".format(args.bn)
+        os.environ["OPENCL_LIBSMM_SMM_AL"] = "{}".format(args.al)
     if 2 <= args.tlevel or 0 > args.tlevel:
         os.environ["OPENCL_LIBSMM_SMM_TB"] = "{}".format(args.tb)
         os.environ["OPENCL_LIBSMM_SMM_TC"] = "{}".format(args.tc)