cpp5.f

来自「用于进行gcc测试」· F 代码 · 共 5 行

        ! { dg-do run }
#include "cpp5.h"
        IF (FOO().NE.1) CALL ABORT ()
        END