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