(** This module provides a function to print [ASM] programs. *)

let print_program p =
  let code_memory = ASMInterpret.load_code_memory p.ASM.code in
  let intel_hex = IntelHex.pack_exported_code_memory 16 65535 code_memory in
  IntelHex.string_of_intel_hex_format intel_hex