summaryrefslogtreecommitdiff
path: root/mips/mips_extras.lem
diff options
context:
space:
mode:
Diffstat (limited to 'mips/mips_extras.lem')
-rw-r--r--mips/mips_extras.lem3
1 files changed, 1 insertions, 2 deletions
diff --git a/mips/mips_extras.lem b/mips/mips_extras.lem
index 4e570a6f..2e07586c 100644
--- a/mips/mips_extras.lem
+++ b/mips/mips_extras.lem
@@ -77,7 +77,6 @@ let write_ram _ size _ addr data =
let read_ram _ size _ addr = MEMr addr size
-let string_of_bits bs = string_of_bv (bits_of bs)
let string_of_int = show
let shift_bits_left v n =
@@ -113,7 +112,7 @@ val elf_entry : unit -> integer
let elf_entry () = 0
declare ocaml target_rep function elf_entry = `Elf_loader.elf_entry`
-let print_bits msg bs = prerr_endline (msg ^ (string_of_bits bs))
+let print_bits msg bs = prerr_endline (msg ^ (string_of_bv bs))
val get_time_ns : unit -> integer
let get_time_ns () = 0