repeated error messages

[Steve Kargl]

laptop:kargl[202] cat zxc.f90
program foo
  type bar
    character(len=:), allocatable :: s
  end type bar

  type(bar) bah

  bah%s = 'shoot'

end program foo
laptop:kargl[203] 
laptop:kargl[203] gfc4x -o z zxc.f90 
zxc.f90:3.38:

    character(len=:), allocatable :: s
                                      1
Error: Deferred-length character component 's' at (1) is not yet supported
zxc.f90:3.38:

    character(len=:), allocatable :: s
                                      1
Error: Deferred-length character component 's' at (1) is not yet supported

Can the repeated error message be suppressed?  If not,
how about removing the error message, and letting gfortran
ICE.

-- 
Steve