var bkey:Array = rstr2binl (key);\r
if (bkey.length > 16) bkey = binl_md5 (bkey, key.length * 8);\r
\r
- var ipad:Array = Array(16), opad:Array = Array(16);\r
+ var ipad:Array = new Array(16), opad:Array = new Array(16);\r
for(var i:Number = 0; i < 16; i++) {\r
ipad[i] = bkey[i] ^ 0x36363636;\r
opad[i] = bkey[i] ^ 0x5C5C5C5C;\r
var i:Number, q:Number, x:Number, quotient:Array;\r
\r
/* Convert to an array of 16-bit big-endian values, forming the dividend */\r
- var dividend:Array = Array(input.length / 2);\r
+ var dividend:Array = new Array(input.length / 2);\r
for(i = 0; i < dividend.length; i++) {\r
dividend[i] = (input.charCodeAt(i * 2) << 8) | input.charCodeAt(i * 2 + 1);\r
}\r
* Characters >255 have their high-byte silently ignored.\r
*/\r
public static function rstr2binl (input:String):Array {\r
- var output:Array = Array(input.length >> 2);\r
+ var output:Array = new Array(input.length >> 2);\r
for(var i:Number = 0; i < output.length; i++)\r
output[i] = 0;\r
- for(var i:Number = 0; i < input.length * 8; i += 8)\r
+ for(i = 0; i < input.length * 8; i += 8)\r
output[i>>5] |= (input.charCodeAt(i / 8) & 0xFF) << (i%32);\r
return output;\r
}\r
}\r
\r
}\r
-}
\ No newline at end of file
+}\r