RFC: Help me understand this

[Tobias Schlüter]

Jerry DeLisle wrote:
> Hi folks,
> 
> I have been exploring Dominique's comment 19 to pr31610.  I think there 
> is something else going on here.  Maybe someone can help me understand.
> 
> With this exploratory case.
> 
> character(len=20) :: string
> character(len=20) :: outstr
> character(len=1)  :: c, x
> logical :: a(20)
> c = "A"
> x = "x"
> string = "jjjjjjjjjjjjjjjjjjjj"
> outstr = "rrrrrrrrrrrrrrrrrrrr"
> a = .true.
> outstr = transfer (merge (transfer(c, x, 20), "b", a), string )
> write(*,*) oustr
              ^^^^^
> end

This lacks a t.  Is this intentional?

Cheers,
- Tobi