diff options
Diffstat (limited to 'gcc/ada/a-ngrear.adb')
| -rw-r--r-- | gcc/ada/a-ngrear.adb | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/gcc/ada/a-ngrear.adb b/gcc/ada/a-ngrear.adb index b0cf3e1fd72..5c8a0092477 100644 --- a/gcc/ada/a-ngrear.adb +++ b/gcc/ada/a-ngrear.adb @@ -433,11 +433,7 @@ package body Ada.Numerics.Generic_Real_Arrays is end if; for J in 1 .. N loop - if Piv (J) /= J then - Det := -Det * LU (J, J); - else - Det := Det * LU (J, J); - end if; + Det := (if Piv (J) /= J then -Det * LU (J, J) else Det * LU (J, J)); end loop; return Det; |