2014-01-30 Alangi Derick <alangiderick@gmail.com>
[official-gcc.git] / gcc / testsuite / gfortran.dg / simplify_modulo.f90
blob550a3adb9c73555e177b66b6fecdd39e616cedbc
1 ! { dg-do run }
3 if (modulo (-8., -5.) .ne. -3.) call abort ()
5 end