Delete a file: Difference between revisions
Content added Content deleted
(Emacs Lisp: Simplify solution) |
|||
Line 1,279: | Line 1,279: | ||
rmdir('/docs'); |
rmdir('/docs'); |
||
?></lang> |
?></lang> |
||
=={{header|Picat}}== |
|||
{{works with|Picat}} |
|||
<lang Picat> |
|||
import os. |
|||
del(Arg), directory(Arg) => |
|||
rmdir(Arg). |
|||
del(Arg), file(Arg) => |
|||
rm(Arg). |
|||
main(Args) => |
|||
foreach (Arg in Args) |
|||
del(Arg) |
|||
end. |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
picat delete_file.pi input.txt docs/ /input.txt /docs/ |
|||
</pre> |
|||
=={{header|PicoLisp}}== |
=={{header|PicoLisp}}== |