1! { dg-do run }
2! { dg-options "-fdec -Wcharacter-truncation" }
3!
4! Modified by Mark Eggleston <mark.eggleston@codethink.com>
5!
6include "dec_char_conversion_in_assignment_1.f90"
7
8! { dg-warning "is truncated in conversion" " " { target *-*-* } 46 }
9! { dg-warning "is truncated in conversion" " " { target *-*-* } 47 }
10! { dg-warning "is truncated in conversion" " " { target *-*-* } 48 }
11! { dg-warning "is truncated in conversion" " " { target *-*-* } 49 }
12! { dg-warning "is truncated in conversion" " " { target *-*-* } 50 }
13! { dg-warning "is truncated in conversion" " " { target *-*-* } 51 }
14! { dg-warning "is truncated in conversion" " " { target *-*-* } 52 }
15! { dg-warning "is truncated in conversion" " " { target *-*-* } 53 }
16
17