Commit ec66bca6 authored by Antoine Jego's avatar Antoine Jego
Browse files

removed modules from repo + print to see where we crash

parent 4e99bf25
...@@ -3,3 +3,5 @@ build*/ ...@@ -3,3 +3,5 @@ build*/
.envrc .envrc
compile_commands.json compile_commands.json
fstarpu_mpi_mod.f90
fstarpu_mod.f90
...@@ -54,6 +54,7 @@ program fstarpu_example_dgemm ...@@ -54,6 +54,7 @@ program fstarpu_example_dgemm
integer :: te, ts, tr integer :: te, ts, tr
real :: tf, gflops real :: tf, gflops
write(*,*) "initializing starpu ..."
ret = fstarpu_init(C_NULL_PTR) ret = fstarpu_init(C_NULL_PTR)
if (ret == -19) then if (ret == -19) then
stop 77 stop 77
...@@ -61,6 +62,7 @@ program fstarpu_example_dgemm ...@@ -61,6 +62,7 @@ program fstarpu_example_dgemm
stop 1 stop 1
end if end if
write(*,*) "initializing starpu+MPI ..."
ret = fstarpu_mpi_init(1) ret = fstarpu_mpi_init(1)
if (ret /= 0) then if (ret /= 0) then
write(*,'("fstarpu_mpi_init status:",i4)') ret write(*,'("fstarpu_mpi_init status:",i4)') ret
......
This diff is collapsed.
This diff is collapsed.
Markdown is supported
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