We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent cdb9fe2 commit b697015Copy full SHA for b697015
doc/Language/nativecall.pod6
@@ -291,15 +291,15 @@ members:
291
class MyStruct is repr('CStruct') {
292
has CArray[num64] $!arr;
293
has Str $!str;
294
- has IntStruct $!int-struct;
+ has Point $!point; # Point is a user-defined class
295
296
submethod TWEAK {
297
my $arr := CArray[num64].new;
298
$arr[0] = 0.9e0;
299
$arr[1] = 0.2e0;
300
$!arr := $arr;
301
$!str := 'Perl 6 is fun';
302
- $!int-struct := IntStruct.new;
+ $!point := Point.new;
303
}
304
305
0 commit comments