#IF NET45 ...

Author: wallymathieu

src/FSharpPlus/Control/Functor.fs

@@ -41,7 +41,14 @@ type Iterate =
     #else
     static member Iterate (x: Async<'T>            , action: 'T -> unit) = (x |> Async.map action |> Async.AsTask).Wait ()
     #endif
-    static member Iterate (x: Result<'T, 'E>       , action) = Result.iter action x
+    static member Iterate (x: Result<'T, 'E>       , action) =
+    #if !NET45
+        Result.iter action x
+    #else
+        match x with
+        | Error _ -> ()
+        | Ok value -> action value
+    #endif
     static member Iterate (x: Choice<'T, 'E>       , action) = match x with Choice1Of2 x -> action x | _ -> ()
     static member Iterate (KeyValue(_: 'Key, x: 'T), action) = action x : unit
     static member Iterate (x: Map<'Key,'T>         , action) = Map.iter (const' action) x 

src/FSharpPlus/Extensions/ResizeArray.fs

@@ -27,7 +27,9 @@ module ResizeArray =
     /// <param name="action">The function to apply to elements from the input ResizeArray.</param>
     /// <param name="source">The input ResizeArray.</param>
     let iter (action: 'T -> 'U) (source: ResizeArray<'T>) =
+        #if !NET45
         raiseIfNull (nameof source) source
+        #endif
 
         ResizeArray (Seq.map action source)