diff options
| author | Thomas Bauereiss | 2018-02-14 19:45:07 +0000 |
|---|---|---|
| committer | Thomas Bauereiss | 2018-02-15 20:11:21 +0000 |
| commit | 737ec26cf494affb346504c482e9b91127b68636 (patch) | |
| tree | 30bcac2487eb2294952624aa25321a0299c6e2e7 /src/gen_lib/sail_values.lem | |
| parent | 9883998c6de1a0421eacb4f4c352b0aa8c4a1b5c (diff) | |
Rebase state monad onto prompt monad
Generate only one Lem model based on the prompt monad (instead of two models
with different monads), and add a lifting from prompt to state monad. Add some
Isabelle lemmas about the monad lifting.
Also drop the "_embed" and "_sequential" suffixes from names of generated
files.
Diffstat (limited to 'src/gen_lib/sail_values.lem')
| -rw-r--r-- | src/gen_lib/sail_values.lem | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gen_lib/sail_values.lem b/src/gen_lib/sail_values.lem index 34e4bd98..3d55843e 100644 --- a/src/gen_lib/sail_values.lem +++ b/src/gen_lib/sail_values.lem @@ -608,7 +608,7 @@ type register = type register_ref 'regstate 'regval 'a = <| name : string; - is_inc : bool; + (*is_inc : bool;*) read_from : 'regstate -> 'a; write_to : 'regstate -> 'a -> 'regstate; of_regval : 'regval -> maybe 'a; |
