(long int) (GFC_DESCRIPTOR_RANK (retarray)),
(long int) rank);
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{
if (rank != GFC_DESCRIPTOR_RANK (retarray))
runtime_error ("rank of return array incorrect in MINLOC intrinsic");
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{
(long int) (GFC_DESCRIPTOR_RANK (retarray)),
(long int) rank);
- if (compile_options.bounds_check)
+ if (unlikely (compile_options.bounds_check))
{
for (n=0; n < rank; n++)
{