Skip to content
GitLab
Commit 6c479dad authored by Sven-Bodo Scholz's avatar Sven-Bodo Scholz
Browse files

style-corrections requested at merge

parent 35f9ca18
develop NTC_INFOCHN-improvements WLF-DBUG-output-improvement alwyn-fold-traversal bodo-subsel bottom-wl-parts cinterface-improvement-sbs cinterface-improvement-sbs-rebase error-streamlining fix-cmake-distmem-sbs fixing-structs fp16 giacomos-damn-modulo-on-long gijs-fold-suballoc hotfix-1288 hotfix-2266 hotfix-2287 hotfix-2318 hotfix-2319 hotfix-2337 hotfix-2344 hotfix-2434 hotfix-2434-ea hotfix-2437 hotfix-cc-warnings-check-c hotfix-mowl-cuknl keeping-strings-sbs new_fun_types_charl one-bit-booleans opencl-timon opt-rearrange plibsac2c-fix rc_feedback_gijs records-reg records-reg-rebase revive-cudahybrid sbs-add-checks-variants-in-sac2crc sbs-assign-global-objects sbs-multi-assign type-extension-shape-relations v2.0.0-Tintigny v1.3.3-MijasCosta
No related merge requests found
Pipeline #301 passed with stages
in 132 minutes and 44 seconds
Hide whitespace changes
Inline Side-by-side
Showing
with 19 additions and 17 deletions
+19 -17
src/libsac2c/codegen/icm2c_cuda.c
+ 19
- 17
View file @ 6c479dad
......@@ -268,20 +268,21 @@ ICMCompileCUDA_GRID_BLOCK (int bounds_count, char **var_ANY)
#define CUDA_SET_GRID(fmt, ...) \
fprintf (global.outfile, "dim3 grid(" fmt ");\n", __VA_ARGS__); \
INDENT; \
fprintf (global.outfile, "SAC_TR_GPU_PRINT (\"CUDA XYZ grid dimension of " \
"%%u x %%u x %%u\", grid.x , grid.y , grid.z );\n" ); \
fprintf (global.outfile, \
"SAC_TR_GPU_PRINT (\"CUDA XYZ grid dimension of " \
"%%u x %%u x %%u\", grid.x , grid.y , grid.z );\n"); \
INDENT; \
fprintf (global.outfile, "if (grid.x <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA X grid dimension must be bigger than zero. Current"\
" value is %%u\", grid.x);" ); \
" value is %%u\", grid.x);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (grid.y <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Y grid dimension must be bigger than zero. Current"\
" value is %%u\", grid.y);" ); \
" value is %%u\", grid.y);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (grid.z <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Z grid dimension must be bigger than zero. Current"\
" value is %%u\", grid.z);" ); \
" value is %%u\", grid.z);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (grid.x > %u || grid.y > %u || grid.z > %u) {\n", \
global.cuda_max_x_grid, global.cuda_max_yz_grid, global.cuda_max_yz_grid); \
......@@ -300,20 +301,21 @@ ICMCompileCUDA_GRID_BLOCK (int bounds_count, char **var_ANY)
#define CUDA_SET_BLOCK(fmt, ...) \
fprintf (global.outfile, "dim3 block(" fmt ");", __VA_ARGS__); \
INDENT; \
fprintf (global.outfile, "SAC_TR_GPU_PRINT (\"CUDA XYZ block dimension of " \
"%%u x %%u x %%u\\n\", block.x , block.y , block.z );\n" ); \
fprintf (global.outfile, \
"SAC_TR_GPU_PRINT (\"CUDA XYZ block dimension of " \
"%%u x %%u x %%u\\n\", block.x , block.y , block.z );\n"); \
INDENT; \
fprintf (global.outfile, "if (block.x <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA X block dimension must be bigger than zero. Current"\
" value is %%u\", block.x);" ); \
fprintf (global.outfile, "if (block.x <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA X block dimension must be bigger than zero. " \
"Current value is %%u\", block.x);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (block.y <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Y block dimension must be bigger than zero. Current"\
" value is %%u\", block.y);" ); \
fprintf (global.outfile, "if (block.y <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Y block dimension must be bigger than zero. " \
"Current value is %%u\", block.y);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (block.z <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Z block dimension must be bigger than zero. Current"\
" value is %%u\", block.z);" ); \
fprintf (global.outfile, "if (block.z <= 0 ) {\n" \
"SAC_RuntimeError(\"CUDA Z block dimension must be bigger than zero. " \
"Current value is %%u\", block.z);"); \
fprintf (global.outfile, "}\n"); \
fprintf (global.outfile, "if (block.x > %u || block.y > %u || block.z > %u) {\n", \
global.cuda_max_xy_block, global.cuda_max_xy_block, \
......@@ -340,7 +342,7 @@ ICMCompileCUDA_GRID_BLOCK (int bounds_count, char **var_ANY)
fprintf (global.outfile, \
"SAC_RuntimeError(\"CUDA XYZ block dimension of %%u x %%u x %%u = %%u " \
"exceeds compute capability's max number of threads per block: %u\", " \
" block.x, block.y, block.z, block.x * block.y *block.z );\n", \
"block.x, block.y, block.z, block.x * block.y * block.z);\n", \
global.cuda_max_threads_block); \
INDENT; \
INDENT; \
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment