---

yaml
---
r: 7619
b: refs/heads/master
c: de2bb28
h: refs/heads/master
i:
  7617: 34f60cd
  7615: 468636b
v: v3

Author: nikomatsakis

[refs]

@@ -1,2 +1,2 @@
 ---
-refs/heads/master: 556947c47a45db44702251552d4cb10ef8f1eb3f
+refs/heads/master: de2bb2806f02aa668e9cda8a86ec5b62c595c09b

trunk/src/libstd/md4.rs

@@ -1,12 +1,17 @@
 fn md4(msg: [u8]) -> {a: u32, b: u32, c: u32, d: u32} {
-    let orig_len = vec::len(msg) * 8u;
+    // subtle: if orig_len is merely uint, then the code below
+    // which performs shifts by 32 bits or more has undefined
+    // results.
+    let orig_len: u64 = (vec::len(msg) * 8u) as u64;
+
     // pad message
     let msg = msg + [0x80u8];
     let bitlen = orig_len + 8u;
     while (bitlen + 64u) % 512u > 0u {
         msg += [0u8];
         bitlen += 8u;
     }
+
     // append length
     let i = 0u;
     while i < 8u {