奇怪的消息在NativeCall perl6模块中声明指针[void]

发布时间：2020-12-15 23:36:14 所属栏目：大数据来源：网络整理

导读：这些代码段可能看起来很奇怪,这是因为我从原始代码开始并切断了碎片,直到我找到了再现错误的最小指令集.所以忍受明显的无用. 有两个perl6模块,一个使用另一个,还有一个程序. 这是第一个模块： unit class test1;use NativeCall;use test2;method test{ my Po

这些代码段可能看起来很奇怪,这是因为我从原始代码开始并切断了碎片,直到我找到了再现错误的最小指令集.所以忍受明显的无用.
有两个perl6模块,一个使用另一个,还有一个程序.
这是第一个模块：

unit class test1;

use NativeCall;
use test2;

method test
{
  my Pointer[void] $dummy .= new;
}

第二个模块包含在第一个模块中,但实际上并未使用它的任何部分：

unit module test2;

use NativeCall;

class A is repr('CStruct') is export {
  has Pointer[void] $.wrongdoer;
  has int32 $.a;
}

该程序创建一个test1对象并调用测试方法：

use lib '.';
use test1;

my test1 $t .= new;
$t.test;

该程序输出一个错误,显然是由类test1的方法测试中的赋值引起的：

Type check failed in assignment to $dummy; expected NativeCall::Types::Pointer[NativeCall::Types::void] but got NativeCall::Types::Pointer[NativeCall::Types::void].new(0)

如果我在第二个类中注释掉$.wrongdoer,则程序执行时没有错误.
我正在运行rakudo 2018.06.
这是NativeCall模块中的错误还是其他我看不到的错误？

解决方法

正如布拉德吉尔伯特所建议的那样,移除[虚空]可以阻止远处的幽灵动作.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!