FSharp.Data.Tdms.Runtime.fs 780 B

12345678910111213141516171819202122232425262728
  1. #if INTERACTIVE
  2. #load "../../src/ProvidedTypes.fsi" "../../src/ProvidedTypes.fs"
  3. #endif
  4. namespace FSharp.Data
  5. open FSharp.Data.Tdms
  6. module Helpers =
  7. type RawDataHelper =
  8. static member RawData<'T>(group, channel, index) =
  9. File.tryGetRawData<'T> group channel index
  10. |> Option.defaultValue [||]
  11. let rawData ty group channel index =
  12. let generic =
  13. typeof<RawDataHelper>.GetMethod "RawData"
  14. let concrete = generic.MakeGenericMethod [| ty |]
  15. concrete.Invoke(null, [| group; channel; index |])
  16. #if !IS_DESIGNTIME
  17. // Put the TypeProviderAssemblyAttribute in the runtime DLL, pointing to the design-time DLL
  18. [<assembly:CompilerServices.TypeProviderAssembly("FSharp.Data.Tdms.DesignTime.dll")>]
  19. do ()
  20. #endif