File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -1439,20 +1439,20 @@ subroutine test_conditional_if_defined(error)
1439
1439
call test_failed(error, ' Expected "some_module" dependency with SOME_FEATURE and SIMPLE_MACRO defined' )
1440
1440
return
1441
1441
end if
1442
- if (.not. (' other_module' .in . f_source% modules_used)) then ! some_module
1442
+ if (.not. (' other_module' .in . f_source% modules_used)) then ! other_module
1443
1443
call test_failed(error, ' Expected "other_module" dependency with SOME_FEATURE and SIMPLE_MACRO defined' )
1444
1444
return
1445
1445
end if
1446
- if (.not. (' third_module' .in . f_source% modules_used)) then ! some_module
1446
+ if (.not. (' third_module' .in . f_source% modules_used)) then ! third_module
1447
1447
call test_failed(error, ' Expected "third_module" dependency with SOME_FEATURE and SIMPLE_MACRO defined' )
1448
1448
return
1449
1449
end if
1450
- if (.not. (' fifth_module' .in . f_source% modules_used)) then ! some_module
1450
+ if (.not. (' fifth_module' .in . f_source% modules_used)) then ! fifth_module
1451
1451
call test_failed(error, ' Expected "fifth_module" dependency with SOME_FEATURE and SIMPLE_MACRO defined' )
1452
1452
return
1453
1453
end if
1454
1454
1455
- if (size (f_source% modules_used) /= 4 ) then ! some_module
1455
+ if (size (f_source% modules_used) /= 4 ) then ! all modules
1456
1456
call test_failed(error, ' Expected 4 module dependencies with SOME_FEATURE and SIMPLE_MACRO defined' )
1457
1457
return
1458
1458
end if
You can’t perform that action at this time.
0 commit comments