(command.CommandList
  children: [
    (C {<_Dbg_help_add_sub>} {<show>} {<highlight>} {(DQ <'Show syntax highlight of listings'>)} {<1>})
    (command.ShFunction
      name: _Dbg_do_show_highlight
      body: 
        (BraceGroup
          children: [
            (C {<typeset>} {<label>})
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DPipe]
              children: [
                (command.DBracket
                  expr: (bool_expr.Unary op_id:Id.BoolUnary_n child:{($ Id.VSub_Number '$1')})
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:label)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: <Id.Left_DollarParen '$('>
                            child: (C {<_Dbg_printf_nocr>} {(DQ <'%-12s: '>)} {<highlight>})
                          )
                        }
                      spids: [94]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:label)
                      op: assign_op.Equal
                      rhs: {(SQ )}
                      spids: [107]
                    )
                  ]
                )
              ]
            )
            (C {<_Dbg_msg_nocr>} 
              {(DQ (${ Id.VSub_Name label) <'Syntax highlight in source listings is '>)}
            )
            (command.If
              arms: [
                (if_arm
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.DBracket
                              expr: 
                                (bool_expr.Unary
                                  op_id: Id.BoolUnary_n
                                  child: {($ Id.VSub_DollarName '$_Dbg_set_highlight')}
                                )
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  action: [(C {<_Dbg_msg>} {(DQ (${ Id.VSub_Name _Dbg_set_highlight) <.>)})]
                  spids: [124 136]
                )
              ]
              else_action: [(C {<_Dbg_msg>} {(SQ <off.>)})]
            )
            (command.ControlFlow token:<Id.ControlFlow_Return return> arg_word:{<0>})
          ]
        )
    )
  ]
)