anchor.diff:    let private name = "ReferenceError" 
     let private updater (ctors:Constructors) ctor = {ctors with ReferenceError=ctor} 
     
  -  let setupConstructor (env:Environment) =
  +  let setupConstructor (env:Env) =
       let proto = env.Prototypes.ReferenceError
       Error.Utils.setupConstructor env name proto updater
   
  -  let setupPrototype (env:Environment) =
  +  let setupPrototype (env:Env) =
       let proto = env.Prototypes.ReferenceError
       let ctor = env.Constructors.ReferenceError
       Error.Utils.setupPrototype name ctor proto
  
positive.code:   let private name = "SyntaxError" 
    let private updater (ctors:Constructors) ctor = {ctors with SyntaxError=ctor} 
    
    let setupConstructor (env:Environment) =
      let proto = env.Prototypes.SyntaxError
      Error.Utils.setupConstructor env name proto updater
  
    let setupPrototype (env:Environment) =
      let proto = env.Prototypes.SyntaxError
      let ctor =  env.Constructors.SyntaxError
      Error.Utils.setupPrototype name ctor proto
  
negative.code:   let private name = "TypeError" 
    let private updater (ctors:Constructors) ctor = {ctors with TypeError=ctor} 
    
    let setupConstructor (env:Env) =
      let proto = env.Prototypes.TypeError
      Error.Utils.setupConstructor env name proto updater
  
    let setupPrototype (env:Env) =
      let proto = env.Prototypes.TypeError
      let ctor = env.Constructors.TypeError
      Error.Utils.setupPrototype name ctor proto