anchor.diff:      env.FunctionClass <- env.ObjectClass.GetSubClass("length", env.GetClassId())
   
       //Object.prototype
  -    env.Object_prototype <- new Object(env.ObjectClass, null, 32)
  -    env.Function_prototype <- new Object(env.ObjectClass, null, 32)
  +    env.Object_prototype    <- new Object(env.ObjectClass, null, 32)
  +    env.Function_prototype  <- new Object(env.ObjectClass, env.Object_prototype, 32)
   
       //Globals
       env.Globals <- new Object(env.ObjectClass, null, 128)
  
positive.code:     ScopeLevel = scopeLevel
    } 
  
      (* ==== Closure environment base class ==== *)
  and Closure =
    val mutable Scopes : Scope ResizeArray
  
  
negative.code: 
    static member New(name:string) =
      let cache = Dlr.Expr.constant (new GetCache(name))
      cache, 
      Expr.field cache "ClassId", 
      Expr.field cache "Index", 
      Expr.field cache "Crawler"
      
      (*==== Inline cache for property set operations ====*)
  and SetCache =
    val mutable Name : string
    val mutable ClassId : int
  