Rebol Programming/echo

From Wikibooks, open books for an open world
Jump to navigation Jump to search

USAGE:[edit | edit source]

ECHO target 

DESCRIPTION:[edit | edit source]

Copies console output to a file.

ECHO is a function value.

ARGUMENTS[edit | edit source]

  • target -- (Type: file none logic)

(SPECIAL ATTRIBUTES)[edit | edit source]

  • catch

SOURCE CODE[edit | edit source]

echo: func [
    "Copies console output to a file." 
    [catch] 
    target [file! none! logic!]
][
    if port? system/ports/echo [
        close system/ports/echo 
        system/ports/echo: none
    ] 
    if target = true [target: %rebol-echo.txt] 
    if file? target [
        system/ports/echo: throw-on-error [open/write/new/direct target]
    ]
]