Skip to content

Instantly share code, notes, and snippets.

@grondilu
Last active August 29, 2015 14:00
Show Gist options
  • Save grondilu/11295465 to your computer and use it in GitHub Desktop.
Save grondilu/11295465 to your computer and use it in GitHub Desktop.
patch to NativeCall test suite so that the tests pass on my 32bit system
diff --git a/t/05-arrays.t b/t/05-arrays.t
index ab9797e..a11f8d3 100644
--- a/t/05-arrays.t
+++ b/t/05-arrays.t
@@ -49,7 +49,7 @@ compile_test_lib('05-arrays');
{
class Struct is repr('CStruct') {
- has int $.val;
+ has int32 $.val;
method set($x) {
$!val = $x;
diff --git a/t/06-struct.t b/t/06-struct.t
index 79f09b9..6e2fc7e 100644
--- a/t/06-struct.t
+++ b/t/06-struct.t
@@ -8,7 +8,7 @@ plan 30;
compile_test_lib('06-struct');
class MyStruct is repr('CStruct') {
- has int $.int;
+ has int32 $.int;
has num $.num;
has int8 $.byte;
has num32 $.float;
@@ -19,7 +19,7 @@ class MyStruct is repr('CStruct') {
$!byte = 7;
$!num = -3.7e0;
$!float = 3.14e0;
- my $arr := CArray[int].new();
+ my $arr := CArray[int32].new();
$arr[0] = 1;
$arr[1] = 2;
$!arr := $arr;
@@ -29,16 +29,16 @@ class MyStruct is repr('CStruct') {
# Workaround a Rakudo-bug where $!arr := CArray[int].new() won't work if $.arr
# is declared as type CArray[int].
class MyStruct2 is repr('CStruct') {
- has int $.int;
+ has int32 $.int;
has num $.num;
has int8 $.byte;
has num32 $.float;
- has CArray[int] $.arr;
+ has CArray[int32] $.arr;
}
class IntStruct is repr('CStruct') {
- has int $.first;
- has int $.second;
+ has int32 $.first;
+ has int32 $.second;
# Work around struct members not being containerized yet.
method init {
diff --git a/t/08-callbacks.t b/t/08-callbacks.t
index 7990981..001bdd8 100644
--- a/t/08-callbacks.t
+++ b/t/08-callbacks.t
@@ -8,8 +8,8 @@ plan(9);
compile_test_lib('08-callbacks');
class Struct is repr('CStruct') {
- has Str $.str;
- has int $.ival;
+ has Str $.str;
+ has int32 $.ival;
method init {
$!str := 'Tweedledum, tweedledee';
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment