File tree Expand file tree Collapse file tree 4 files changed +5
-5
lines changed Expand file tree Collapse file tree 4 files changed +5
-5
lines changed Original file line number Diff line number Diff line change 77
77
78
78
# COPYRIGHT AND LICENSE
79
79
80
- This software is copyright (c) 2018 by Graham Ollis.
80
+ This software is copyright (c) 2018-2022 by Graham Ollis.
81
81
82
82
This is free software; you can redistribute it and/or modify it under
83
83
the same terms as the Perl 5 programming language system itself.
Original file line number Diff line number Diff line change @@ -31,7 +31,7 @@ In your t/mytest.t:
31
31
32
32
use Test2::V0;
33
33
use Test2::Tools::FFI;
34
-
34
+
35
35
is(
36
36
ffi->test->function( mytest => [] => 'int')->call,
37
37
42,
Original file line number Diff line number Diff line change @@ -15,7 +15,7 @@ subtest 'ffi->runtime' => sub {
15
15
},
16
16
;
17
17
18
- lives { $ffi -> function(t2t_simple_init => [] => ' void' ) };
18
+ try_ok { $ffi -> function(t2t_simple_init => [] => ' void' ) };
19
19
20
20
is(
21
21
intercept { ffi-> runtime-> symbol_ok(' xxx' ) },
@@ -70,7 +70,7 @@ subtest 'ffi->combined' => sub {
70
70
}
71
71
;
72
72
73
- lives { $ffi -> function(t2t_simple_init => [] => ' void' ) };
73
+ try_ok { $ffi -> function(t2t_simple_init => [] => ' void' ) };
74
74
};
75
75
76
76
subtest ' call diagnostics from c' => sub {
Original file line number Diff line number Diff line change @@ -54,7 +54,7 @@ subtest 'ffi->combined' => sub {
54
54
}
55
55
;
56
56
57
- lives { $ffi -> function(t2t_simple_init => [] => ' void' ) };
57
+ try_ok { $ffi -> function(t2t_simple_init => [] => ' void' ) };
58
58
};
59
59
60
60
done_testing
You can’t perform that action at this time.
0 commit comments