[comp.sys.handhelds] Address Sort List - Part 1 of 4

Jake-S@cup.portal.com (Jake G Schwartz) (04/03/91)

   HP48SX Internal Address List sorted in increasing address order
                              4/2/91
------------------------------------------------------------------------
                         Author/Symbol Key:

   : or =  Jan Brittenson                 (RAM) - Address is in RAM
   -       Rick Grevelle        (in hidden ROM) - Address is in the 32K ROM
   ;       Jim Cloos                              page hidden below built-in
   ^       Paul Dale                              RAM (70000-7FFFF) 
  blank    Derek Nickel                      MC - Machine Code
   /U      HP USRLIB built-in names         TOS - Top of Stack

Addresses with a dash and no definition are prefixed code entry points
(as identified by Rick Grevelle) whose functions have yet to be described.
Multiple definitions have been included here for completeness.
------------------------------------------------------------------------

 (start of part 1 of 4)

00100   [DON Ofs2 Ofs1 Ofs0] Disp On, Bit Offset
00100:  display_IO
00101   [Con3 Con2 Con1 Con0] Contrast
00102   [VDIG LID TRIM Con4] Disp Test (VDIG,LID,TRIM should be 0) & Contrast
00104   16 bit hardware CRC
0011F:  7_or_f_map
00138   hardware timer
00138:  clock
0045C:  intr_save_offset
004EA:  keybuf
00D57:  kbflush
00D71-
01160:  do_in.4
0172B-
01E5E-
01F53-
01F6D-  cllcd_(status_&_stack_area)
01FA7-  cllcd_(entire_display)
02248   move #100,c.a / config
028FC   Enter Machine Code (for RPL Objects)
028FC:  Type
02911   System Binary
02911:  type_Address
02911;  /U #
02933   Real Number
02933:  type_Real
02933;  /U %
02955   Long Real
02955:  type_LReal
02955;  /U %%
02977   Complex Number
02977:  type_Complex
02977;  /U C%
0299D   Long Complex
0299D:  type_LComplex
0299D;  /U C%%
029BF   Character
029BF:  type_Char
029BF;  /U CHR
029E8   Array
029E8:  type_Array
029E8;  /U ARRY
02A0A   Linked Array
02A0A:  type_Arr_Linked
02A0A;  /U LNKARRY
02A2C   String
02A2C:  type_String
02A2C;  /U $
02A4E   Binary Integer
02A4E:  type_Binary
02A4E;  /U HXS
02A74   List
02A74:  type_List
02A74;  /U {
02A96   Directory
02A96:  type_Directory
02A96;  /U DIR
02AB8   Algebraic
02AB8:  type_Algebraic
02AB8;  /U DOSYMB
02ADA   Unit
02ADA:  type_Unit
02ADA;  /U UNIT
02AFC   Tagged
02AFC:  type_Tagged
02AFC;  /U TAG
02B1E   Graphic
02B1E:  type_Graphic
02B1E;  /U GROB
02B40   Library
02B40:  type_Library
02B40;  /U LIB
02B62   Backup
02B62:  type_Backup
02B62;  /U BAK
02B88   Library Data
02B88:  type_Libdata
02B88;  /U DOEXT0
02BAA;  /U DOEXT1
02BCC;  /U DOEXT2
02BEE;  /U DOEXT3
02C10;  /U DOEXT4
02C28:  span10nib
02C49:  span21nib
02C6D:  span26nib
02C95:  span32nib
02CBC:  span47nib
02CE3:  spanbyte
02D04:  span5vector
02D2A:  span1thread
02D9D   Program
02D9D:  type_Program
02D9D;  /U ::
02DCC   Code
02DCC:  type_Code
02DCC;  /U CODE
02E48   Global Name
02E48:  type_Gname
02E48;  /U ID
02E6D   Local Name
02E6D:  type_Lname
02E6D;  /U LAM
02E92   XLIB Name
02E92:  type_Func
02E92:  type_Xname
02E92;  /U ROMPTR
02EFB:  spanname
02F28:  spanxlib
02F4C:  Get_val_Eval
02F6F-
02FD6:  Getvalue_or_ErrUndef
02FEF:  GetXlib_or_ErrUndef
03012:  getinstr_2
03019   MC: skip next token
03019:  getinstr
0312B   End Marker
0312B-  end_composite_object
0312B:  End
0312B;  /U ;
03130   RPL RETURN
03130:  rpl_end
0314C   Internal DEPTH -> (1:System Binary)
0314C-  depth
0314C:  Depth
03188   Internal DUP
03188-  dup_1any
03188:  Dup
031AC   Internal DUP2
031AC-  dup2_1any2any
031AC:  Dup2
031D9   Internal DUPN (N:...,1:System Binary)
031D9-  dupn
031D9:  Dupn
03223   Internal SWAP
03223-  swap
03223=  Swap
03244   Internal DROP
03244-  drop
03244=  Drop
03258   Internal DROP2
03258-  drop2
03258:  Drop2
0326E   Internal DROPN (1:System Binary)
0326E-  dropn
0326E=  Dropn
03295   Internal ROT
03295-  rot
03295=  Rot
032C2   Internal OVER
032C2-  over
032C2:  Over
032E2   Internal PICK (N:...,1:System Binary)
032E2-  pick
032E2:  Pick
032F3:  pick_a_from_c
03325   Internal ROLL (N:...,1:System Binary)
03325-  roll
03325:  Roll
03330:  roll_a_levels
0339E   Internal ROLLD (N:...,1:System Binary)
0339E-  rolld
0339E:  Rolld
033A9:  rolld_a_levels
03416   MC: garbage collect need 1 stack element
0341D   MC: garbage collect need C.A stack elements
03442-  con_1real2{shortshort}
03562-  size_(elements)_1array
0357C   MC: push A as new System Binary and continue RPL
0357C:  pusha_rplret_alt
0357F:  pusrr0_rplret_alt
03585:  rplret_3
0358F-  type_(real/complex)_1array
035A9-  size_(dimension)_1array
035A9=  Arrdims_listofshort
0363B^  <61441h>
03672   MC: restore registers, push A and continue RPL
03672:  restore_regs_pusha_ret
03685-  verify_existence_of_array_element_1array2{<><>}
0371D-  get_1array2short 
03826^  <A8241h>
03880^  <102A8h>
038DC^  <E13A8h>
039BE:  blkalloc_keep_c
03A81   True
03A81-  external_true
03A81:  True
03A86:  pusha_rplret
03AC0   False
03AC0-  external_false
03AC0:  False
03ADA-  xor_(boolean)_1external2external
03AF2   Internal NOT (1:True/False)
03AF2-  not_(boolean)_1external
03AF2:  Not
03B06   MC: push False and continue RPL
03B06:  False_rplret
03B1A   MC: push True and continue RPL
03B2E   if TOS-1 = TOS (object addresses are the same) -> True/False
03B2E-  ==_(boolean)_1external2external
03B2E:  Identicalp
03B46   if TOS-1 = False, then DROP TOS, else DROP TOS-1
03B46-  and_(boolean)_1external2external
03B46:  If_not_false
03B65:  setr0_rplret_alt2
03B68:  seta_rplret_alt2
03B75   if TOS-1 = True, then DROP TOS, else DROP TOS-1
03B75-  or_(boolean)_1external2external
03B75:  DropLev2_ifTrue
03B97   Internal SAME -> True/False
03B97-  same_(boolean)_1any2any
03C64-  prolog\->short_1list/program/algebraic/directory
03C64:  Type_to_short
03CA6   if TOS = 0 (System Binary) -> True/False
03CA6-  not_(boolean)_1short
03CA6:  Nonzerop_short
03CC7   if TOS != 0 (System Binary) -> True/False
03CC7-  <0h>_\=/_(boolean)_1short
03CC7:  Zerop_short
03CE4   if TOS-1 < TOS (System Binary) -> True/False
03CE4-  <_(boolean)_1short2short
03CE4:  LessThan_short_short
03D19   if TOS-1 = TOS (System Binary) -> True/False
03D19-  ==_(boolean)_1short2short
03D19:  Equal_short_short
03D4E   if TOS-1 != TOS (System Binary) -> True/False
03D4E-  \=/_(boolean)_1short2short
03D4E:  NotEqual_short_short
03D83   if TOS-1 > TOS (System Binary) -> True/False
03D83-  >_(boolean)_1short2short
03D83:  GreaterThan_short_short
03DBC   Internal + (2:System Binary,1:System Binary)
03DBC-  +_1short2short
03DBC:  Add_short
03DC7:  Push_A_and_rplret
03DE0   Internal - (2:System Binary,1:System Binary)
03DE0-  -_1short2short
03DE0:  Sub_short
03DEF   Internal add one (1:System Binary)
03DEF-  <1h>_+_1short
03DEF:  Inc_short
03E0E   Internal subtract one (1:System Binary)
03E0E-  <1h>_-_1short
03E0E:  Dec_short
03E2D   Internal add two (1:System Binary)
03E2D-  <2h>_+_1short
03E2D:  Inc2_short
03E4E   Internal subtract two (1:System Binary)
03E4E-  <2h>_-_1short
03E4E:  Dec2_short
03E6F   Internal multiply by 2 (1:System Binary)
03E6F-  <2h>_*_1short
03E6F:  Mul2_short
03E8E   Internal divide by 2 (1:System Binary)
03E8E-  <2h>_/_1short2short
03E8E:  Div2_short
03EB1   Internal AND (2:System Binary,1:System Binary)
03EB1-  and_1short2short
03EB1:  And_short_short
03EC2   Internal * (2:System Binary,1:System Binary)
03EC2-  *_1short2short
03ED9:  Mul_short_short_loop
03EE5:  Mul_short_short_done
03EF7   Internal / (2:System Binary,1:System Binary) -> (2:rem,1:div)
03EF7-  /_1short2short
03F14:  shortpushR0R1_rplret
03F5D   MC: pop TOS-1 and TOS (System Binary) -> A.A and C.A
03F5D:  get2shorts
03F8B   push Real Number prolog <2933h>
03F8B:  Short__type_Real
03F8B^  <2933h>
03F95   push Complex Number prolog <2977h>
03F95:  Short__type_Complex
03F95^  <2977h>
03F9F   push List prolog <2A74h>
03F9F:  Short__type_List
03F9F^  <2A74h>
03FA9   push Global Name prolog <2E48h>
03FA9:  Short__type_Gname
03FA9^  <2E48h>
03FB3   push Program prolog <2D9Dh>
03FB3:  Short__type_Program
03FB3^  <2D9Dh>
03FBD   push Algebraic prolog <2AB8h>
03FBD:  Short__type_Algebraic
03FBD^  <2AB8h>
03FC7   push Directory prolog <2A96h>
03FC7:  Short__type_Directory
03FC7^  <2A96h>
03FD1   push Local Name prolog <2E6Dh>
03FD1:  Short__type_Lname
03FD1^  <2E6Dh>
03FDB   push Long Real prolog <2955h>
03FDB:  Short__type_LReal
03FDB^  <2955h>
03FE5   push Unit prolog <2ADAh>
03FE5:  Short__type_Unit
03FE5^  <2ADAh>
03FEF   <0h>
03FEF:  Short_0
03FF9   <1h>
03FF9:  Short_1
04003   <2h>
04003=  Short_2
0400D   <3h>
0400D=  Short_3
04017   <4h>
04017=  Short_4
04021   <5h>
04021=  Short_5
0402B   <6h>
0402B=  Short_6
04035   <7h>
04035=  Short_7
0403F   <8h>
0403F:  Short_8
04049   <9h>
04049:  Short_9
04053   <Ah>
04053=  Short_0ah
0405D   <Bh>
0405D=  Short_0bh
04067   <Ch>
04067:  Short_0ch
04071   <Dh>
04071:  Short_0dh
0407B   <Eh>
0407B=  Short_0eh
04085   <Fh>
04085:  Short_0fh
0408F   <10h>
0408F:  Short_10h
04099   <11h>
04099=  Short_11h
040A3   <12h>
040A3=  Short_12h
040AD   <13h>
040AD:  Short_13h
040B7   <14h>
040B7:  Short_14h
040C1   <15h>
040C1:  Short_15h
040CB   <16h>
040CB:  Short_16h
040D5   <17h>
040D5:  Short_17h
040DF   <18h>
040DF:  Short_18h
040E9   <19h>
040E9:  Short_19h
040F3   <1Ah>
040F3=  Short_1ah
040FD   <1Bh>
040FD=  Short_1bh
04107   <1Ch>
04107:  Short_1ch
04111   <1Dh>
04111:  Short_1dh
0411B   <1Eh>
0411B=  Short_1eh
04125   <1Fh>
04125:  Short_1fh
0412F   <20h>
0412F:  Short_20h
04139   <21h>
04139=  Short_21h
04143   <22h>
04143=  Short_22h
0414D   <23h>
0414D:  Short_23h
04157   <24h>
04157:  Short_24h
04161   <25h>
04161:  Short_25h
0416B   <26h>
0416B:  Short_26h
04175   <27h>
04175:  Short_27h
0417F   <28h>
0417F:  Short_28h
04189   <29h>
04189:  Short_29h
04193   <2Ah>
04193=  Short_2ah
0419D   <2Bh>
0419D:  Short_2bh
041A7   Internal OFF
041A7=  Off
041ED-  off     
04546-
04577-
04693:  save_regs_ref_4
04708-
04714-  key     
04714:  Lastkeyq
0477E:  poll_kbd
047B7:  clear_pollflag
047C7-
04912-  keywait
04A0B-  rcl_rom_directory_1short
04A0B-  rcl_rom_operation_1short
04A0B-  rcl_variable_name_1short
04A41-  rcl_variable_menu_label_as_global_1short(label_number)
04A41-  rcl_rom_menu_label_as_string_1short(label_number)
04A4C-  sto_menu_label_1short2string
04A57-  
04B15:  getmenu
04B76:  getmenuent
04CDC^  <72000h>
04CE6-  rcl_5_nibbles_@70673_as_short
04CE6:  Get_70673
04D0E-  sto_5_nibbles_@70673_1short
04D0E:  Set_70673
04D33-  clr_5_nibbles_@70673
04D33:  Clear_70673
04D3E:  Set_string_null
04D43:  set_string_null
04D57:  Drop_set_string_null
04DD7-  split_short_1short      
04DD7:  Split_short
04E07-  move_address_at_70600_to_@d1
04E07:  Get_70600
04E37-  move_address_@d1_to_at_70600
04E37:  Bind_70600
04E5E:  Inc_local_and_loop_ctrs
04EB8:  Eval_in_new_frameq
04ED1-  do errn @70673 (Last error code)
04FAA-  errn_006_power_lost     
04FB6   Error: Insufficient Memory
04FB6-  errn_001_insufficient_memory    
04FB6:  Error_Insuff_mem
04FBB   MC: Error: Insufficient Memory
04FBB:  error_insuff_mem
04FC2-  errn_002_directory_recursion    
04FC2:  Error_Dir_Recursion
04FC7:  error_dir_recursion
04FCE-  errn_003_undefined_local_name   
04FCE:  Error_Undef_local
04FD3:  error_undef_local
04FDA-  errn_008_invalid_card_data      
04FDA:  Error_Inv_card_data
04FDF:  error_inv_card_data
04FE6-  errn_009_object_in_use  
04FE6:  Error_Obj_in_use
04FEB:  error_obj_in_use
04FF2-  errn_00a_port_not_available     
04FF2:  Error_Port_not_avail
04FF7:  error_port_not_avail
04FFE-  errn_00b_no_room_in_port        
04FFE:  Error_No_room_in_port
0500A-  errn_00c_object_not_in_port     
0500A:  Error_Obj_not_in_port
0500F:  error_obj_not_in_port
05016-  errn_004_undefined_xlib_name 
05016:  Error_Undef_xlib_name
0501B:  error_undef_xlib_name
0501E   MC: invoke error code in C
0501E:  disp_error_c_p
05023   MC: invoke error code in A.A
05023:  disp_error_a
05040-  
05068-   
05089   Internal UVAL (1:Unit)
05089-  uval_(1_get)_1unit
05089=  RE_Unit
050ED-  string->character 
050ED:  FirstChar_of_string
05143   MC: Restore D,B,D1,D0 (C=D0), Clear Carry and continue RPL
05153:  SubList_2_toEnd
0516C:  SubString_2toEnd
05176:  Short_fffffh
0518A-  +_1string2string 
05193   Internal + (2:String,1:String)
05193-  +_1string2string 
05193=  Add_string_string
0521F   Internal + (2:List,1:List)
0521F=  Add_list_list
0525B-  chr_1short2string 
052C6=  ToList1_Swap_AddList
052EE-  chr_1short2string  
052EE=  Add_char_to_string
052FA   Internal + (2:List,1:Any)
052FA=  Add_list_any
05331   build composite object (N:...,2:System Binary,1:System Binary)
05331-  \->list_1short(prolog)2short(n)3any...nanyn+1anyn+2any
05331-  \->program_1short(prolog)2short(n)3any...nanyn+1anyn+2any
05331-  \->algebraic_1short(prolog)2short(n)3any...nanyn+1anyn+2any
05445   Internal ->PROGRAM (N:...,1:System Binary)
05445:  ToPrg
05459   Internal ->LIST (N:...,1:System Binary)
05459:  ToList
0546D   Internal ->ALGEBRAIC (N:...,1:System Binary)
0546D:  ToAlg
05481   Internal ->UNIT (M:...,1:System Binary)
054AF   explode composite object -> (N:...,1:System Binary)
054AF-  algebraic\->_1algebraic
054AF-  list\->_1list
054AF-  program\->_1program
054AF:  ListAlgPrgTo
0554C   GC & load D,B,D1,D0 (C=D0) / CC
05566:  Short_5_p_alt
0556F:  Short_5_p
05574:  short_5_p
0558A:  settrue_if_CEqA_elseFalse
0558F:  settrue
055A3:  setfalse
055B7:  Short__End_p
055D5:  Binary_null             Template for Binaries
055DF   ""
055DF:  String_null             Template for Strings
055E9   { }
055E9:  List_empty              Template for Lists (empty list)
055F3:  Alg_empty               Template for Algebraics
05616-  size_(nibbles)_1string
05622   SIZE of level 2 String -> System Binary
05622-  size_(bytes)_1any2string
05622:  Strlen_of_lev2
05636   Internal SIZE (1:String) -> System Binary
05636-  size_(bytes)_1string
05636:  Strlen
0567B-  size_1list
0567B=  Size_listUnit
056B6   Internal GET; object <Nh> -> N'th address in object
056B6-  get_1short2list
05733-  sub_(bytes)_1short2short3string
05733=  Substr_short_short
05815-  sub_(nibbles)_1short2short3string
05821-  sub_1short2short3list
05821=  Sub_Arr_Short_Short
05902-  size_(nibbles)_1any
05944   Internal BYTES (non-ROM objects) -> (2:System Binary,1:Binary Integer)
05944-  bytes_1any
05944=  Crc_Nibbles
059CC-  short->binary
05A03   Internal B->SB (1:Binary Integer)
05A03-  binary->short
05A03=  Bin_to_short
05A51-  character\->short       
05A51:  Char_to_short
05A75-  short\->character       
05A75:  Short_to_char
05AB3:  Copy_and_set_type
05ACC-  change_prolog_1short2any
05ACC:  Settype
05B15-  string\->global_1string
05B15:  Str_to_Global
05B79   MC: allocate string
05B79:  stralloc
05B88:  str_try_again
05BAD:  str_avail
05BE9   name to string (1:Global Name/Local Name)
05BE9-  global\->string_1global
05BE9:  Name_to_string
05C27   Internal R->C (2:Real Number,1:Real Number)
05C27-  r\->c
05C27:  Two_reals_to_complex
05C8A-  longreal\->longcomplex_1longreal2longreal
05C8A:  Two_lreals_to_lcomplex
05D2C   Internal C->R (1:Complex Number)
05D2C-  c\->r
05D2C:  Complex_to_reals
05DBC-  longcomplex\->longreal_1longcomplex
05DBC:  Lcomplex_to_lreals
05E81   Deep internal ->TAG (2:Any,1:String)
05E81:  StrTag
05E9F-  /->tag_1{global_any}    
05E9F:  Tag
05EC7   Internal OBJ-> (1:Tagged)
05EC7=  SplitTag
05EEA   change prolog of list element one to Global Name
05EEA-  dtag_1{tagged}
05EEA:  Zap_Gname
05F0F   GC Need 5 Nibbles
05F2E   Internal ->TAG (2:Any,1:Global Name/Local Name)
05F42   RPL Garbage Collect
05F42-  force_memory_packing
05F61   Internal MEM (nibbles free) -> (1:System Binary)
05F61-  mem
05F61:  Free_mem
05F91:  findobj
0613E   Garbage Collect & set D
064D6-  
064E2-   
06529:  shortpush_r0r1
06537   MC: push R0 as new System Binary
06537:  shortpush_r0
0657E^  <61441h>
065D9-          
065E5-   
06641   MC: pop TOS (System Binary) -> A.A
06641:  getshort
06657   Internal NEWOB
06657-  newob
06657:  Copy
066B9:  blkcopy_descend
0670C   MC: block copy
0670C:  blkcopy
0679B   MC: save D0,D1,B,D (uses C,D0), clear carry
0679B:  save_regs
067D2   MC: restore D,B,D1,D0 (C=D0), clear carry
067D2:  restore_regs
06806   Let C = Space B/W RSTK & TOS
06806=  avail_mem
06A8E   Let C.A = C.A / 5
06A8E:  div5_c
06AD8   A=malloc(C Nibbles) ???
06AD8:  blkalloc
06AE3   A=malloc(C Nibbles)
06B00   A=malloc(B Nibbles) (C.A=free nibbles)
06B3E:  Dynamicp
06B4E-  
06DDE-   
06E8E   No Operation (continue RPL)
06E8E-  continue_rpl_(no_operation)
06E8E:  RE_Real
06E97   Place next address on the stack, do not execute
06E97-  push_next_item_in_rpl_instruction_stream_to_stack_unevaluated
06E97:  Get_value
06EC9:  pushobj_a_rplret
06EEB-  
06F66-  
06F8E   Internal EVAL (1:Any except Algebraic/List/Tagged)
06F8E-  eval_1any_(except_list_algebraic_tagged)
06F8E:  Eval
06F9F-  eval_1program
06F9F:  Eval_program
06FB7   iterate loop
06FB7:  Iterate_loop
06FBC   MC: iterate loop
06FBC:  iterate_loop
06FD1   Return and execute the next token in this stream
06FD1:  Eval_prev_context
06FD6   MC: return and execute the next token in this stream
06FD6:  eval_and_ret
06FD6:  rpl_return
07012:  DupNextPrg
0701F-  
07035:  dupnextprg
070C3-  if_level3_true_then_drop_&_eval_else_swap_drop_&_eval_1any2any3external
070C3:  IfTrueFalse
070F5:  pop_rplret
070FD-  if_level2_true_then_eval_else_else_drop
0712A-  if_level1_true_then_skip_next_item_in_this_instruction_stream_1external
0712A   if pop TOS = True, then skip next token
0712A:  Skip_if_True
0714D-  skip_next_item_in_this_instruction_stream
0714D:  Skip
07152   MC: skip next token and continue RPL
07152:  skip
0715C-  skip_next_2_items_in_this_instruction_stream
0715C   skip next two tokens
0715C:  Skip_Two
07161   MC: skip next two tokens and continue RPL
07161:  skip_two
0716B   set return to self
0716B:  Set_return_self
07170   MC: set return to self and continue RPL
07170:  set_return
0717B   MC: set return to A and continue RPL
0717B:  set_return_a
071A2   loop
071A2-  do
071A2-  while
071A2:  Loop
071AB   exit loop
071B0   MC: exit loop
071B0:  exit_loop
071BE   MC: continue RPL
071BE:  rplret_5
071C8   if pop TOS = False, then exit loop, else iterate loop
071C8-  end_1external_(do_(until)_loop/test-clause_true_end)
071C8-  until_(end)_1external
071C8:  Until_False
071CD   MC: if pop TOS = False, then exit loop, else iterate loop
071E5   exit loop
071E5-  end_1external
071EE   if pop TOS = False, then skip next two tokens and iterate
071EE-  repeat_1external_(while_test-clause_true_repeat_loop-clause_end)
071EE:  IfFalse_thenSkip2Iterate
07211   MC: skip next two tokens and iterate
07221   push current loop counter as System Binary
07221-  rcl_current_loop_count
07221:  Loop_increment
07249-  rcl_n_(total_loop_passes)
07249:  Loop_counter
07258:  Loop_v1q
07264:  Loop_v2q
07270:  Set_loop_increment
07295:  Set_loop_counter
072AD:  Set_loop_v1q
072C2:  Set_loop_v2q
072D7   A=orig D0, C=ptr to loop info, D0=ptr to loop counter
072D7:  find_loopvars
072EC:  find_loopvar_3
07321-  
07334   next (internal loop)
07334-  next    
07334:  Next
073A5-  step_1short
073A5:  Step
073C3   for 0 to (TOS)-1 (1:System Binary)
073C3-  start_0_to_n-1_1short
073C3:  Start_0or1_shortSub1
073CE   for 1 to (TOS)-1 (1:System Binary)
073CE-  start_1_to_n-1_1short
073CE:  Start_1_to_nSub1
073DB   for 1 to TOS (1:System Binary)
073DB-  start_1_to_n_1short_(7249=n+1)
073DB:  Start_1_shortSub1
073F7   for TOS to (TOS-1)-1 (2:System Binary,1:System Binary)
073F7-  start_n(2)_to_n(1)_1short2short
073F7:  Start_short_short
07497-  purge_local(s)
074D0   store local variables (N:Any,...,1:List(of Local Names))
074D0:  ListAlgPrgTo_StoreLocals
074E4   store local variables (M:Any,...N:Local Name,...1:System Binary)
074E4-  store_local(s)_1short2local....nany
074E4:  Store_Locals_N
075A5-  
075E9-
07638-  
0764E;  Replace message table (1:Array of String, 2:System Binary)
076AE   Internal DETACH from HOME directory (1:System Binary)
07709   Internal ATTACH to HOME directory (1:System Binary)
077C2-  
07819-
07866:  nameeqp
078C3:  Find_var_current_dir
07901=  Up_dir
0791E-  
0792A-
07943-  
0797B-  rcl_1global 
0797B:  Find_name
079AE:  rr_pusha_jumpTrue_ref
079CC:  try_prev_dir
079D3:  rr_setFalse_rplret_ref
079D7-  
07A90^  <216A8h>
07BFD-  
07C2F:  jumpTrue
07D1B-  
07D27   Internal STO (2:Any,1:Local Name)
07DA2:  find_local_var
07DF3:  find_local_b_levels_up
07E50-  \->xlib_1short2short
07E76-  rpl\->xlib_1program
07E99-  xlib\->rpl_1xlib
07E99=  Find_Xlib
07EC4:  rr_setFalse_rplret
07F98-  
08051^  <414C1h>
08072:  rr_pusha_jumpTrue
0807F-  returns_library_location_1short(library_number)
0809E-  size_(nibbles-10)_1short(library_number)
080C9-  does_this_library_or_one_higher_exist?_1short(library_number)
08101-  returns_hash_table_location_1short(library_number)
0811C-  returns_message_table_location_1short(library_number)
08128-  rcl_link_table_to_stack_(large_binary)_1short(library_number)
08143-  rcl_configuration_routine_to_stack_1short(library_number)
0814F-  
081B9-  
081D9-  backup\->name_1backup   
081EE-  library\->short_1library        
08207-  
0821F-  
0825B^  <216A8h>
082E3-  variable_contents->name
082E3=  Up_findValue
08309-  rcl_next_directory_up_1directory
08309=  Updir
08326-  rcl_first_directory/variable_1directory
08326:  Get_first_dirEntry
08376-  rcl_next_directory/variable_1external2directory
085D3-
08696-  sto_1global2any
089D8-  purge_1external(true/false)2any(variable_contents)
089FA-  purge_1any(variable_contents)   
08CCC-  xlib\->_1xlib
08D08-  sto_directory_1global2directory 
08D08-  updir_1directory_(pre-existing)
08D08:  Set_curdir
08D14:  pop_store_ind_c_rplret
08D1C:  store_a_indc_rplret
08D2F:  clr_indc_rplret
08D35:  zeropindc
08D4A:  Store_tmpdir
08D5A   recall current directory
08D5A-  rcl_current_directory
08D5A:  Get_curdir
08D66:  pushindc_rplret
08D75:  rpljump_indc
08D82-  rcl_home_directory
08D82:  Get_Tmpdir
08D92   Internal HOME
08D92-  home
08D92:  Home
08D9E:  setHome_c
08DC4:  SetTmpdir_Home
08DD4   if pop TOS = HOME directory -> True/False
08DD4-  home?_(boolean)_1directory
08DD4:  Homep
08E14^  <7FFh>
08E73-  
08ECC^  <566A8h>
08F20^  <D6A8h>
09107-  
0922D^  <71541h>
092F5-  
0948E-  
094A4-  
095E3^  <2D541h>
09699-  
0970A-  
09730-  
0AAD0-  
0AB51-  
0AB82-  return_port_pointers_1short     
0AC66^  <36h>
0AC70-  
0AD47-  
0AE03-  
0AF8B-  
0B037-  
0B5F3-  
0B69B-  
0B7C6-  
0B9E8-  
0BA7D-  
0BB68-  
0BD54-  
0BD60-  
0C1EF-  
0C288-  
0C2CB-  
0C37A-  
0C4EC-  rcl_message_as_string_1short(message_table_address)2short(message)
0C4EC-  (should_be_immediately_followed_drop_newob)
0C4EC-  
0C4FE^  <F6A8h>
0C612-  rcl_1short(address_of_data_being_recalled)
0C624^  <F6A8h>
0CAF5-  
0CB0F:  ret_FalseTrue_2_ref
0CB84-  
0CBA2-  
0CBAE   Error: Nonexistent Alarm
0CBAE-  errn_d04_nonexexistent_alarm    
0CBAE:  Error_Nonexist_Alrm
0CBB7:  error_inv_date
0CBC4:  error_inv_time
0CBD1:  error_inv_repeat
0CBDE   MC: Error: Nonexistent Alarm
0CBDE:  error_nonexist_alrm
0CBE3:  disp_error_cx
0CBEF:  restore_regs_and_p
0CBFA   Internal TIME
0CBFA=  Cmd_Time
0CC0E   Internal DATE
0CC0E=  Cmd_Date
0CC39   Internal DDAYS
0CC39=  Ddays
0CC5B   Internal DATE+
0CC5B=  DateAdd
0CC60^  <1h>
0CC79-  
0CD2B   Internal ->DATE
0CD2B=  ToDate
0CD3F   Internal CLKADJ
0CD3F=  Clkadj
0CD53   Internal ->TIME
0CD53=  ToTime
0CD67-   
0CDA6-  
0CDD0-   
0CE0F-  
0CEB9-  
0CED9-  
0CEEA-  
0CF5B-  
0CFD9=  Date_to_string
0D06A=  Time_to_string
0D143-  
0D156-  
0D169-   
0D18A-  
0D2A3   Internal WSLOG
0D2A3:  Wslog
0D304   Internal TSTR
0D304:  Tstr
0DC0F-   
0DC1C-  
0DC28-   
0DDA8   Internal ACKALL
0DDA8:  Ackall
0DDC1   Internal ACK
0DDC1:  Ack
0DF01   'Alarms' (Global Name)
0DF28   'Alarms' (Global Name)
0DF45-  
0E029:  Disp_string_at_curPos
0E05B:  Disp_grob_at_curPos
0E06F:  Erase_two_stkLines
0E083:  Erase_curStkLine
0E097:  Erase_nextStkLine
0E0AB:  Get_fullStkGrob_curPos_nextEolPos
0E0D3:  Get_fullStkGrob_curPos_eolPos
0E0FB:  Get_fullStkGrob_nextLine
0E128:  Get_fullStkGrob_curColRow
0E1B9-   
0E1D8   Convert internal alarm into external alarm
0E219-  
0E235   Recall 'Alarms' list
0E248-  
0E26D-  
0E27D-  
0E2A1-  
0E2B9-  
0E2D1-  
0E302-  
0E343^  <F9A7Ah>
0E3A6-  
0E3DF   Internal RCLALARM
0E3DF:  Rclalrm
0E402   Recall N'th Alarm (1:System Binary) -> (Alarm/True,False)
0E41B-  
0E43C-  
0E47A   'M' (Local Name)
0E483   'N' (Local Name)
0E4A0   'M' (Local Name)
0E4AE   'N' (Local Name)
0E4C1   'M' (Local Name)
0E510=  Stoalrm_real
0E52E^  0
0E54D=  Stoalrm_list
0E593^  0
0E5D0^  0
0E630-  
0E66A-  
0E693-  
0E724   Internal DELALARM
0E724=  Delalrm
0E7B0-  
0E7BB-  
0E7CE-  
0E7F7-  
0E802-  
0E80D-  
0E820-  
0E82B-  
0E836-  
0E8F3:  testEnd
0E8FE:  testbinary
0E909:  test_1dh
0E914:  testlist
0E91B:  testtype
0E925-  
0E9B2-  
0EAD7   Internal FINDALARM (1:Real Number)
0EAD7=  Fndalrm_real
0EB31   Internal FINDALARM (1:List)
0EB31=  Fndalrm_list
0EB81   Internal TICKS
0EB81=  Ticks
0EC07-  
0EC9D-  
0ED78-  
0ED95-  
0EDFA:  test_d_gt_1
0EE26-  
0EFEE:  Real_8192               Ticks per second
0F003:  Real_491520             Ticks per minute
0F018:  Real_29491200           Ticks per hour
0F02D:  Real_707788800          Ticks per day
0F042:  Real_4954521600         Ticks per week
0F33A   Internal UNIT
0F33A=  ToUnit_real_unit
0F34E   Internal OBJ-> (1:Unit)
0F371   Internal CONVERT
0F371=  Convert
0F547^  32 (Long Real)
0F561   Standardize units and then strip units (levels 1,2)
0F584   Internal == (2:Real Number/Unit,1:Real Number/Unit)
0F598   Internal != (2:Real Number/Unit,1:Real Number/Unit)
0F5AC   Internal < (2:Real Number/Unit,1:Real Number/Unit)
0F5C0   Internal > (2:Real Number/Unit,1:Real Number/Unit)
0F5D4   Internal <= (2:Real Number/Unit,1:Real Number/Unit)
0F5E8   Internal >= (2:Real Number/Unit,1:Real Number/Unit)
0F5FC   Internal ABS (1:Unit)
0F5FC=  Abs_unit
0F615   Internal NEG (1:Unit)
0F615=  Neg_unit
0F62E   Internal SIN (1:Unit)
0F62E=  Sin_unit
0F660   Internal COS (1:Unit)
0F660=  Cos_unit
0F674   Internal TAN (1:Unit)
0F674=  Tan_unit
0F688^  6.28318530717959 = 2pi (Long Real)
0F6A2   Internal + (2:Real Number/Unit,1:Real Number/Unit)
0F6A2=  Add_unit_unit
0F774   Internal - (2:Real Number/Unit,1:Real Number/Unit)
0F774=  Sub_real_unit
0F774=  Sub_unit
0F774=  Sub_unit_real
0F792   Internal * (2:Real Number/Unit,1:Real Number/Unit)
0F792=  Mul_unit
0F823   Internal / (2:Real Number/Unit,1:Real Number/Unit)
0F823=  Div_real_unit
0F823=  Div_unit
0F841   Internal INV (1:Unit)
0F841=  Inv_unit
0F878   Internal ^ (2:Real Number/Unit,1:Real Number/Unit)
0F878=  Pwr_unit
0F8FA=  Xroot_real_unit
0F913   Internal SQ (1:Unit)
0F913=  Sq_unit
0F92C   Internal sqrt (1:Unit)
0F92C=  Sqrt_unit
0F945   Internal UBASE (1:Unit)
0F945=  Ubase
0FB6F   Internal MAX (2:Real Number/Unit,1:Real Number/Unit)
0FB6F=  Max_unit
0FB8D   Internal MIN (2:Real Number/Unit,1:Real Number/Unit)
0FB8D=  Min_unit
0FBAB   Internal % (2:Unit,1:Real Number)
0FBAB=  Percent_unit_real
0FC3C   Internal %CH (2:Real Number/Unit,1:Real Number/Unit)
0FC3C=  PercentCH_unit
0FCCD   Internal %T (2:Real Number/Unit,1:Real Number/Unit)
0FCE6   Internal SIGN (1:Unit)
0FCE6=  SigmaN_unit
0FCFA   Internal IP (1:Unit)
0FCFA=  Ip_unit
0FD0E   Internal FP (1:Unit)
0FD0E=  Fp_unit
0FD22   Internal FLOOR (1:Unit)
0FD22=  Floor_unit
0FD36   Internal CEIL (1:Unit)
0FD36=  Ceil_unit
0FD68   Internal RND (2:Unit,1:Real Number)
0FD68=  Rnd_unit_real
0FD8B   Internal TRNC (2:Unit,1:Real Number)
0FD8B=  Trunc_unit_real
10141-  
10B1C-  
10D4B-  
10E68^  0.555555555555556 = 5/9 (C <-> F conversion) (Long Real)
10E82^  1 (Long Real)
10E9C^  273.15 = 0C in K (Long Real)
10EB6^  459.67 = 0F in R (Long Real)
10ED0^  0.0795774715459477 (Long Real)
10EEA-  
10EFA-  
10F54-  errn_102_can't_edit_null_char   
10F54:  Error_Cant_edit_null_char
10F64-  errn_103_invalid_user_function
10F64:  Error_Inv_user_func
10F74   Error: No Current Equation
10F74-  errn_104_no_current_equation    
10F74:  Error_No_Cur_eq
10F79   MC: Error: No Current Equation
10F86-  errn_106_invalid_syntax          
10F86:  Error_Inv_syntax
10F96-  errn_12e_invalid_ppar   
10F96:  Error_Invalid_PPAR
10FA6-  errn_12f_non-real_result 
10FA6:  Error_Nonreal_result
10FB6-  errn_130_unable_to_isolate      
10FB6:  Error_Unable_to_Isol
10FC6-  errn_126_halt_not_allowed       
10FC6:  Error_Halt_not_allowed
10FD6   Internal KILL
10FD6-  errn_123_kill   
10FD6:  Error_123
10FE6-  errn_124_last_stack_disabled    
10FE6:  Error_Last_stack_disabl
10FF6-  errn_125_last_cmd_disabled      
10FF6:  Error_Last_cmd_disabl
11006-  errn_128_wrong_argument_count   
11006:  Error_Wrong_arg_count
11016-  errn_129_circular_reference     
11016:  Error_Circ_ref
11026-  errn_12a_directory_not_allowed 
11026:  Error_Dir_not_allowed
11036   Error: Non-Empty Directory
11036-  errn_12b_non-empty_directory    
11036:  Error_Nonempty_dir
1103B   MC: Error: Non-Empty Directory
11046-  errn_12c_invalid_definition     
11046:  Error_Inv_def
11056-  errn_12d_missing_library
11056:  Error_Missing_library
11066-  errn_13c_name_conflict 
11066:  Error_Name_conflict
11076   Internal CONT
11076-  errn_13e_continue
11076:  Error_13e
110EF-  
1123F-  
112EC   ?? save Last Arguments
112EC-  clear_last_arguments
112EC:  Clear_lastargs
11320-  
1132D-  alpha_annunciator_on            
1133A-  alpha_annunciator_off
11347-  blue_shift_annunciator_on       
11354-  blue_shift_annunciator_off
11361-  orange_shift_annunciator_on     
1136E-  orange_shift_annunciator_off
11387-  
113C2-  
113D2-  
113E2-  
113F2-  
11402-  
11412-  
11422-  
11432-  
11442-  
11452-  
11462-  
11472-  
11495-  
114B3   Push @C.A as new System Binary
114B3:  pushindc_short
114C9:  popshort_store_indc
11501-  
11511-  
11533-  prg_on  
11543-  delayed_alpha_lock      
1155C-  
1156C-  
1158F   Internal BLANK (2:System Binary,1:System Binary)
1165A=  compute_grob_nibble
11679=  Disp_Grob_inGrob_Pos
1192F-  
11A6D-  
11CBE:  getshort_ref_3
11CC5:  save_regs_ref_3
11CCC:  do_retsetxm
11CCE-   
11CF3:  String_pitch10_toGrob
11D00:  String_pitch8_toGrob
11EEF:  do_retsetc
11EFF:  back_graph_char
11F1D:  set_c_nib7_0fh
11F1F:  set_c_p_fh
11F80=  String_pitch6_toGrob
11FFF:  seta_rplret
12002:  rplret_8
1200C:  String_to_grob_pitch6
120CC:  strlen_a
120EE:  pushShortA_rplret_alt_ref
1215E-  
122FF-   
123C8-  disp_(n_x_10)_1short2string     
123E5-  <4h>_disp_(n_x_10)_1string      
123F5-  <3h>_disp_(n_x_10)_1string      
12405-  <2h>_disp_(n_X_10)_1stirng 
12415-  <1h>_disp_(n_x_10)_1string      
12429-  disp_(n_x_8)_1short2string 
12429:  Disp_pitch8Str
1245B-  <1h>_disp_(n_x_8)_1string       
1245B:  DispStk_pitch8Str_line0
1245B:  Disp_pitch8Str_line0
1246B-  <2h>_disp_(n_x_8)_1string       
1246B:  DispStk_pitch8Str_line1
1246B:  Disp_pitch8Str_line1
1247B-  <3h>_disp_(n_x_8)_1string       
1247B:  DispStk_pitch8Str_line2
1247B:  Disp_pitch8Str_line2
1248B-  <4h>_disp_(n_x_8)_1string       
1248B:  DispStk_pitch8Str_line3
1248B:  Disp_pitch8Str_line3
1249B-  <5h>_disp_(n_x_8)_1string       
1249B:  DispStk_pitch8Str_line4
1249B:  Disp_pitch8Str_line4
124AB-  <6h>_disp_(n_x_8)_1string       
124AB:  DispStk_pitch8Str_line5
124AB:  Disp_pitch8Str_line5
124BB-  <7h>_disp_(n_x_8)_1string       
124BB:  DispStk_pitch8Str_line6
124BB:  Disp_pitch8Str_line6
124CB:  DispStk_pitch8Str_line7
124CB:  Disp_pitch8Str_line7
124D7:  dispstr_row_c
12635-  rcl_stack/status_grob_(131_x_56)
12635:  Get_56line_stkGROB
12645-  rcl_menu_grob_(131_x_8)
12645:  Get_menuGrob
12655-  rcl_stack/status_grob_(131_x_56)
12655:  Get_stkGrob
12665   recall PICT
12665:  Get_graphGrob
12690-  
126DF:  Erase_lines_in_stkGROB
1270C:  Disp_at_lines_0_1
12725:  Disp_line_0
12748:  Disp_line_1
12770:  Trunc_string_for_display
127A7:  Split_string_at_LF
12815:  DispStringPitch6_inFullStkCurPos_FullStk
12829:  Disp_inFullStkCurPos_FullStk
12847-   
12996-  
12A0D-  
12A4A-  
12AF6-  
12BB7-  
12DD1-  
12E89-  
12F0A-  
12FB2   XFER: Save D,B,D1,D0 (uses C)
13043-  
13061-  
130CA-  
13135-  
1314D   Internal TEXT
13161   XFER: Restore D,B,D1,D0 (C=D0) / Clear Carry
13167-  
131C8-  
13220-  
134AE-  
134E4-  
1357F-  
13679-  
13695-  
137B6-
137B6=  Get_curRowCol
1380F-  
13825-  
1383B-  
1384A-  
13986-  
13992-  
139E7-  
13B41-  
13BB5-  
13BF1-  
13D28-  
13D55-  
13E05-  
13E22-  
13E2E-  
13E53-  
13E63-  
13E85-  
13E9E-  
13EBC-  
13ED2-  
13EF1-  
13F01-  
13F11-  
13F29-  
13F47-  
13F69-  
13F7F-  
13F9B-  
13FB0-  
13FE5-  move_5_nibbles_@70673_to_#706FF
1400E   Internal ERR0
1400E-  err0
1400E=  Err0
14039   Push Last Err# as System Binary
14039-  errn    
1404C   Internal ERRN
1404C=  Errn
14065   Internal ERRM
14065=  Errm
14088   Internal ->STR (1:Any)
14088:  ToString
140AB   Internal DISP (2:Any,1:Real Number)
140AB:  Disp
140F1   Internal CHR (1:Real Number)
140F1:  Chr
1410F   Internal NUM (1:String)
1410F:  Num
14137   Internal STR-> (1:String)
14137:  StrTo_Eval
1415A   Internal BEEP (2:Real Number,1:Real Number)
1415A:  Beep_real
1415F:  Mul1000_real
141B2-  beep_1short2short
141B2:  Beep
141DE:  jump_save_regs
141E5-          
1420A   Internal > (2:String,1:String)
1420A-  >_1string2string        
142A6   Internal < (2:String,1:String)
142BA   Internal >= (2:String,1:String)
142E2   Internal <= (2:String,1:String)
142FB   Internal FREEZE (1:Real Number)
142FB=  Freeze
14378   Internal HALT
1439B   ''halt' (Local Name)
14483   ''nohalt' (Local Name)
14D1B-  
14E6D-  
14EA5-  
14EEC-  
14F2A-  
14F8C-  
14FC3-  
15007   Internal DOERR (1:Real Number)
15007=  Doerr_real
1501B   Internal DOERR (1:Binary Integer)
1501B=  Doerr_bin
1502F   Internal DOERR (1:System Binary)
15048   Internal DOERR (1:String)
15048=  Doerr_string
1518D-  
15442:  "String_':   '"
15717   Internal STEQ (1:Any)
1572B   Internal RCEQ
15744   Internal RCEQ -> Contents,True/False
15758   unevaluated 'EQ' (Global Name)
1576C   'EQ' (Global Name)
15781   '' (Global Name)
1592D   Set last RPL token to <0h> and verify DEPTH >= 1
15978:  toString_1any
159EB-  \->str_1any_(truncate)
15A54-  
15A60-  
15A8B-  
15A97-  
15B13=  Any_to_string
15B31-  \->str_1any     
15B3D-  \->str_1real
15C4B^  <15D06h>
15D6F^  <117h>
15DAB^  <118h>
15E0B^  <112h>
15FCF-  hex\->ascii_1string2binary
1605F-  quotes_in_string_1string
1606C-  \->str_1string
160E5-  \->str_1global
1613F   Null String "" (RAM based)
1613F:  String_null_Copy
162AC-  \->str_1real    
162AC:  Real_to_string
162B8-  \->str_1real
1633D:  GC
166E3   Internal FIX (1:System Binary)
166E3-  fix_1short 
166E3=  SetFix
166EF   Internal SCI (1:System Binary)
166EF-  sci_1short
166EF=  SetSci
166FB   Internal ENG (1:System Binary)
166FB-  eng_1short
166FB=  SetEng
16707   Internal STD
16707-  std     
16707=  Std
167D8-  short\->real\->string_(colon)_1short
167E4-  short\->real\->string_1short
1685C-  short\->real\->string_+_(colon)_1short2string
1686A-  short\->real\->string_+_(colon)_1short2string
16969^  <13h>
16AD6^  <4000h>
16AE5^  <5000h>
16AF4^  <8000h>
16B03^  <9000h>
16B12^  <E000h>
16B21^  <D000h>
16B30^  <2F000h>
16CA7   Error: Bad Argument Value
1795A:  StoreShort_70770
1795A-  sto_5_nibbles_@70770_1short
17980-  rcl_5_nibbles_@70770_as_short
179AC:  Grob_height_equal1p
179D0-  
17C3F-  
17C55-  
17F15-  
17F4A^  <B8h>
181FA-  
18242-  
1825F-  
18282-  
18295-  
18308-  
18338-  
18355-  
183EB-  
18404-  
1848C   Internal PATH
1848C:  Path
184E1   Internal CRDIR
184E1:  Crdir
18513   Internal STO (2:Any,1:Global Name)
1853B=  Recall
1854F   Internal PURGE (1:Global Name)
18595   Internal PGDIR (1:Global Name)
18608:  While_dir_empty
18621:  IfFirstEnt_thenFalseIterate_elseTypeNib1and2_zerop
18653:  TypeNib1and2_zerop
186E8   Internal TVARS (1:Real Number)
186E8=  Tvars_real
18706   Internal TVARS (1:List)
18706=  Tvars_list
18779   Internal VARS
18779=  Vars
187AB-  
18802-  
1884D   Set last RPL Token to <0h>
1884D-  
1884D:  Short0_End
18873   Internal AND (2:String,1:String)
18887   Internal OR (2:String,1:String)
1889B   Internal XOR (2:String,1:String)
188AF   if SIZE(TOS) = SIZE(TOS-1) (String), then NEWOB and SWAP, 
        else Bad Argument Value
188AF:  Need2StringsEqualLen_Swap
188D2   Internal NOT (1:String)
188E6   Deep internal AND (2:String,1:String)
188E6-  and_1string2string      
188F5   Deep internal OR (2:String,1:String)
188F5-  or_1string2string       
18904   Deep internal XOR (2:String,1:String)
18904-  xor_1string2string
18961   Deep internal NOT (1:String)
18961-  not_1string
189FC   Configuration code for library 002 (XLIB 2)
18A15-  
18A1E   save last RPL token, stack size, clear @706FD.S
18A1E-  need_0_arguments_(save_last_stack)
18A1E=  No_arguments
18A27   MC: save stack size, clear @706FD.S and continue RPL
18A51   continue RPL
18A5B   Save last RPL token and verify DEPTH >= 3
18A5B-  need_3_arguments_(xlib) 
18A5B:  Need_3_args_retq
18A68   Verify DEPTH >= 3
18A68-  need_3_arguments        
18A68:  Need_3_args
18A6D   MC: verify DEPTH >= 3 and continue RPL
18A75   MC: verify DEPTH >= 3
18A75:  assert_3_args
18A80   Save last RPL token and verify DEPTH >= 2
18A80-  need_2_arguments_(xlib) 
18A80:  Need_2_args_retq
18A8D   Verify DEPTH >= 2
18A8D-  need_2_arguments        
18A8D:  Need_2_args
18A92   MC: verify DEPTH >= 2 and continue RPL
18A9A   MC: verify DEPTH >= 2
18A9A:  assert_2_args
18AA5   Save last RPL token and verify DEPTH >= 1
18AA5-  need_1_argument_(xlib)  
18AA5:  Need_1_arg_retq
18AB2   Verify DEPTH >= 1
18AB2-  need_1_argument 
18AB2:  Need_1_arg
18AB7   MC: verify DEPTH >= 1 and continue RPL
18AB7:  need_1_arg
18ABF   MC: verify DEPTH >= 1
18ABF:  assert_1_arg
18AC6   MC: verify DEPTH >= C.S, expect P = 2*C.S - 1
18AC6:  assert_c_args
18B6D   Save last RPL token and verify DEPTH >= 5
18B6D-  need_5_arguments_(xlib) 
18B6D:  Need_5_args_retq
18B7A   Verify DEPTH >= 5
18B7A-  need_5_arguments        
18B7A:  Need_5_args
18B7F   MC: verify DEPTH >= 5 and continue RPL
18B87   MC: verify DEPTH >= 5
18B87:  assert_5_args
18B92   Save last RPL token and verify DEPTH >= 4
18B92-  need_4_arguments_(xlib) 
18B92:  Need_4_args_retq
18B9F   Verify DEPTH >= 4
18B9F-  need_4_arguments        
18B9F:  Need_4_args
18BA4   MC: verify DEPTH >= 4 and continue RPL
18BAC   MC: verify DEPTH >= 4
18BAC:  assert_4_args
18BB3:  assert_c_gt3_args
18C34   Save last token, check args, R->SB and verify TOS < DEPTH-1
18C34-  need_n_arguments_1real2any...nany       
18C34:  ToShort_Need_n_args_alt
18C4A   Check args, R->SB and verify TOS < DEPTH-1
18C4A:  ToShort_Need_n_args
18C77   MC: save last RPL token
18C77:  save_toh_sub_10
18C92   Error: Undefined Name
18C92-  errn_204_undefined_name
18C92:  Error_Undef_name
18C97   MC: Error: Undefined Name
18C97:  error_undef_name
18CA2   Error: Bad Argument Value
18CA2-  errn_203_bad_argument_value
18CA2:  Error_Bad_arg_value
18CA7   MC: Error: Bad Argument Value
18CA7:  error_bad_arg_value
18CB2   Error: Bad Argument Type
18CB2-  errn_202_bad_argument_type
18CB2:  Error_Bad_arg_type
18CB7   MC: Error: Bad Argument Type
18CB7:  error_bad_arg_type
18CC2   Error: Too Few Arguments
18CC2-  errn_201_too_few_arguments
18CC2:  Error_Too_few_args
18CC7   MC: Error: Too Few Arguments
18CC7:  error_too_few_args
18CCE   Put Error Code in C.A into A
18CCE:  disp_error_c
18CD7   ABS(Real) -> System Binary
18CD7-  abs_real\->short        
18CD7:  AbsReal_to_Short
18CEA   Internal R->SB (1:Real Number)
18CEA-  real\->short    
18CEA:  Real_to_Short
18D07:  shortpush_a_replret
18D0A:  shortpush_r0_rplret
18DBF   Internal SB->R (1:System Binary)
18DBF-  short\->real    
18DBF:  Short_to_real
18E45-  
18E7E-   
18EBA   Internal EVAL (1:Algebraic/List)
18EBA-  eval_1algebraic
18EBA-  eval_1list
18EBA-  eval_1program
18EBA:  Eval_ListOrPrg
18ECE   Save last RPL token, verify DEPTH >= 1 and check args.
18ECE-  need_&_check_1_argument
18ECE:  Switch_on_argtype
18EDF   Save last RPL token, verify DEPTH >= 2 and check args.
18EDF-  need_&_check_2_arguments
18EDF=  Switch_on_2_argtypes
18EF0   Save last RPL token, verify DEPTH >= 3 and check args.
18EF0-  need_&_check_3_arguments        
18EF0:  Switch_on_3argtypes
18F01   Save last RPL token, verify DEPTH >= 4 and check args.
18F01-  need_&_check_4_arguments        
18F12   Save last RPL token, verify DEPTH >= 5 and check args.
18F12-  need_&_check_5_arguments 
18F23-  
18F6A=  EndAndEvalq
18F83   XFER: Bad Argument Type
18F83:  error_bad_arg_type_ref_2
18F87:  end_follows
18F9D   Check arguments for type (don't save D0)
18F9D-  check_argument(s)_(requires_short_reference)
18F9D:  Check_1_argtype_alt2
18FA9   Check arguments for type - XFER
18FA9-  check_argument(s)_(requires_short_reference)    
18FA9:  Check_1_argtype_alt
18FB2   Check arguments for type
18FB2-  check_argument(s)_(requires_short_reference)
18FB2:  Check_1_argtype
18FB7   MC: check arguments for type
18FDE^  <B6A8h>
18FF1:  not_address
1911E=  type_table_1
1916E:  type_table_2
19173^  <2A96h>
191B9:  Mul_short
191B9	*_1short2short
19207-  check_stack_for_n_real/complex_1short2any3real/complex..n+3real/complex
19294-  \->arry_1array(real/complex)2short3real/complex...n+3real/complex
19350-  xlib?_(boolean)_1any
19385:  Over_Recall
193A3:  Pick3_Recall
193C1:  Assert_array
194BB   verify Real Array (1:Array)
194F7=  TwoReal_to_Shorts
1950B:  TwoShorts_to_reals
19529=  ListOf_short_to_real
1957B   ASR (XLIB 2 0)
1957B:  Cmd_ASR
1957B;  /U xASR
1959B   RL (XLIB 2 1)
1959B:  Cmd_RL
1959B;  /U xRL
195BB   RLB (XLIB 2 2)
195BB:  Cmd_RLB
195BB;  /U xRLB
195DB   RR (XLIB 2 3)
195DB:  Cmd_RR
195DB;  /U xRR
195FB   RRB (XLIB 2 4)
195FB:  Cmd_RRB
195FB;  /U xRRB
1961B   SL (XLIB 2 5)
1961B:  Cmd_SL
1961B;  /U xSL
1963B   SLB (XLIB 2 6)
1963B:  Cmd_SLB
1963B;  /U xSLB
1965B   SR (XLIB 2 7)
1965B:  Cmd_SR
1965B;  /U xSR
1967B   SRB (XLIB 2 8)
1967B:  Cmd_SRB
1967B;  /U xSRB
1969B   R->B (XLIB 2 9)
1969B:  Cmd_RtoB
1969B;  /U xR>B
196BB   B->R (XLIB 2 10)
196BB:  Cmd_BtoR
196BB;  /U xB>R
196DB   CONVERT (XLIB 2 11)
196DB:  Cmd_CONVERT
196DB;  /U xCONVERT
1971B   UVAL (XLIB 2 12)
1971B:  Cmd_UVAL
1971B;  /U xUVAL
1974F   UNIT (XLIB 2 13)
1974F:  Cmd_UNIT
1974F;  /U x>UNIT
19771   UBASE (XLIB 2 14)
19771:  Cmd_UBASE
19771;  /U xUBASE
197A5   UFACT (XLIB 2 15)
197A5:  Cmd_UFACT
197A5;  /U xUFACT
197C8   Internal UFACT
197C8:  Ufact_unit_unit
197F7   TIME (XLIB 2 16)
197F7:  Cmd_TIME
197F7;  /U xTIME
19812   DATE (XLIB 2 17)
19812:  Cmd_DATE
19812;  /U xDATE
1982D   TICKS (XLIB 2 18)
1982D:  Cmd_TICKS
1982D;  /U xTICKS
19848   WSLOG (XLIB 2 19)
19848:  Cmd_WSLOG
19848;  /U xWSLOG
19863   ACKALL (XLIB 2 20)
19863:  Cmd_ACKALL
19863;  /U xACKALL
1987E   ACK (XLIB 2 21)
1987E:  Cmd_ACK
1987E;  /U xACK
1989E   ->DATE (XLIB 2 22)
1989E:  Cmd_toDATE
1989E;  /U xSETDATE
198BE   ->TIME (XLIB 2 23)
198BE:  Cmd_toTIME
198BE;  /U xSETTIME
198DE   CLKADJ (XLIB 2 24)
198DE:  Cmd_CLKADJ
198DE;  /U xCLKADJ
198FE   STOALARM (XLIB 2 25)
198FE:  Cmd_STOALRM
198FE;  /U xSTOALARM
19928   RCLALARM (XLIB 2 26)
19928:  Cmd_RCLALRM
19928;  /U xRCLALARM
19948   FINDALARM (XLIB 2 27)
19948:  Cmd_FNDALRM
19948;  /U xFINDALARM
19972   DELALARM (XLIB 2 28)
19972:  Cmd_DELALRM
19972;  /U xDELALARM
19992   TSTR (XLIB 2 29)
19992:  Cmd_TSTR
19992;  /U xTSTR
199B2   DDAYS (XLIB 2 30)
199B2:  Cmd_DDAYS
199B2;  /U xDDAYS
199D2   DATE+ (XLIB 2 31)
199D2:  Cmd_DATEadd
199D2;  /U xDATE+
19A68:  Get_default_alarm
19A72   'ALRMDAT' (Global Name)
19A72:  Global_Alrmdat
19A91:  List_Real0_StringNull_Real0
19A96^  0
19AB5^  0
19B1F   'ALRMDAT' (Global Name)
19B1F:  Global_Alrmdat_alt
19C34:  Need_n_args
19DBE   'ALRMDAT' (Global Name)
19DE2:  Disp_next_alrm
1A105   CRDIR (XLIB 2 32)
1A105:  Cmd_CRDIR
1A105;  /U xCRDIR
1A125   PATH (XLIB 2 33)
1A125:  Cmd_PATH
1A125;  /U xPATH
1A140   HOME (XLIB 2 34)
1A140:  Cmd_HOME
1A140;  /U xHOME
1A15B   UPDIR (XLIB 2 35)
1A15B:  Cmd_UPDIR
1A15B;  /U xUPDIR
1A16F   Internal UPDIR
1A16F:  Up
1A194   VARS (XLIB 2 36)
1A194:  Cmd_VARS
1A194;  /U xVARS
1A1AF   TVARS (XLIB 2 37)
1A1AF:  Cmd_TVARS
1A1AF;  /U xTVARS
1A1D9   BYTES (XLIB 2 38)
1A1D9:  Cmd_BYTES
1A1D9;  /U xBYTES
1A1FC   Internal BYTES (1:Any except Global Name)
1A1FC:  Bytes_any
1A223^  2.5

 (end of part 1 of 4)