[gfortran,committed] Fix PR33881, wrong code for assumed length character arrays

[FX Coudert]

Committed the following fix for PR33881 (a 4.3 regression), proposed  
by Paul, reviewed and regtested (on x86_64-linux) by me:

http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=129874