| Find routine names
#IfModeN Basic
 SEARCHBUF "\<\(\(REM \*\(PROC\|FN\)\)\|DEF\)"
#Else
 #IfModeN Assembler,Asm
  SEARCHBUF "\<\(.\[^``|_]\|>\)"
  | If you want ObjAsm style routine names, use :
  |SEARCHBUF "\<\[A-Za-z]\[A-Za-z0-9]\*"
 #Else
  #IfModeN Email,NewMail,MailMode
   SEARCHBUF "\<\(Subject:\|From:\)"
  #Else
   #IfModeN Code
    SEARCHBUF "func:"
   #Else
    LISTFNS
   #EndIf
  #EndIf
 #EndIf
#EndIf
