summaryrefslogtreecommitdiff
path: root/src/lem_interp/run_with_elf_cheri.ml
diff options
context:
space:
mode:
authorAlasdair Armstrong2018-01-29 14:32:59 +0000
committerAlasdair Armstrong2018-01-29 14:32:59 +0000
commit0258cb243bcd63fe81ff761c12def9f71048e3db (patch)
treeea86535c399769bdaa5425d2b1f93a37bd50bcfc /src/lem_interp/run_with_elf_cheri.ml
parentb3bca96a2c3ec108606c1fbc6a8ec533d6c0c344 (diff)
parent36f086ce2b3506e2a81ef77ad03f3b339b8f0518 (diff)
Merge branch 'sail2' of https://bitbucket.org/Peter_Sewell/sail into sail2
Diffstat (limited to 'src/lem_interp/run_with_elf_cheri.ml')
-rw-r--r--src/lem_interp/run_with_elf_cheri.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lem_interp/run_with_elf_cheri.ml b/src/lem_interp/run_with_elf_cheri.ml
index 46bc92fb..3d187aa9 100644
--- a/src/lem_interp/run_with_elf_cheri.ml
+++ b/src/lem_interp/run_with_elf_cheri.ml
@@ -396,7 +396,7 @@ let initial_system_state_of_elf_file name =
match Nat_big_num.to_int e_machine with
| 8 (* EM_MIPS *) ->
let startaddr =
- let e_entry = Uint64.of_string (Nat_big_num.to_string e_entry) in
+ let e_entry = Uint64_wrapper.of_bigint e_entry in
match Abi_mips64.abi_mips64_compute_program_entry_point segments e_entry with
| Error.Fail s -> failwith "Failed computing entry point"
| Error.Success s -> s