File tree Expand file tree Collapse file tree 1 file changed +0
-31
lines changed Expand file tree Collapse file tree 1 file changed +0
-31
lines changed Original file line number Diff line number Diff line change @@ -95,37 +95,6 @@ package Evalbot;
95
95
cmd_line => ' PATH=/usr/local/mono-2.10.1/bin:/usr/local/bin:/usr/bin:/bin LD_LIBRARY_PATH=/usr/local/mono-2.10.1/lib mono ./run/Niecza.exe --safe --obj-dir=obj %program' ,
96
96
revision => sub { get_revision_from_file(' ~/niecza/VERSION' )},
97
97
},
98
- b => {
99
- chdir => " $home /rakudo/" ,
100
- cmd_line => ' PERL6LIB=lib install/bin/perl6 %program' ,
101
- revision => sub { get_revision_from_file(' ~/p/rakudo-revision' )},
102
- nolock => 1,
103
- filter => \&filter_pct,
104
- # Rakudo loops infinitely when first using Safe.pm, and then declaring
105
- # another class. So don't do that, rather inline the contents of Safe.pm.
106
- program_prefix => q<
107
- module Safe { our sub forbidden(*@a, *%h) { die "Operation not permitted in safe mode" };
108
- Q:PIR {
109
- $P0 = get_hll_namespace
110
- $P1 = get_hll_global ['Safe'], '&forbidden'
111
- $P0['!qx'] = $P1
112
- null $P1
113
- set_hll_global ['IO'], 'Socket', $P1
114
- }; };
115
- Q:PIR {
116
- .local pmc s
117
- s = get_hll_global ['Safe'], '&forbidden'
118
- $P0 = getinterp
119
- $P0 = $P0['outer';'lexpad';1]
120
- $P0['&run'] = s
121
- $P0['&open'] = s
122
- $P0['&slurp'] = s
123
- $P0['&unlink'] = s
124
- $P0['&dir'] = s
125
- };
126
- # EVALBOT ARTIFACT
127
- > ,
128
- },
129
98
' rakudo-parrot' => {
130
99
chdir => " $home " ,
131
100
cmd_line => ' ./rakudo-inst/bin/perl6-p --setting=RESTRICTED %program' ,
You can’t perform that action at this time.
0 commit comments