• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
      • Io
      • Defttag
      • Sys-call
      • Save-exec
      • Quicklisp
      • Std/io
      • Oslib
        • File-types
        • Argv
        • Copy
        • Catpath
        • Ls
        • Universal-time
        • Tempfile
        • Basename
        • Dirname
        • Copy!
        • Ls-files
        • Mkdir
        • Rmtree
        • Lisp-version
        • Lisp-type
        • Ls-subdirs
        • Date
        • Getpid
        • Dirnames
        • Basenames
        • Basename!
        • Ls-subdirs!
        • Ls-files!
        • Dirname!
        • Ls!
        • Catpaths
        • Mkdir!
        • Rmtree!
          • Remove-nonstrings
        • Bridge
        • Clex
        • Tshell
        • Unsound-eval
        • Hacker
        • ACL2s-interface
        • Startup-banner
        • Command-line
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Oslib

    Rmtree!

    Recursively delete files, like the shell command rm -rf, causing a hard error on any failure.

    Signature
    (rmtree! path &key (state 'state)) → state
    Arguments
    path — Guard (stringp path).

    Definitions and Theorems

    Function: rmtree!-fn

    (defun rmtree!-fn (path state)
      (declare (xargs :stobjs (state)))
      (declare (xargs :guard (stringp path)))
      (let ((__function__ 'rmtree!))
        (declare (ignorable __function__))
        (b* (((mv successp state) (rmtree path))
             ((unless successp)
              (raise "Error removing ~s0." path)
              state))
          state)))