diff options
| author | Bruce Hill <bitbucket@bruce-hill.com> | 2018-01-11 04:38:46 -0800 |
|---|---|---|
| committer | Bruce Hill <bitbucket@bruce-hill.com> | 2018-01-11 04:38:46 -0800 |
| commit | 3fbc89273dbebadf5e70197a51ddfae3131202c4 (patch) | |
| tree | c15cd9aa121bfda34be46103a6cc4e706e3042db /lib/permissions.nom | |
| parent | 756c1f718ee427d89e5fdbfae00f760b89f793eb (diff) | |
Removed some dead code and streamlined the API a bit. Also added
training wheels for ease of transitions.
Diffstat (limited to 'lib/permissions.nom')
| -rw-r--r-- | lib/permissions.nom | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/lib/permissions.nom b/lib/permissions.nom deleted file mode 100644 index bb49242..0000000 --- a/lib/permissions.nom +++ /dev/null @@ -1,18 +0,0 @@ -use "lib/metaprogramming.nom" -use "lib/control_flow.nom" -use "lib/operators.nom" -use "lib/collections.nom" - -action [called by %whitelist]: - if ((%whitelist's "type") != "List"): %whitelist = [%whitelist] - %defs = (..) - dict ([(nomsu's "defs")->(nomsu "get_stub" [%]), yes] for all %whitelist) - for %caller in (nomsu's "callstack"): - if (%caller == "#macro"): do next %caller - if (%defs -> (nomsu "get_stub" [%caller's 1])): return (yes) - return (no) - -parse [fail unless called by %whitelist] as: - unless (called by %whitelist): error "Failed to find \(%whitelist) in callstack." - - |