1
0
mirror of https://github.com/janet-lang/janet synced 2024-07-03 02:23:15 +00:00

Make rmrf stronger.

This commit is contained in:
Calvin Rose 2024-05-26 09:09:04 -05:00
parent de977819ce
commit 2fafe2b5d1

View File

@ -4030,10 +4030,11 @@
"rm -rf in janet"
[x]
(case (os/stat x :mode)
:file (os/rm x)
nil nil
:directory (do
(each y (os/dir x) (rmrf (string x "/" y)))
(os/rmdir x)))
(os/rmdir x))
(os/rm x))
nil)
(defn- copyfile