- assert (key.Length = 32 && iv.Length = 16)
- use aes = new AesManaged ()
- aes.KeySize <- 256
- let encryptor = aes.CreateEncryptor (key, iv)
- new CryptoStream (outputStream, encryptor, CryptoStreamMode.Write)
+ if key.Length <> aesKeySize / 8 then raise KeySizeError
+ if iv.Length <> 16 then raise IVSizeError
+ use aes = new AesCryptoServiceProvider (KeySize = aesKeySize) // Default mode is CBC.
+ new CryptoStream (outputStream, aes.CreateEncryptor (key, iv), CryptoStreamMode.Write)