1! { dg-do run }
2! { dg-options "-std=legacy" }
3!
4! PR 20163, first half:  Trailing blanks on an option to
5!                        open used to cause an error
6      CHARACTER*8 ST
7      ST = 'SCRATCH '
8      OPEN(UNIT=10,STATUS=ST)
9      END
10