Anonymous user
Check that file exists: Difference between revisions
m
→{{header|PicoLisp}}
Line 1,691:
(print 'exists)
(print 'doesNotExist)))
# To verify if it's really a directory, (CAR of return value will be 'T').
# Also alternate way to perform above check.
# abu 2018-05-25
(let I (info "./docs")
(prinl
(nond
(I "Does not exist")
((=T (car I)) "Is not a directory")
(NIL "Directory exists") ) ) )
</lang>
| |||