diff options
Diffstat (limited to 'language')
| -rw-r--r-- | language/l2.lem | 1 | ||||
| -rw-r--r-- | language/l2.ml | 1 | ||||
| -rw-r--r-- | language/l2.ott | 2 |
3 files changed, 3 insertions, 1 deletions
diff --git a/language/l2.lem b/language/l2.lem index 94c93fe5..88953684 100644 --- a/language/l2.lem +++ b/language/l2.lem @@ -87,6 +87,7 @@ type base_effect_aux = (* effect *) | BE_nondet (* nondeterminism from intra-instruction parallelism *) | BE_escape (* Tracking of expressions and functions that might call exit *) | BE_lset (* Local mutation happend; not user-writable *) + | BE_lret (* Local return happened; not user-writable *) type base_effect = diff --git a/language/l2.ml b/language/l2.ml index 39f430db..1a35432b 100644 --- a/language/l2.ml +++ b/language/l2.ml @@ -85,6 +85,7 @@ base_effect_aux = (* effect *) | BE_nondet (* nondeterminism from intra-instruction parallelism *) | BE_escape (* Tracking of expressions and functions that might call exit *) | BE_lset (* Local mutation happend; not user-writable *) + | BE_lret (* Local return happened; not user-writable *) type diff --git a/language/l2.ott b/language/l2.ott index 96a30265..96483b90 100644 --- a/language/l2.ott +++ b/language/l2.ott @@ -197,7 +197,7 @@ base_effect :: 'BE_' ::= | nondet :: :: nondet {{ com nondeterminism from intra-instruction parallelism }} | escape :: :: escape {{ com Tracking of expressions and functions that might call exit }} | lset :: :: lset {{ com Local mutation happend; not user-writable }} - + | lret :: :: lret {{ com Local return happened; not user-writable }} effect :: 'Effect_' ::= {{ com effect set, of kind Effects }} |