077E4 |
(MAKERRP)
|
( #libnum → rrp )
Creates an empty directory.
|
08DF2 |
(CREATERRP)
|
( id → )
Creates an empty directory. Does not check if
the name is already used.
:: # 7FF CRDIR# SWAP CREATE ;
|
184E1 |
CREATEDIR
|
( id → )
Creates an empty directory. Calls
<REF>?PURGE_HERE first to delete the original.
|
08326 |
LASTRAM-WORD
|
( rrp → ob T )
( rrp → F )
Recalls first object in directory.
|
18621 |
LastNonNull
|
( rrp → ob T )
( rrp → F )
Recalls first object in directory (not null
named).
|
08376 |
PREVRAM-WORD
|
( ob → ob' T )
( ob → F )
Recalls next object in directory.
|
1863A |
PrevNonNull
|
( ob → ob' T )
( ob → F )
Recalls next object in directory (not null
named).
|
18653 |
(CkNonNull)
|
( ob → ob T )
( ob → F )
Checks that the variable (ob) has a name.
|
082E3 |
RAM-WORDNAME
|
( ob → id )
Recalls name of object in current directory.
|
18595 |
XEQPGDIR
|
( id → )
Purges a directory. Checks references, etc.
first.
|
20FF2 |
XEQORDER
|
( {id1 id2..} → )
Orders the variables in the directory by
moving the given variables to the beginning of
the directory.
|
18779 |
DOVARS
|
( → {id1 id2..} )
Returns list of variables from current
directory.
|
186E8 |
DOTVARS%
|
( % → {} )
Returns a list of variables in the current
directory with user type given by the
number. Internal TVARS if a single number was
given.
|
1867F |
(DODIRPRG)
|
( ob :: → {} )
Executes seco (can be single object) on all
directory variables.
At execution: ob :: id_contents { } id
To be returned: ob :: id_contents { } ob flag
If flag is TRUE, ob is added with >TCOMP to
list, else it is dropped.
|
1848C |
PATHDIR
|
( → {HOME dir1 dir2..} )
Returns current path.
|
1A16F |
UPDIR
|
( → )
Goes to parent directory.
|
08309 |
(MYRAMROMPAIR)
|
( rrp → rrp' T )
( rrp → F )
Gets parent directory. Returns FALSE if
parent directory is HOME.
|
08DD4 |
SYSRRP?
|
( rrp → flag )
Is rrp HOME?
|
08D5A |
CONTEXT@
|
( → rrp )
Recalls current directory.
|
08D08 |
CONTEXT!
|
( rrp → )
Sets new current directory.
|
08DD4 |
SYSRRP?
|
( rrp → flag )
Is rrp HOME?
|
08D82 |
(STOPSIGN@)
|
( → rrp )
Recalls last directory.
|
08D4A |
(STOPSIGN!)
|
( rrp → )
Stores new last directory.
|
08D92 |
HOMEDIR
|
( → )
Sets HOME as current directory.
aka: SYSCONTEXT
|
08DC4 |
(SYSSTOPSIGN)
|
( → )
Sets HOME as last directory.
|
640A0 |
SaveVarRes
|
( → )
Binds current and last directories to two
nullnamed lams.
|
640FA |
RestVarRes
|
( → )
First sets HOME as both the current and last
directories (in case an error happens). Then,
restores the current and last directories
from 1LAM and 2LAM.
|