Fix Compile error with ifort -warn all - Contributed by Orion Poplawski
authorJulie <julie@cs.utk.edu>
Mon, 13 Jun 2016 06:27:02 +0000 (23:27 -0700)
committerJulie <julie@cs.utk.edu>
Mon, 13 Jun 2016 06:27:02 +0000 (23:27 -0700)
commit87d4098c68c24953202b946e33f4c09f7d0279ff
tree19180a6ef88a6cd9e4af382541d20735bfc0ab8d
parented2ea1af894955ddd1ddfd0acb15e1c07d459f1e
Fix Compile error with ifort -warn all - Contributed by Orion Poplawski

Compiling current lapack svn trunk with ifort -warn all results in
errors like:

ifort -O3 -fp-model strict -warn all -c sorcsd2by1.f -o sorcsd2by1.o
sorcsd2by1.f(350): error #6633: The type of the actual argument differs
from
the type of the dummy argument.   [0]
           CALL SORBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, 0, 0,
------------------------------------------------------------------^
sorcsd2by1.f(350): error #6633: The type of the actual argument differs
from
the type of the dummy argument.   [0]
           CALL SORBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, 0, 0,
---------------------------------------------------------------------^
sorcsd2by1.f(351): error #6633: The type of the actual argument differs
from
the type of the dummy argument.   [0]
    $                    0, 0, WORK, -1, CHILDINFO )
--------------------------^
sorcsd2by1.f(351): error #6633: The type of the actual argument differs
from
the type of the dummy argument.   [0]
    $                    0, 0, WORK, -1, CHILDINFO )
-----------------------------^

ifort -O3 -fp-model strict -warn all -c cgesdd.f -o cgesdd.o
cgesdd.f(343): error #6633: The type of the actual argument differs
from the
type of the dummy argument.   [CDUM]
           CALL CGEBRD( M, N, CDUM(1), M, CDUM(1), DUM(1), CDUM(1),
-------------------------------------------^
SRC/cgesdd.f
SRC/cuncsd2by1.f
SRC/dorcsd2by1.f
SRC/sorcsd2by1.f
SRC/zgesdd.f
SRC/zuncsd2by1.f