我是一个完全的Ada新手,尽管我在HS期间已经使用Pascal 2-3年了。
IIRC,可以从C/C++调用Pascal编译函数。可以从C++调用用Ada编写的过程和函数吗?
发布于 2008-11-01 16:59:29
根据这个old tutorial,这应该是可能的。
但是,正如this thread所说明的,您必须小心使用c++函数的外部"C“定义。
发布于 2017-01-24 10:40:09
下面是一个使用g++/gnatmake 5.3.0的例子:
注意:在C++和Ada之间传递数据时要小心
ada_pkg.ads
package Ada_Pkg is
procedure DoSomething (Number : in Integer);
pragma Export (C, DoSomething, "doSomething");
end Ada_Pkg;
ada_pkg.adb
with Ada.Text_Io;
package body Ada_Pkg is
procedure DoSomething (Number : in Integer) is
begin
Ada.Text_Io.Put_Line ("Ada: RECEIVED " & Integer'Image(Number));
end DoSomething;
begin
null;
end Ada_Pkg;
main.cpp
/*
TO BUILD:
gnatmake -c ada_pkg
g++ -c main.cpp
gnatbind -n ada_pkg
gnatlink ada_pkg -o main --LINK=g++ -lstdc++ main.o
*/
#include <iostream>
extern "C" {
void doSomething (int data);
void adainit ();
void adafinal ();
}
int main () {
adainit(); // Required for Ada
doSomething(44);
adafinal(); // Required for Ada
std::cout << "in C++" << std::endl;
return 0;
}
参考文献:
发布于 2009-01-09 17:54:52
这类事情一直都在做。诀窍是告诉两端对例程使用"C"-style调用协议。在C++中,这是通过外部"C“声明完成的,而在Ada端则使用杂注导出("C",...
请在您最喜欢的参考资料中查找这些内容以获取详细信息。注意指针和引用参数!
https://stackoverflow.com/questions/255741
复制相似问题