fdurastante/amg4psblas
1
0
Fork 0
mirror of https://github.com/sfilippone/amg4psblas.git synced 2026-10-06 22:55:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

Inconsistent C function names

Browse Source
This commit is contained in:
sfilippone
2026-01-27 12:32:46 +01:00
parent 92425e2478
commit 14d24b1d7c
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
cbind/amgprec/amg_dprec_cbind_mod.F90
+2 -2
View File
@@ -245,7 +245,7 @@ contains
return
end function amg_c_dsmoothers_build
function amg_c_dsmoothers_build_format(ah,cdh,ph,afmt,cdfmt) bind(c) result(res)
function amg_c_dsmoothers_build_opt(ah,cdh,ph,afmt,cdfmt) bind(c) result(res)
#if defined (PSB_HAVE_CUDA)
use psb_cuda_mod
#endif
@@ -357,7 +357,7 @@ contains
MLDC_ERR_HANDLE(res)
return
end function amg_c_dsmoothers_build_format
end function amg_c_dsmoothers_build_opt
function amg_c_dkrylov(methd,&
& ah,ph,bh,xh,cdh,options) bind(c) result(res)
cbind/test/pargen/amgecgpu.c
+1 -1
View File
@@ -505,7 +505,7 @@ int main(int argc, char *argv[])
}
}
#if defined (PSB_HAVE_CUDA)
if ((ret = amg_c_dsmoothers_build_format(ah, cdh, ph, afmt, cdfmt)) != 0)
if ((ret = amg_c_dsmoothers_build_opt(ah, cdh, ph, afmt, cdfmt)) != 0)
fprintf(stderr, "From smoothers_build_format: %d\n", ret);
#else
if ((ret = amg_c_dsmoothers_build(ah, cdh, ph)) != 0)