Merge pull request #85 from AndrewScheidecker/removed_magic_from_memory

Replaced explicit truncation on memory store with implicit truncation+comment

Author: sunfishcode

ml-proto/src/spec/memory.ml

@@ -92,7 +92,8 @@ let load64 mem a =
   Int64.logor (Int64.of_int32 (load32 mem a)) (Int64.shift_left (Int64.of_int32 (load32 mem (a+4))) 32)
 
 let store8 mem a bits =
-  !mem.{a} <- Int32.to_int (Int32.logand bits (Int32.of_int 255))
+  (* Store the lowest 8 bits of "bits" at byte index a, discarding the rest. *)
+  !mem.{a} <- Int32.to_int bits
 
 let store16 mem a bits =
   store8 mem (a+0) bits;