From 74d4434db27828d2a6a6f76211260108c12834a8 Mon Sep 17 00:00:00 2001 From: Steffen Forkmann Date: Mon, 24 Nov 2014 15:44:17 +0100 Subject: [PATCH] Make ListModule independent --- ExtCore/Collections.List.fs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/ExtCore/Collections.List.fs b/ExtCore/Collections.List.fs index 5a303b5..9b0e56a 100644 --- a/ExtCore/Collections.List.fs +++ b/ExtCore/Collections.List.fs @@ -1,4 +1,4 @@ -(* +(* Copyright 2010-2012 TidePowerd Ltd. Copyright 2013 Jack Pappas @@ -23,8 +23,10 @@ module ExtCore.Collections.List open LanguagePrimitives open OptimizedClosures -open ExtCore +let private checkNonNull name value = + if value = Unchecked.defaultof<_> then + raise <| System.ArgumentNullException(name) /// A curried "cons" operator. /// @@ -776,4 +778,3 @@ let distinct (list : 'T list) : 'T list = // Return the result list. result -