Ignore:
Timestamp:
Jan 14, 2011, 4:49:51 PM (9 years ago)
Author:
mulligan
Message:

Got Intel HEX format exportation working.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Deliverables/D4.1/Test.ml

    r447 r448  
    88let mem = IntelHex.process_intel_hex hex in
    99let status = ASMInterpret.load_mem mem ASMInterpret.initialize in
    10 let _ = file_of_intel_hex "hex-output-test.hex" (pack_exported_code_memory 12 128 status.code_memory) in
     10let _ = file_of_intel_hex "hex_test_out.hex" (pack_exported_code_memory 12 114 status.code_memory) in
     11let mem' = IntelHex.process_intel_hex (IntelHex.intel_hex_of_file "hex_test_out.hex") in
     12let _ = assert (Physical.WordMap.equal (=) mem mem') in
     13let status = ASMInterpret.load_mem mem ASMInterpret.initialize in
    1114let observe status =
    1215 let pc = status.ASMInterpret.pc in
Note: See TracChangeset for help on using the changeset viewer.