Intersect

Jump to bottom Edit New page

angerangel edited this page Mar 19, 2013 · 1 revision

USAGE

   INTERN data

DESCRIPTION

Imports (internalize) words and their values from the lib into the user context.

INTERN is a function value.

ARGUMENTS

data -- Word or block of words to be added (deeply) (block! any-word!)

#SOURCE

intern: make function! [  [
    {Imports (internalize) words and their values from the lib into the user context.}
    data [block! any-word!] "Word or block of words to be added (deeply)"
    /local index usr
][
    index: 1 + length? usr: system/contexts/user
    data: bind/new :data usr
    resolve/only usr lib index
    :data
] ]

Add a custom sidebar

Clone this wiki locally