我需要将 2 条数据从 Ada 程序传递给一些 C++ 代码进行处理。
我能够使用 Long_Float(在 C++ 中为 double)和 Integer(在 C++ 中为 int，但显然不是 64 位)在 Ada 中创建一个与我的 C++ 方法一起工作的过程。 我使用了以下代码(代码不在我身上，所以语法可能略有偏差):
procedure send_data (this : in hidden_ptr; data : in Long_Float; time : in Integer);
pragma import (CPP, send_data, "MyClass::sendData");
现在它正在运行，我正在尝试将时间扩展到完整的 64 位，并且理想情况下希望在 C++ 端有一个 unsigned long long。我在 Ada 中没有看到任何匹配的类型，所以我创建了自己的类型:
type U64 is mod 2 ** 64;
在我的 send_data 方法中使用该类型时，我收到一条错误消息，指出无法将该类型映射到 C++ 类型(类似的情况，同样没有代码或确切的错误短语)。
有没有办法将 Ada 中的用户定义类型传递给 C++？也许 Ada 中还有另一种类型可以用作无符号的 64 位值？如果更容易的话，有没有办法将我的 U64 类型的地址作为参数传递给 C++ 方法？我正在使用 green hills adamulti 编译器 v3.5(对于 ada 来说非常新，不确定该信息是否有帮助)。示例将不胜感激!
最佳答案
作为@KeithThompson 的评论/回答的附录...
Ada 官方支持的 C 接口(interface)类型在 Interfaces.C 中，并且那里没有超长整型或无符号(在 2005 版本中。2012 版本正式了吗？)。
您做了正确的事情来解决它。如果您的编译器不支持，则必须采取更严厉的措施。
要尝试的第一个显而易见的事情是通过引用传递 64 位 int。不过，这将需要在 C 端进行更改。
我知道 C/C++ TIME 结构往往是 64 位值，定义为 union 结构。所以你可以做的是定义一个 Ada 记录来模仿那些 C 结构之一，确保它按照 C 的方式进行布局(例如:使用记录表示和大小子句)，然后使该对象成为你导入的例程使用的对象它的参数。
之后，您将不得不使用讨厌的参数技巧。例如，您可以尝试将参数的 Ada 导入端更改为 64 位 float ，unchecked_converting_converting 实际参数为 64 位 float ，并尝试以这种方式传递它。那里的问题是很多 CPU 的 pass float 在与 int 不同的寄存器中。所以这可能行不通，如果行得通，那肯定是不可移植的。
如果您弄清楚编译器的 CPP 调用约定是如何工作的，那么很可能还有其他方法来伪造它。例如，如果它使用两个相邻的 32 位寄存器来传递 64 位整数，您可以将 Ada 64 位整数拆分为两个，并在 Ada 端将其传递到两个参数中。如果它通过引用传递 64 位值，您可以告诉 Ada 端您正在传递一个指向 U64 的指针。同样，这些解决方案不可移植，但它们可以让您继续前进。
关于c++ - Ada 到 C++ : Pass an unsigned 64-bit value，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/12504774/
我想为Heroku构建一个Rails3应用程序。他们使用Postgres作为他们的数据库，所以我通过MacPorts安装了postgres9.0。现在我需要一个postgresgem并且共识是出于性能原因你想要pggem。但是我对我得到的错误感到非常困惑当我尝试在rvm下通过geminstall安装pg时。我已经非常明确地指定了所有postgres目录的位置可以找到但仍然无法完成安装:$envARCHFLAGS='-archx86_64'geminstallpg--\--with-pg-config=/opt/local/var/db/postgresql90/defaultdb/po
我正在使用的第三方API的文档状态:"[O]urAPIonlyacceptspaddedBase64encodedstrings."什么是“填充的Base64编码字符串”以及如何在Ruby中生成它们。下面的代码是我第一次尝试创建转换为Base64的JSON格式数据。xa=Base64.encode64(a.to_json) 最佳答案 他们说的padding其实就是Base64本身的一部分。它是末尾的“=”和“==”。Base64将3个字节的数据包编码为4个编码字符。所以如果你的输入数据有长度n和n%3=1=>"=="末尾用于填充n%
我的瘦服务器配置了nginx，我的ROR应用程序正在它们上运行。在我发布代码更新时运行thinrestart会给我的应用程序带来一些停机时间。我试图弄清楚如何优雅地重启正在运行的Thin实例，但找不到好的解决方案。有没有人能做到这一点？ 最佳答案 #Restartjustthethinserverdescribedbythatconfigsudothin-C/etc/thin/mysite.ymlrestartNginx将继续运行并代理请求。如果您将Nginx设置为使用多个上游服务器，例如server{listen80;server
我正在尝试在Ruby中复制Convert.ToBase64String()行为。这是我的C#代码:varsha1=newSHA1CryptoServiceProvider();varpasswordBytes=Encoding.UTF8.GetBytes("password");varpasswordHash=sha1.ComputeHash(passwordBytes);returnConvert.ToBase64String(passwordHash);//returns"W6ph5Mm5Pz8GgiULbPgzG37mj9g="当我在Ruby中尝试同样的事情时，我得到了相同sha
如何将send与+=一起使用？a=20;a.send"+=",10undefinedmethod`+='for20:Fixnuma=20;a+=10=>30 最佳答案 恐怕你不能。+=不是方法，而是语法糖。参见http://www.ruby-doc.org/docs/ProgrammingRuby/html/tut_expressions.html它说Incommonwithmanyotherlanguages,Rubyhasasyntacticshortcut:a=a+2maybewrittenasa+=2.你能做的最好的事情是:
我对如何计算通过{%assignvar=0%}赋值的变量加一完全感到困惑。这应该是最简单的任务。到目前为止，这是我尝试过的:{%assignamount=0%}{%forvariantinproduct.variants%}{%assignamount=amount+1%}{%endfor%}Amount:{{amount}}结果总是0。也许我忽略了一些明显的东西。也许有更好的方法。我想要存档的只是获取运行的迭代次数。 最佳答案 因为{{incrementamount}}将输出您的变量值并且不会影响{%assign%}定义的变量，我
我有一个数组数组，想将元素附加到子数组。+=做我想做的，但我想了解为什么push不做。我期望的行为(并与+=一起工作):b=Array.new(3,[])b[0]+=["apple"]b[1]+=["orange"]b[2]+=["frog"]b=>[["苹果"],["橙子"],["Frog"]]通过推送，我将推送的元素附加到每个子数组(为什么？):a=Array.new(3,[])a[0].push("apple")a[1].push("orange")a[2].push("frog")a=>[[“苹果”、“橙子”、“Frog”]、[“苹果”、“橙子”、“Frog”]、[“苹果”、“
有没有办法让Ruby能够做这样的事情？classPlane@moved=0@x=0defx+=(v)#thisiserror@x+=v@moved+=1enddefto_s"moved#{@moved}times,currentxis#{@x}"endendplane=Plane.newplane.x+=5plane.x+=10putsplane.to_s#moved2times,currentxis15 最佳答案 您不能在Ruby中覆盖复合赋值运算符。任务在内部处理。您应该覆盖+，而不是+=。plane.a+=b与plane.a=
我正在尝试复制此GETcurl请求:curl-D--XGET-H"Authorization:BasicdGVzdEB0YXByZXNlYXJjaC5jb206NGMzMTg2Mjg4YWUyM2ZkOTY2MWNiNWRmY2NlMTkzMGU="-H"Content-Type:application/json"http://staging.example.com/api/v1/campaigns在Ruby中，通过电子邮件+apikey生成身份验证:auth="Basic"+Base64::encode64("test@example.com:4c3186288ae23fd9661c
出于某种原因，heroku尝试要求dm-sqlite-adapter，即使它应该在这里使用Postgres。请注意，这发生在我打开任何URL时-而不是在gitpush本身期间。我构建了一个默认的Facebook应用程序。gem文件:source:gemcuttergem"foreman"gem"sinatra"gem"mogli"gem"json"gem"httparty"gem"thin"gem"data_mapper"gem"heroku"group:productiondogem"pg"gem"dm-postgres-adapter"endgroup:development,:t