anchor.diff:    member x.NewArray() = x.NewArray(0u)
     member x.NewArray(size) =
       let array = AO(x, size)
  -    array.Put("length", double size)
  +    array.Put("length", double size, DescriptorAttrs.DontEnum)
       array :> CO
   
     member x.NewString() = x.NewString(String.Empty)
  
positive.code:     Dlr.callStaticT<TC> "ToClrObject" [expr]
  
    (**)
    static member ToObject(env:Environment, o:CO) : CO = o
    static member ToObject(env:Environment, f:FO) : CO = f :> CO
    static member ToObject(env:Environment, u:Undef) : CO = env.RaiseTypeError()
    static member ToObject(env:Environment, o:obj) : CO = env.RaiseTypeError()
    static member ToObject(env:Environment, s:string) : CO = env.NewString(s)
    static member ToObject(env:Environment, n:double) : CO = env.NewNumber(n)
    static member ToObject(env:Environment, b:bool) : CO = env.NewBoolean(b)
    static member ToObject(env:Environment, v:BV) : CO =
      match v.Tag with
      | TypeTags.Object 
      | TypeTags.Function -> v.Object
      | TypeTags.Undefined
      | TypeTags.Clr -> env.RaiseTypeError()
      | TypeTags.String -> env.NewString(v.String)
      | TypeTags.Bool -> env.NewBoolean(v.Bool)
      | _ -> env.NewNumber(v.Number)
  
    static member ToObject(env:Dlr.Expr, expr:Dlr.Expr) : Dlr.Expr = 
  
negative.code:   member x.MultiLine:bool =
      (x.RegExp.Options &&& RegexOptions.Multiline) = RegexOptions.Multiline
  
    new (env, pattern, options, global') as this =
      {
        inherit CommonObject(env, env.Maps.RegExp, env.Prototypes.RegExp)
        RegExp = null
        Global = global'
      }
      then
      try
        this.RegExp <- new Regex(pattern, options ||| RegexOptions.ECMAScript ||| RegexOptions.Compiled)
      with
        | :? ArgumentException as e -> env.RaiseSyntaxError(e.Message)
  
    new (env, pattern) = 
      RegExpObject(env, pattern, RegexOptions.None, false)
  
  (*
  //  
  *)
  