(command.CommandList
  children: [
    (C {<echo>} 
      {
        (DQ <'/*'> <Id.Lit_BadBackslash '\\'> <n> 
          <' * Copyright 2005 Sun Microsystems, Inc.  All rights reserved.'> <Id.Lit_BadBackslash '\\'> <n> <' * Use is subject to license terms.'> <Id.Lit_BadBackslash '\\'> <n> 
          <' */'> <Id.Lit_BadBackslash '\\'> <n> <Id.Lit_BadBackslash '\\'> <n> <'#pragma ident'> <Id.Lit_BadBackslash '\\'> 
          <t> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <'%Z%%M%'> 
          <Id.Lit_BadBackslash '\\'> <'t%I%'> <Id.Lit_BadBackslash '\\'> <'t%E% SMI'> 
          (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <Id.Lit_BadBackslash '\\'> <n> <Id.Lit_BadBackslash '\\'> <n> <'#include <dtrace.h>'> 
          <Id.Lit_BadBackslash '\\'> <n> <Id.Lit_BadBackslash '\\'> <n> <'/*ARGSUSED*/\n'> <'const char *'> <Id.Lit_BadBackslash '\\'> <n> 
          <'dtrace_subrstr(dtrace_hdl_t *dtp, int subr)'> <Id.Lit_BadBackslash '\\'> <n> <'{'> <Id.Lit_BadBackslash '\\'> <n> <'\tswitch (subr) {'>
        )
      }
    )
    (C {<nawk>} 
      {
        (SQ <'\n'> <'/^#define[ \t]*DIF_SUBR_/ && $2 != "DIF_SUBR_MAX" {\n'> 
          <'\tprintf("\\tcase %s: return (\\"%s\\");\\n", $2, tolower(substr($2, 10)));\n'> <'}'>
        )
      }
    )
    (C {<echo>} 
      {
        (DQ <'\tdefault: return ('> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') 
          <unknown> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <');'> <Id.Lit_BadBackslash '\\'> <n> 
          <'\t}'> <Id.Lit_BadBackslash '\\'> <n> <'}'>
        )
      }
    )
  ]
)