diff options
| author | Thomas Bauereiss | 2018-05-09 16:51:17 +0100 |
|---|---|---|
| committer | Thomas Bauereiss | 2018-05-09 16:51:17 +0100 |
| commit | c498c8a7f8d448dcefd1692e7562878cc6feb62b (patch) | |
| tree | 0c002cf7171237c1c3afc05522790aa7dcded093 /src | |
| parent | 86f7649e6b6cc00ea1d73a59d25d4bc4938ae1f5 (diff) | |
Fix printing of hex strings in Lem
Diffstat (limited to 'src')
| -rw-r--r-- | src/gen_lib/sail_values.lem | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/gen_lib/sail_values.lem b/src/gen_lib/sail_values.lem index 2d9eda9c..5c6dc593 100644 --- a/src/gen_lib/sail_values.lem +++ b/src/gen_lib/sail_values.lem @@ -414,6 +414,7 @@ let rec hexstring_of_bits bs = match bs with | (Just n, Just s) -> Just (n :: s) | _ -> Nothing end + | [] -> Just [] | _ -> Nothing end declare {isabelle} termination_argument hexstring_of_bits = automatic |