• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
      • Io
        • Fmt
        • Msg
        • Cw
        • Set-evisc-tuple
        • Set-iprint
        • Print-control
        • Read-file-into-string
        • Std/io
        • Msgp
        • Printing-to-strings
        • Evisc-tuple
        • Output-controls
        • Observation
        • *standard-co*
        • Ppr-special-syms
        • Standard-oi
        • Standard-co
        • Without-evisc
        • Serialize
        • Output-to-file
          • Fmt-to-comment-window
          • Princ$
          • Character-encoding
          • Open-output-channel!
          • Cw-print-base-radix
          • Set-print-case
          • Set-print-base
          • Print-object$
          • Extend-pathname
          • Print-object$+
          • Fmx-cw
          • Set-print-radix
          • Set-fmt-hard-right-margin
          • File-write-date$
          • Proofs-co
          • Set-print-base-radix
          • Print-base-p
          • *standard-oi*
          • Wof
          • File-length$
          • Fms!-lst
          • Delete-file$
          • *standard-ci*
          • Write-list
          • Trace-co
          • Fmt!
          • Fms
          • Cw!
          • Fmt-to-comment-window!
          • Fms!
          • Eviscerate-hide-terms
          • Fmt1!
          • Fmt-to-comment-window!+
          • Read-file-into-byte-array-stobj
          • Fmt1
          • Fmt-to-comment-window+
          • Cw-print-base-radix!
          • Read-file-into-character-array-stobj
          • Fmx
          • Cw!+
          • Read-objects-from-book
          • Newline
          • Cw+
          • Probe-file
          • Write-objects-to-file!
          • Write-objects-to-file
          • Read-objects-from-file
          • Read-object-from-file
          • Read-file-into-byte-list
          • Set-fmt-soft-right-margin
          • Read-file-into-character-list
          • Io-utilities
        • Defttag
        • Sys-call
        • Save-exec
        • Quicklisp
        • Std/io
        • Oslib
        • Bridge
        • Clex
        • Tshell
        • Unsound-eval
        • Hacker
        • ACL2s-interface
        • Startup-banner
        • Command-line
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Io

    Output-to-file

    Redirecting output to a file

    For a general discussion of ACL2 input/output and of the ACL2 read-eval-print loop, see io and see ld (respectively). Here we use an example to illustrate how to use some of the options provided by ld to redirect ACL2 output to a file, other than the printing of the prompt (which continues to go to the terminal).

    There are two ld specials that control output from the ld command: proofs-co for proof output and standard-co for other output. The following example shows how to use these to redirect output to a file "tmp.out". The following command opens a character output channel to the file "tmp.out" and redirects proof output to that channel, i.e., to file "tmp.out".

    (mv-let (chan state)
            (open-output-channel "tmp.out" :character state)
            (set-proofs-co chan state))

    Next, we redirect standard output to that same channel.

    (set-standard-co (proofs-co state) state)

    Now we can load an input file, in this case file "tmp.lisp", and output will be redirected to file "tmp.out". (The use of :ld-pre-eval-print t is optional; see ld.)

    (ld "tmp.lisp" :ld-pre-eval-print t)

    Having completed our load operation, we restore both proof output and standard output to the terminal, as follows.

    (set-standard-co *standard-co* state)
    (close-output-channel (proofs-co state) state)
    (set-proofs-co *standard-co* state)

    The following variant of the above example shows how to redirect output as above except without changing the global settings of the two ld specials, proofs-co and standard-co. This approach uses a notion of ``global variables'' stored in the ACL2 state; see assign and see @.

    (mv-let (chan state)
            (open-output-channel "tmp.out" :character state)
            (assign tmp-channel chan))
    (ld "tmp.lisp" :ld-pre-eval-print t
                   :proofs-co (@ tmp-channel)
                   :standard-co (@ tmp-channel))
    (close-output-channel (@ tmp-channel) state)