Skip to content

Commit b697015

Browse files
committed
Use Point instead of IntStruct
1 parent cdb9fe2 commit b697015

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

doc/Language/nativecall.pod6

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -291,15 +291,15 @@ members:
291291
class MyStruct is repr('CStruct') {
292292
has CArray[num64] $!arr;
293293
has Str $!str;
294-
has IntStruct $!int-struct;
294+
has Point $!point; # Point is a user-defined class
295295
296296
submethod TWEAK {
297297
my $arr := CArray[num64].new;
298298
$arr[0] = 0.9e0;
299299
$arr[1] = 0.2e0;
300300
$!arr := $arr;
301301
$!str := 'Perl 6 is fun';
302-
$!int-struct := IntStruct.new;
302+
$!point := Point.new;
303303
}
304304
}
305305

0 commit comments

Comments
 (0)