Last modified on 27 October 2012, at 22:14

REBOL Programming/default

USAGE:Edit

DEFAULT 'word value 

DESCRIPTION:Edit

Set a word to a default value if it hasn't been set yet.

DEFAULT is a function value.

ARGUMENTSEdit

  • word -- The word (use :var for word! values) (Type: word set-word lit-word)
  • value -- The value (Type: any)

SOURCE CODEEdit

default: func [
    {Set a word to a default value if it hasn't been set yet.} 
    'word [word! set-word! lit-word!] "The word (use :var for word! values)" 
    value "The value"
][
    unless all [value? word not none? get word] [set word :value] :value
]