anchor.diff:          | _ -> x.Env.RaiseTypeError()
   
     static member TicksToDateTime(ticks:int64) : DateTime =
  -    new DateTime(ticks * ticks + offset, DateTimeKind.Utc)
  +    new DateTime(ticks * tickScale + offset, DateTimeKind.Utc)
       
     static member TicksToDateTime(ticks:double) : DateTime = 
       DateObject.TicksToDateTime(int64 ticks)
   
     static member DateTimeToTicks(date:DateTime) : int64 =
  -    (date.ToUniversalTime().Ticks - offset) / ticks
  +    (date.ToUniversalTime().Ticks - offset) / tickScale
   
   (*
   //  
  
positive.code: and [<AllowNullLiteral>] RegExpObject = 
    inherit CO
  
    val mutable RegExp : Regex
    val Global : bool
  
  
negative.code:   inherit CommonObject(env, env.Maps.Base, env.Prototypes.Date)
  
    static let offset = (new DateTime(1970, 1, 1, 0, 0, 0, DateTimeKind.Utc)).Ticks
    static let tickScale = 10000L
  
    [<DefaultValue>]
    val mutable Date : DateTime
  
    do 
  