DL_BuildExternalsList

Revision
Revised on

Description

Code

on DL_BuildExternalsList
  global DL_LastStackUpdated
  global gDL_XCMDs,gDL_XFCNs
  
  -- get resource lists if necessary
  if the long name of this stack  DL_LastStackUpdated then
    put the long name of this stack into DL_LastStackUpdated
    
    put empty into gDL_XFCNs
    get Rezzer(all,XFCN)
    repeat with n = 1 to the number of lines in it
      put (item 1 of line n of it) & return after gDL_XFCNs
    end repeat
    
    put empty into gDL_XCMDs
    get Rezzer(all,XCMD)
    repeat with n = 1 to the number of lines in it
      put (item 1 of line n of it) & return after gDL_XCMDs
    end repeat
  end if
  
end DL_BuildExternalsList