summaryrefslogtreecommitdiff
path: root/src/lem_interp/run_with_elf_cheri.ml
diff options
context:
space:
mode:
authorShaked Flur2018-01-29 13:07:34 +0000
committerShaked Flur2018-01-29 13:07:34 +0000
commit605c4f71d0549fcbe1b9ccbb517fcd162bfd0c06 (patch)
treef1c4b863b9d159f132038d40cfaf786f0c9180ce /src/lem_interp/run_with_elf_cheri.ml
parent8475527be0c7cf6d4412c432d3c63cfba38176a7 (diff)
Linksem does not use uint anymore
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