-
Notifications
You must be signed in to change notification settings - Fork 3
Expand file tree
/
Copy pathtest.pl.patch
More file actions
35 lines (31 loc) · 1022 Bytes
/
test.pl.patch
File metadata and controls
35 lines (31 loc) · 1022 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
--- perl5/t/test.pl
+++ t/test.pl
@@ -1,3 +1,7 @@
+# --------------------------------------------
+# Modified t/test.pl for running Perl test suite with PerlOnJava
+# --------------------------------------------
+
#
# t/test.pl - most of Test::More functionality without the fuss
@@ -587,16 +591,16 @@
last SKIP;
}
sub skip_if_miniperl {
- skip(@_) if is_miniperl();
+ ## PerlOnJava is not miniperl
+ # skip(@_) if is_miniperl();
}
sub skip_without_dynamic_extension {
- my $extension = shift;
- skip("no dynamic loading on miniperl, no extension $extension", @_)
- if is_miniperl();
- return if &_have_dynamic_extension($extension);
- skip("extension $extension was not built", @_);
+ ## PerlOnJava has dynamic extension
+ # my $extension = shift;
+ # skip("no dynamic loading on miniperl, no extension $extension", @_)
+ # if is_miniperl();
+ # return if &_have_dynamic_extension($extension);
+ # skip("extension $extension was not built", @_);
}
sub todo_skip {