xref: /llvm-project/flang/test/Preprocessing/pp045.F (revision 0e811d3b66ff85c13629d80c483c5d706eb4d15f)
1*0e811d3bSPeter Klausler! RUN: %flang -E %s 2>&1 | FileCheck %s
2*0e811d3bSPeter Klausler! CHECK: n = "foobar" // "baz"
3*0e811d3bSPeter Klausler* # stringizing works in FLM
4*0e811d3bSPeter Klausler#define STR(x) # x
5*0e811d3bSPeter Klausler#define MAC(a,b) STR(a ## b)
6*0e811d3bSPeter Klausler      program main
7*0e811d3bSPeter Klausler      character(6) n
8*0e811d3bSPeter Klausler      n = MAC(foo, bar) // STR( baz )
9*0e811d3bSPeter Klausler      end
10