1! RUN: %python %S/test_errors.py %s %flang_fc1 2 3! Test that intrinsic functions used as subroutines and vice versa are caught. 4 5subroutine test(x, t) 6 intrinsic :: sin, cpu_time 7 !ERROR: Cannot call function 'sin' like a subroutine 8 call sin(x) 9 !ERROR: Cannot call subroutine 'cpu_time' like a function 10 x = cpu_time(t) 11end subroutine 12 13 14