【发布时间】:2018-07-01 10:32:22
【问题描述】:
这些 sn-ps 代码可能看起来很奇怪,这是因为我从我的原始代码开始并截断了部分,直到我到达重现错误的最小指令集。所以忍受表面上的无用。
有两个 perl6 模块,一个 uses 另一个,还有一个程序。
这是第一个模块:
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的方法test中的赋值引起的:
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 模块中的错误还是我看不到的其他错误?
【问题讨论】:
-
声明
test1并单独使用它也可以...声明 A 并实例化它也不会导致任何问题,无论是在 2018.03 还是 2018.06。你能再试试看吗? -
如果您删除
[void]它不会产生该错误。
标签: raku nativecall