[Info-vax] defining a symbol as an action invoked when entered as command

[Jim]

On Saturday, March 28, 2020 at 5:44:00 PM UTC-4, Jim wrote:
[...]
> If I didn't make any typos this should work...

And of course there is one... in the symbol definition of "x", "defxxx" should have been "defhere"

> 
> $ create defhere.cld
> $deck
> define type tran_attr
>         keyword concealed
>         keyword terminal
> 
> define type name_attr
>         keyword confine
>         keyword no_alias
> 
> ! order of quals must be maintained
> define verb defxxx
>         cliroutine define
>         prefix cli$k_defi_
>         parameter p1,prompt="Log name",value(required,type=$outlog)
>         parameter p2,prompt="Equ name",value(required,type=$expression,list)
>         qualifier system
>         qualifier group
>         qualifier job
>         qualifier process
>         qualifier user_mode
>         qualifier supervisor_mode
>         qualifier executive_mode
>         qualifier table,value(required)
>         qualifier log
>         qualifier name_attributes,
>                 value(type=name_attr,list)
>         qualifier translation_attributes,.
>                   placement=positional,
>                   value(type=tran_attr,list)
>         qualifier cluster_system
>         qualifier reserved
> $eod
> $ set command/replace defhere.cld
> $ x = "defxxx here f$environment(""default"")"

^^^^^^^^^^^^^^^^^^^^^^^^^^
$ x = "defhere here f$environment(""default"")"

> $ x