The following is the SML code to perform the dump
fun dumpBits x =
let val vec = Unsafe.blastWrite x
val lst = Word8Vector.toList vec
val items = List.map (fn x => " " ^ Word8.fmt StringCvt.HEX x) lst
val items = List.map (StringCvt.padLeft #"0" 2) items
in
print (String.concat items ^ "\n")