generic interface无法区分c_float与real

愤怒的三炮

下面的代码对c_float接口和real接口的函数进行重载：

[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode

program main

    use iso_c_binding
    implicit none
    
    interface print_number
        procedure:: print_number_real, print_number_c_float
    end interface
  
    
    call print_number(1.0)
    
    
    contains
    
        subroutine print_number_real(a)
            real:: a
            print*, a
        
        end subroutine
        
        subroutine print_number_c_float(a)
            real(c_float):: a
            print*, a
        
        end subroutine

end program

提示错误：Error: Ambiguous interfaces in generic interface 'print_number' for 'print_number_real' at (1) and 'print_number_c_float' at (2)

难道是编译器把c_float和real当成同一种类型了吗？

愤怒的三炮

楚香饭 发表于 2025-7-17 08:40
本质上都是 float32，32位浮点。
重载看他本质上的类型，而不是看他取了个什么别名。 ...

是的，c_float只是一个别名。
感谢刘涛解答~

楚香饭

本质上都是 float32，32位浮点。
重载看他本质上的类型，而不是看他取了个什么别名。

愤怒的三炮

确实是这样，已解决。

愤怒的三炮

GCC version 14.1.0 和 intel fortran 2021.13.1 皆是如此。