 {
     public function ArrayMask (length :int = 0)
     {
-        var mlength :int = length / 8;
+        var mlength :int = int(length / 8);
         if (length % 8 != 0) {
             mlength++;
         }

     */
    public function isSet (index :int) :Boolean
    {
        return (_mask[index/8] & (1 << (index % 8))) != 0;
    }

    public function writeTo (out :ObjectOutputStream) :void

     */
    public function setBit (index :int) :void
    {
        _mask[int(index/8)] |= (1 << (index % 8));
    }

    /**
