
		;   GETTAIL.A
		;
		;   (c)Copyright 1990, Matthew Dillon, All Rights Reserved
		;

		section text,CODE

		xdef	_GetTail	    ; node = GetTail(list:4(sp))
		xdef	@GetTail

_GetTail:	move.l	4(sp),A0
@GetTail:
		move.l	8(A0),A0
		move.l	4(A0),D0
		beq	gt0
		move.l	A0,D0
gt0		rts

		END

