aboutsummaryrefslogtreecommitdiff
path: root/src/interp/setvars.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/setvars.boot')
-rw-r--r--src/interp/setvars.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/setvars.boot b/src/interp/setvars.boot
index cd21c3a1..de8883b6 100644
--- a/src/interp/setvars.boot
+++ b/src/interp/setvars.boot
@@ -579,7 +579,7 @@ setFortTmpDir arg ==
validateOutputDirectory x ==
- AND(PATHNAME_-DIRECTORY(PROBE_-FILE(first(x))), NOT PATHNAME_-NAME (PROBE_-FILE(first(x)))) =>
+ AND(filePathDirectory(PROBE_-FILE(first(x))), null filePathName(PROBE_-FILE(first(x)))) =>
first(x)
nil