Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 21 lines (17 sloc) 0.573 kb
06a7305 @pmichaud Add deprecation notice to SAFE.setting.
pmichaud authored
1 # SAFE.setting is deprecated, use RESTRICTED.setting instead.
2
7c001ff @jnthn Add first cut of SAFE.setting, for the benefit of p6eval. Plenty miss…
jnthn authored
3 sub restricted($what) {
4 die "$what is disallowed in safe mode"
5 }
6
105cec6 @moritz switch SAFE and CORE to sigilless params
moritz authored
7 sub open(|) { restricted('open') }
8 sub unlink(|) { restricted('unlink') }
9 sub shell(|) { restricted('shell') }
10 sub run(|) { restricted('run') }
11 sub QX(|) { restricted('qx, qqx') }
12 sub mkdir(|) { restricted('mkdir') }
13 sub rmdir(|) { restricted('rmdir') }
14 sub rename(|) { restricted('rename') }
15 sub copy(|) { restricted('copy') }
7c001ff @jnthn Add first cut of SAFE.setting, for the benefit of p6eval. Plenty miss…
jnthn authored
16
17 my class IO { }
18 IO.^add_fallback(
19 -> $, $ { True },
20 -> $, $ { restricted('IO') });
Something went wrong with that request. Please try again.