!+
! PDINITCLD.CLD		DCL command language description for PDINIT
!
! Author:	Nick de Smith
! Date:		11-Mar-87
!
! Edit	Edit date	By	Why
!  01	11-Mar-87	NMdS	new
!-

!++
module	pdinit
ident	"V01.01"

!
! PDINIT [device] [/[NO]BLOCKS[=n]]
!
define	verb	pdinit
	image	pdinit
	parameter	p1
		label	device_name
		value(default="PDA0:")
	qualifier	blocks
		value(required,type=$number)