* Copyright (c) 1988, 1989, 1990, 1993
* The Regents of the University of California. All rights reserved.
* This code is derived from software contributed to Berkeley by
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)lstDeQueue.c 8.2 (Berkeley) %G%";
* Remove the node and return its datum from the head of the list
*-----------------------------------------------------------------------
* Remove and return the datum at the head of the given list.
* The datum in the node at the head or (ick) NIL if the list
* The head node is removed from the list.
*-----------------------------------------------------------------------
tln
= (ListNode
) Lst_First (l
);
if (tln
== NilListNode
) {
return ((ClientData
) NIL
);
if (Lst_Remove (l
, (LstNode
)tln
) == FAILURE
) {
return ((ClientData
) NIL
);