- using (new FileStream (cipherFilename, FileMode.Open, FileAccess.ReadWrite))
- (fun fs -> fs.Position <- position
- let byte = fs.ReadByte () |> byte
- fs.Position <- position
- fs.Write ([| byte + 1uy |], 0, 1)) // Automatically modulo 256.
+ use fs = new FileStream (cipherFilename, FileMode.Open, FileAccess.ReadWrite)
+ fs.Position <- position
+ let byte = fs.ReadByte () |> byte
+ fs.Position <- position
+ fs.Write ([| byte + 1uy |], 0, 1) // Modulo 256.