begin short int j;
      j := "joo" { dg-error "char.*short int" }
end