anchor.diff:  
   let events (com: ICompiler) (ctx: Context) r (t: Type) (i: CallInfo) (thisArg: Expr option) (args: Expr list) =
       match i.CompiledName, thisArg with
  -    | ".ctor", _ -> Helper.LibCall(com, "Event", "default", t, args, i.SignatureArgTypes, isJsConstructor=true, ?loc=r) |> Some
  +    | ".ctor", _ -> Helper.LibCall(com, "Event", "default", t, args, i.SignatureArgTypes, isPyConstructor=true, ?loc=r) |> Some
       | "get_Publish", Some x -> getAttachedMemberWith r t x "Publish" |> Some
       | meth, Some x -> Helper.InstanceCall(x, meth, t, args, i.SignatureArgTypes, ?loc=r) |> Some
       | meth, None -> Helper.LibCall(com, "Event", Naming.lowerFirst meth, t, args, i.SignatureArgTypes, ?loc=r) |> Some
  
positive.code: 
  let laziness (com: ICompiler) (ctx: Context) r t (i: CallInfo) (thisArg: Expr option) (args: Expr list) =
      match i.CompiledName, thisArg, args with
      | (".ctor"|"Create"),_,_ -> Helper.LibCall(com, "Util", "Lazy", t, args, i.SignatureArgTypes, isJsConstructor=true, ?loc=r) |> Some
      | "CreateFromValue",_,_ -> Helper.LibCall(com, "Util", "lazyFromValue", t, args, i.SignatureArgTypes, ?loc=r) |> Some
      | "Force", Some callee, _ -> getAttachedMemberWith r t callee "Value" |> Some
      | ("get_Value"|"get_IsValueCreated"), Some callee, _ ->
  
negative.code: 
  let makeDecimal com r t (x: decimal) =
      let str = x.ToString(System.Globalization.CultureInfo.InvariantCulture)
      Helper.LibCall(com, "decimal", "Decimal", t, [makeStrConst str], isPyConstructor=true, ?loc=r)
  
  let makeDecimalFromExpr com r t (e: Expr) =
      Helper.LibCall(com, "decimal", "Decimal", t, [e], isPyConstructor=true, ?loc=r)
  
  let makeFloat32 r (x: float32) =
      Helper.GlobalCall("math", Number(Float32, None), [NumberConstant (float x, Float32, None) |> makeValue r], memb="fround")
  