mirror of
https://gcc.gnu.org/git/gcc.git
synced 2024-11-23 19:03:59 +08:00
e.54.2.c (main): Use N / 8 instead of 32 as block_size.
* libgomp.c/examples-4/e.54.2.c (main): Use N / 8 instead of 32 as block_size. * libgomp.fortran/examples-4/e.54.2.f90 (e_54_1): Use n / 8 instead of 32 as block_size. From-SVN: r217579
This commit is contained in:
parent
d8607f259c
commit
b1bf6c522f
@ -1,3 +1,10 @@
|
||||
2014-11-14 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
* libgomp.c/examples-4/e.54.2.c (main): Use N / 8 instead
|
||||
of 32 as block_size.
|
||||
* libgomp.fortran/examples-4/e.54.2.f90 (e_54_1): Use n / 8
|
||||
instead of 32 as block_size.
|
||||
|
||||
2014-11-13 Andrey Turetskiy <andrey.turetskiy@intel.com>
|
||||
Ilya Verbin <ilya.verbin@intel.com>
|
||||
|
||||
|
@ -61,7 +61,7 @@ int main ()
|
||||
init (v1, v2, N);
|
||||
|
||||
p1 = dotprod_ref (v1, v2, N);
|
||||
p2 = dotprod (v1, v2, N, 32, 2, 8);
|
||||
p2 = dotprod (v1, v2, N, N / 8, 2, 8);
|
||||
|
||||
check (p1, p2);
|
||||
|
||||
|
@ -59,7 +59,7 @@ program e_54_1
|
||||
allocate (B(n), C(n))
|
||||
call init (B, C, n)
|
||||
ref = dotprod_ref (B, C, n)
|
||||
d = dotprod (B, C, n, 32, 2, 8)
|
||||
d = dotprod (B, C, n, n / 8, 2, 8)
|
||||
call check (ref, d)
|
||||
deallocate (B, C)
|
||||
end program
|
||||
|
Loading…
Reference in New Issue
Block a user