Skip to content

Commit

Permalink
more debug
Browse files Browse the repository at this point in the history
  • Loading branch information
matthid committed Jul 10, 2016
1 parent 49e64a9 commit 67adf38
Showing 1 changed file with 5 additions and 2 deletions.
7 changes: 5 additions & 2 deletions src/Paket.Core/Requirements.fs
Original file line number Diff line number Diff line change
Expand Up @@ -407,7 +407,7 @@ let filterRestrictions (list1:FrameworkRestrictions) (list2:FrameworkRestriction

/// Get if a target should be considered with the specified restrictions
let isTargetMatchingRestrictions =
memoize <| fun (restrictions:FrameworkRestriction list, target) ->
(*memoize <|*) fun (restrictions:FrameworkRestriction list, target) ->
if List.isEmpty restrictions then true else
match target with
| SinglePlatform (Runtimes _ ) -> true
Expand All @@ -423,7 +423,10 @@ let isTargetMatchingRestrictions =
match fw, pf with
| DotNetFramework _, DotNetStandard _ -> false
| DotNetStandard _, DotNetFramework _ -> false
| _ -> pf.IsCompatible(fw)
| _ ->
let isComp = pf.IsCompatible(fw)
printf "pf (%A) is compatible with fw (%A): %A" pf fw isComp
isComp
| FrameworkRestriction.Portable _ -> false
| FrameworkRestriction.AtLeast fw ->
match fw, pf with
Expand Down

0 comments on commit 67adf38

Please sign in to comment.