aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Family Day update

Browse source
This commit is contained in:
Ingy döt Net 2020-02-17 23:21:07 -08:00
parent aac6731f2c
commit 9ad63ea473
2442 changed files with 39761 additions and 8255 deletions
Download patch file Download diff file Expand all files Collapse all files

0
Task/Empty-directory/Nim/empty-directory.nim → Task/Empty-directory/Nim/empty-directory-1.nim
View file

7
Task/Empty-directory/Nim/empty-directory-2.nim Normal file
View file

@ -0,0 +1,7 @@
import os, sequtils
proc isEmptyDir(dir: string): bool =
toSeq(walkdir dir).len == 0
echo isEmptyDir("/tmp") # false - there is always something in "/tmp"
echo isEmptyDir("/temp") # true - "/temp" does not exist

6
Task/Empty-directory/Prolog/empty-directory.pro Normal file
View file

@ -0,0 +1,6 @@
non_empty_file('.').
non_empty_file('..').
empty_dir(Dir) :-
directory_files(Dir, Files),
maplist(non_empty_file, Files).