anchor.diff:          with
               | exn -> JSEngine.throwException(JSUtils.context, embed exn)
   
  -    let nativef (args: JSValue) =
  -        let processed_args = args |> JSUtils.get_all_JS_arguments JSUtils.context
  -        f (processed_args)
  -    JSEngine.makeFunction(JSUtils.context, new JSEngine.FSharpFunction(nativef))
  +    JSEngine.makeFunction(JSUtils.context, new JSEngine.FSharpFunction(f))
   
   and project_func ty (f:JSValue list -> JSValue) : obj =
       let range = FSharpType.GetFunctionElements ty |> snd
  
positive.code:     let register_value (name, value) =
          JSEngine.registerValue(JSUtils.context, name, value)
      List.iter register_value l
  
negative.code: open Microsoft.FSharp.Reflection
  open System.Collections
  open System
  open System.Reflection
  open Microsoft.FSharp.Quotations
  
  type JSValue = nativeint
  exception JSException of JSValue
  