version 1.16, 2007/03/04 22:39:37
|
version 1.17, 2007/03/18 22:35:52
|
Line 33 wordlist Constant target-environment
|
Line 33 wordlist Constant target-environment
|
\ save information of current dictionary to restore with environ> |
\ save information of current dictionary to restore with environ> |
Variable env-current |
Variable env-current |
|
|
: >ENVIRON get-current env-current ! target-environment set-current ; |
: >ENVIRON get-current env-current ! target-environment set-current |
: ENVIRON> env-current @ set-current ; |
also target-environment context ! ; |
|
: ENVIRON> previous env-current @ set-current ; |
|
|
: t-env? ( addr len -- [ x ] true | false ) |
: t-env? ( addr len -- [ x ] true | false ) |
\G returns the content of environment variable and true or |
\G returns the content of environment variable and true or |