summaryrefslogtreecommitdiff
path: root/src/lem_interp/run_with_elf.ml
diff options
context:
space:
mode:
authorKathy Gray2015-12-22 13:46:11 +0000
committerKathy Gray2015-12-22 13:46:11 +0000
commit9219f8adddac4f6b6fc10e9c4965215b09829468 (patch)
tree1467bbdecb328c4162d5b51fd5e02a9aea2dfc65 /src/lem_interp/run_with_elf.ml
parent0ca565a91df971fac0f69b28d84def84174e1ccf (diff)
More make file goo, and fixing a typo in run_with_elf
Diffstat (limited to 'src/lem_interp/run_with_elf.ml')
-rw-r--r--src/lem_interp/run_with_elf.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lem_interp/run_with_elf.ml b/src/lem_interp/run_with_elf.ml
index 811cdc8e..e873f162 100644
--- a/src/lem_interp/run_with_elf.ml
+++ b/src/lem_interp/run_with_elf.ml
@@ -875,7 +875,7 @@ let fetch_instruction_opcode_and_update_ia model =
(([Mem.find pc_a !prog_mem;
Mem.find (add1 pc_a) !prog_mem;
Mem.find (add1 (add1 pc_a)) !prog_mem;
- Mem.find (add1 (add1 (add1 pc_a))) !prog_mem])) in
+ Mem.find (add1 (add1 (add1 pc_a))) !prog_mem]))) in
Opcode opcode
| None -> failwith "PC address contains unknown or undefined")
| _ -> assert false