Multiply by 2 instead of left-shifting a potentially negative number

fixes GCC ubsan warning in the BLAS tests
This commit is contained in:
Martin Kroeker 2020-08-02 18:29:56 +02:00 committed by GitHub
parent 0ef4b3f1f2
commit 81dcfdcf39
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 3 deletions

View File

@ -235,9 +235,9 @@ int CNAME(BLASLONG m, BLASLONG n, BLASLONG dummy1, FLOAT alpha_r, FLOAT alpha_i,
if ( m < 1 ) return(0);
if ( n < 1 ) return(0);
inc_x <<= 1;
inc_y <<= 1;
lda <<= 1;
inc_x *= 2;
inc_y *= 2;
lda <<= 1;
lda4 = lda << 2;
xbuffer = buffer;