.TITLE	GLUN	Get LUN Information
	.IDENT	"V1.2"
	.ENABL	LC
;+
; Index		GLUN	Get LUN Information
;
; Usage
;	#include <cx.h>
;	#include <lunbuf.h> 	/* Defines struct lunbuf */
;	struct lunbuf lundat;	/* LUN info buffer */
;	word lun;		/* LUN */
;	word status;		/* Returned DSW */
;
;	status = glun(lun, &lundat);
; [end]
;-
; Edits:
; V1.0 12-Jun-80 RBD	Initial Edit
; V1.1 20-Oct-82 RBD	Change P-Section. Fix Documentation
; V1.2 31-Jan-02 BQT	Changed for I/D space.
;
	.mcall	glun$s

	.psect	c$code,i,ro
glun::
	mov	sp,r0
	glun$s	2(r0),4(r0)
	mov	$dsw,r0
	return

	.end