diff options
| author | Eduardo Julian | 2020-05-09 02:12:56 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-05-09 02:12:56 -0400 |
| commit | 8d9fd8b34f8716be7fa1059eb9761330d9667753 (patch) | |
| tree | aacc3fef52551c6b02f66435dedd5a0e5bfc18bc /stdlib/source/lux/control/security/policy.lux | |
| parent | 3e524725cfb47cb56466a08ac290ed5a389748be (diff) | |
Including runtime machinery in the cache.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/control/security/policy.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/control/security/policy.lux b/stdlib/source/lux/control/security/policy.lux index f61f4c58b..d210f91e1 100644 --- a/stdlib/source/lux/control/security/policy.lux +++ b/stdlib/source/lux/control/security/policy.lux @@ -27,7 +27,7 @@ {#can-upgrade (Can-Upgrade brand label) #can-downgrade (Can-Downgrade brand label)}) - (def: Privilege<_> + (def: privilege Privilege {#can-upgrade (..can-upgrade (|>> :abstraction)) #can-downgrade (..can-downgrade (|>> :representation))}) @@ -53,7 +53,7 @@ (Ex [label] (-> (Context brand scope label) (scope label)))) - (context ..Privilege<_>)) + (context ..privilege)) (def: (decorate constructor) (-> Type Type) |