REBOL Programming/cd

From Wikibooks, open books for an open world
< REBOL Programming
Jump to: navigation, search

USAGE:[edit]

CD 'path 

DESCRIPTION:[edit]

Change directory (shell shortcut function).

CD is a function value.

ARGUMENTS[edit]

  • path -- Accepts %file, :variables and just words (as dirs) (Type: file word path unset string paren)

(SPECIAL ATTRIBUTES)[edit]

  • catch

SOURCE CODE[edit]

cd: func [
    "Change directory (shell shortcut function)." 
    [catch] 
    'path [file! word! path! unset! string! paren!] "Accepts %file, :variables and just words (as dirs)"
][
    if paren? get/any 'path [set/any 'path do path] 
    switch/default type?/word get/any 'path [
        unset! [print what-dir] 
        file! [change-dir path] 
        string! [change-dir to-rebol-file path] 
        word! path! [change-dir to-file path]
    ] [throw-error 'script 'expect-arg reduce ['cd 'path type? get/any 'path]]
]