xref: /llvm-project/flang/test/Preprocessing/bug129131.F (revision 9ed075595e14cd1f71fc5e75512ab476547b5362)
1*9ed07559SLeandro Lupori! RUN: %flang_fc1 -fdebug-unparse %s 2>&1 | FileCheck %s
23c2fc7a4SPeter Klausler! CHECK: PRINT *, 2_4
34a3e4b99SPeter Klausler! CHECK: PRINT *, 1_4
43c2fc7a4SPeter Klausler#define a ,3
53c2fc7a4SPeter Klausler      print *, mod(5 a)
64a3e4b99SPeter Klausler      print *, mod(4 a
74a3e4b99SPeter Klausler     +)
83c2fc7a4SPeter Klausler      end
9