We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 96c4c98 commit 4476209Copy full SHA for 4476209
src/tests/integration/events/async-hello.F90
@@ -48,7 +48,7 @@ program main
48
work_if_ready: select case(ready_count-previous_count(image))
49
case(0) ! keep spinning until greeting is ready
50
case(1) ! event posted so get and print greeting
51
- write(greeting,"(2(a,i2))") greeting[image]
+ write(greeting,"(a)") greeting[image]
52
associate(expected_location=>23)
53
! Verify that the greetings of images 1-9 have their image number at the expected location:
54
if (scan(greeting,set="123456789")/=expected_location) error stop "Test failed."
0 commit comments