18A1E |
CK0
|
( → )
Saves current command to LASTCKCMD. Marks
stack below level 1 to STACKMARK.
|
18AA5 |
CK1
|
( ob → ob )
Saves current command to LASTCKCMD. Verifies
that there is at least one object in the
stack, if not generates a "Too Few Arguments"
error. Saves stack mark to STACKMARK.
If Last Arg is enabled then saves the
argument.
|
18A80 |
CK2
|
( ob1 ob2 → ob1 ob2 )
Like <REF>CK1, but checks for at least two
arguments.
|
18A5B |
CK3
|
( ob1...ob3 → ob1...ob3 )
Like <REF>CK1, but checks for at least three
arguments.
|
18B92 |
CK4
|
( ob1...ob5 → ob1...ob5 )
Like <REF>CK1, but checks for at least four
arguments.
|
18B6D |
CK5
|
( ob1...ob5 → ob1...ob5 )
Like <REF>CK1, but checks for at least five
arguments.
|
18C34 |
CKN
|
( ob1...obn %n → ob1..obn #n )
Checks for a real in level one. Then checks
for that number of arguments. Finally,
converts the real to a bint.
|
18A15 |
CK0NOLASTWD
|
( → )
Like <REF>CK0, but does not save current
command.
|
18AB2 |
CK1NOLASTWD
|
( ob → ob )
Like <REF>CK1, but does not save current
command.
|
18A8D |
CK2NOLASTWD
|
( ob1 ob2 → ob1 ob2 )
Like <REF>CK2, but does not save current
command.
|
18A68 |
CK3NOLASTWD
|
( ob1...ob3 → ob1...ob3 )
Like <REF>CK3, but does not save current
command.
|
18B9F |
CK4NOLASTWD
|
( ob1...ob4 → ob1...ob4 )
Like <REF>CK4, but does not save current
command.
|
18B7A |
CK5NOLASTWD
|
( ob1...ob5 → ob1...ob5 )
Like <REF>CK5, but does not save current
command.
|
18C4A |
CKNNOLASTWD
|
( ob1...obn %n → ob1..obn #n )
Like <REF>CKN, but does not save current
command.
|
18F9D |
CK&DISPATCH0
|
( → )
Dispatches on stack argument. Does not
convert ZINTs to REAL.
--
<REF>CK&DISPATCH1 <REF>CK&DISPATCH2
<REF>TEXT:Dispatch_Types
|
18FB2 |
CK&DISPATCH1
|
( → )
Dispatches on stack arguments, stripping tags
and converting ZINTS to REALS (HP49 only) if
necessary.
--
<REF>CK&DISPATCH0 <REF>CK&DISPATCH2
<REF>TEXT:Dispatch_Types
|
18FA9 |
CK&DISPATCH2
|
( → )
Equivalent to <REF>CK&DISPATCH1.
--
<REF>CK&DISPATCH0
<REF>TEXT:Dispatch_Types
|
18ECE |
CK1&Dispatch
|
( → )
Combines <REF>CK1 with <REF>CK&DISPATCH1.
--
<REF>TEXT:Dispatch_Types
|
18EDF |
CK2&Dispatch
|
( → )
Combines <REF>CK2 with <REF>CK&DISPATCH1.
--
<REF>TEXT:Dispatch_Types
|
18EF0 |
CK3&Dispatch
|
( → )
Combines <REF>CK3 with <REF>CK&DISPATCH1.
--
<REF>TEXT:Dispatch_Types
|
18F01 |
CK4&Dispatch
|
( → )
Combines <REF>CK4 with <REF>CK&DISPATCH1.
--
<REF>TEXT:Dispatch_Types
|
18F12 |
CK5&Dispatch
|
( → )
Combines <REF>CK5 with <REF>CK&DISPATCH1.
--
<REF>TEXT:Dispatch_Types
|
5EA09 |
CKINFARGS
|
( → )
Gets meta as argument and checks its length
(using DEPTH), and errors if it is too short.
Collects the arguments to a list, does
CK1NOLASTWD, and explodes the meta again.
|
1884D |
0LASTOWDOB!
|
( → )
Clears command save by last CK<n> command.
<REF>CK0
aka: 0LASTOWDOB!, 0LastRomWrd!
|
40BC9 |
AtUserStack
|
( → )
:: CK0NOLASTWD 0LASTOWDOB! ;
|
1592D |
CK1NoBlame
|
( → )
:: 0LASTOWDOB! CK1NOLASTWD ;
|
62474 |
'RSAVEWORD
|
( → )
Stores first object in the composite above
the actual to LASTCKCMD.
aka: 'RSaveRomWrd
|
18F23 |
EvalNoCK
|
( comp → ? )
Evaluates composite without saving as
current command. If first command is
CK<n>&Dispatch it is replaced by
CK&DISPATCH1. If first command is CK<n> it is
skipped.
Any other first command is also skipped!
|
18F6A |
(EvalNoCK:)
|
Run Stream:
( ob → )
<REF>EvalNoCK with the next object in the
runstream as argument.
|
18F6A |
('EvalNoCK:_sup)
|
Run Stream:
( ob → )
<REF>EvalNoCK with the next object in the
runstream as argument.
aka: EvalNoCK:
|