[Patch, Fortran] PR34186 -fdump-parse-tree fixes

[Dominique Dhumieres]

I see

(gdb) print ts
$1 = (gfc_typespec *) 0x40e0bb60
(gdb) print ts->cl
$2 = (gfc_charlen *) 0x0
(gdb) print ts->cl->length
Cannot access memory at address 0x0

This probably explain the crash.

Dominique