Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

!	LSTUSR.REQ - Required definitions used by the list manager
!
!
!			  COPYRIGHT (C) 1982 BY
!	      DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
!
! THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND  COPIED
! ONLY  IN  ACCORDANCE  WITH  THE  TERMS  OF  SUCH  LICENSE AND WITH THE
! INCLUSION OF THE ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR  ANY  OTHER
! COPIES  THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
! OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE  IS  HEREBY
! TRANSFERRED.
!
! THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE  WITHOUT  NOTICE
! AND  SHOULD  NOT  BE  CONSTRUED  AS  A COMMITMENT BY DIGITAL EQUIPMENT
! CORPORATION.
!
! DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR  RELIABILITY  OF  ITS
! SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
!

!++
! FACILITY:
!   CMS Library processor
!
! ABSTRACT:
!   This module is a generalized list processing module. It contains 
!   capabilities for list building and searching.  At the present it
!   only support linked lists, but in the future it will support lists
!   implemented as a vector(blockvector,array,etc.)
!
! ENVIRONMENT:
!   VAX/VMS,DS-20
!
! AUTHOR: Bob Wheater, CREATION DATE: 26-JUL-1981
!
! MODIFIED BY:
!
!--

! definitions used the list manager

! definition for the control information in an individual list entry

! LSTENT

$field
    lst_ent =					

	    	set
		
		fw_lnk = [$address],		! forward link
		
		bw_lnk = [$address]		! backward link
		
		tes;

    
literal
    k_lst_ent_siz = $field_set_size;		! size of list entry block
    						! in fullwords
! END OF LSTENT

! definition of the of the list header block

! LSTHDR

$field
    lst_hdr =

! lsthdr

    		set
		
		hfw_lnk = [$address],		! forward link
		
		sub_descriptor(name=list_nam),	! desc for list id string
		
		sub_descriptor(name=list_zon),	! desc for zone id string
		
		siz_usr = [$integer],		! size of user area in fullwords
		
		cur_ent = [$address],		! current entry pointer
		
		beg_ent = [$address],	 	! starting entry in list pointer
		
		end_ent = [$address]		! ending entry in the list
		
		tes;

		
$literal
    k_siz_lst_hdr = $field_set_size;		! size of header block in fullwords

! END OF LSTHDR

! end of LSTUSR.REQ