!
! Internal command language definition file for SIX Version 3.0
!
! This is used to produce object file containing the parsing tables
! used by CLI$DCL_PARSE.
!
! It does not need to be customized in any way.
!

module six_cld_table

! verb 2 is for looping, waiting for some sort of range specification,
! after we already have the input filename(s).

define verb 2
      parameter p1, label=p_range, prompt="Range",
                    value(list)
      qualifier head, value(type=$number,default=18), nonnegatable
      qualifier tail, value(type=$number,default=18), nonnegatable
      qualifier range, value(required), nonnegatable
      qualifier output, value(type=$outfile,default=SYS$OUTPUT),
                    nonnegatable, default

! verb 6 is the initial parsing, which we use until we have at least
! the input file name(s).

define verb 6
      parameter p1, label=p_file, prompt="File",
                    value(type=$infile,list,required)
      parameter p2, label=p_range, prompt="Range",
                    value(list)
      qualifier range, value(required), nonnegatable
      qualifier head, value(type=$number,default=18), nonnegatable
      qualifier tail, value(type=$number,default=18), nonnegatable
      qualifier output, value(type=$outfile,default=SYS$OUTPUT)
                    nonnegatable, default