Ada 编程/编译指示/导出

摘要

该编译指示导出指示编译器将 Ada 中编写的子程序或数据对象提供给外国计算机语言。如果导出子程序，它将使用外国语言期望的约定进行编译。例如，如果将子程序导出到 C，则在子程序中声明的记录类型将与 C 样式结构相同的方式进行编译。

支持的外国语言集取决于编译器实现。通常支持 C、C++、Cobol 和 Fortran。

示例

/* C file */
int main() { 
  int My_Int;  
  adainit();   
  /* Zoiks! C is using an Ada function! */
  My_Int = My_Ada_Function();
  adafinal();
  return 0;
}

-- Ada File
function My_Ada_Function return Integer is begin
  return 1;
end My_Ada_Function;
pragma Export
(Convention    => C,
 Entity        => My_Ada_Function,
 External_Name => "My_Ada_Function" );

另请参见

维基教科书