From d8f04957b6b44e420dfc004d467ffdc298ec213e Mon Sep 17 00:00:00 2001
From: kalmarek <kalmar@amu.edu.pl>
Date: Wed, 6 Sep 2017 16:02:46 +0200
Subject: [PATCH] replace isfile by exists

which returns true also for symlinks
---
 src/PropertyT.jl | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/src/PropertyT.jl b/src/PropertyT.jl
index f10a60a..6c5b3f8 100644
--- a/src/PropertyT.jl
+++ b/src/PropertyT.jl
@@ -26,6 +26,10 @@ function setup_logging(name::String)
    return logger
 end
 
+function exists(fname::String)
+   return isfile(fname) || islink(fname)
+end
+
 function pmΔfilenames(name::String)
     if !isdir(name)
         mkdir(name)
@@ -111,8 +115,8 @@ end
 
 function λandP(name::String)
     λ_fname, SDP_fname = λSDPfilenames(name)
-    f₁ = isfile(λ_fname)
-    f₂ = isfile(SDP_fname)
+    f₁ = exists(λ_fname)
+    f₂ = exists(SDP_fname)
 
     if f₁ && f₂
         info(logger, "Loading precomputed λ, P...")
@@ -125,7 +129,7 @@ function λandP(name::String)
 end
 
 function λandP(name::String, SDP_problem::JuMP.Model, varλ, varP)
-   if isfile(joinpath(name, "solver.log"))
+   if exists(joinpath(name, "solver.log"))
        rm(joinpath(name, "solver.log"))
    end
 
@@ -171,7 +175,7 @@ function check_property_T(name::String, S, Id, solver, upper_bound, tol, radius)
 
     isdir(name) || mkdir(name)
 
-    if all(isfile.(pmΔfilenames(name)))
+    if all(exists.(pmΔfilenames(name)))
         # cached
         Δ, sdp_constraints = ΔandSDPconstraints(name, parent(S[1]))
     else
@@ -183,7 +187,7 @@ function check_property_T(name::String, S, Id, solver, upper_bound, tol, radius)
     info(logger, "length(Δ) = $(length(Δ))")
     info(logger, "|R[G]|.pm = $(size(parent(Δ).pm))")
 
-   if all(isfile.(λSDPfilenames(name)))
+   if all(exists.(λSDPfilenames(name)))
       # cached
       λ, P = λandP(name)
    else