blob: 4deb5f9a5ee99d3d43e7fb6c11da4a71b6bee43e [file] [log] [blame]
! RUN: %flang -E %s 2>&1 | FileCheck %s
! CHECK: n = "foobar" // "baz"
! # stringizing works in FLM
#define STR(x) # x
#define MAC(a,b) STR(a ## b)
program main
character(6) n
n = MAC(foo, bar) // STR( baz )
end