(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('gpg_version', {[ComSub (Com redirects=[(DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2)]{[LIT_CHARS gpg]} {[LIT_CHARS --version]})]})])
  (If
    (Com {[LIT_CHARS test]} {[VarSub ?]} {[LIT_OTHER "!"] [LIT_OTHER "="]} {[LIT_CHARS 127]})
    (Case to_match={[DQ [VarSub gpg_version]]}, pat_word_list=[[{[SQ <LIT_CHARS "gpg (GnuPG) 1.0.6">] [LIT_OTHER "*"]}], [{[LIT_OTHER "*"]}]]
      (Com {[LIT_CHARS say]} {[DQ [LIT_CHARS "Your version of gpg (1.0.6) is too buggy for testing"]]})
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS mkdir]} {[LIT_CHARS ./gpghome]})
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS chmod]} {[LIT_CHARS 0700]} {[LIT_CHARS ./gpghome]})
          (AndOr OP_AND_IF
            (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('GNUPGHOME', {[DQ [ComSub (Com {[LIT_CHARS pwd]})][LIT_CHARS /gpghome]]})])
            (AndOr OP_AND_IF
              (= scope=<EAssignScope.GLOBAL 1> flags=1 words=[{[LIT_CHARS GNUPGHOME]}] bindings=[])
              (AndOr OP_AND_IF
                (Com {[LIT_CHARS gpg]} {[LIT_CHARS --homedir]} {[DQ [VarSub GNUPGHOME]]} {[LIT_CHARS --import]} {[DQ [VarSub TEST_DIRECTORY]] [LIT_CHARS /lib-gpg/keyring.gpg]}
                  <
                  (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
                  >
                )
                (AndOr OP_AND_IF
                  (Com {[LIT_CHARS gpg]} {[LIT_CHARS --homedir]} {[DQ [VarSub GNUPGHOME]]} {[LIT_CHARS --import-ownertrust]} {[DQ [VarSub TEST_DIRECTORY]] [LIT_CHARS /lib-gpg/ownertrust]}
                    <
                    (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
                    >
                  )
                  (AndOr OP_AND_IF
                    (Com {[LIT_CHARS gpg]} {[LIT_CHARS --homedir]} {[DQ [VarSub GNUPGHOME]]} {[LIT_CHARS --sign]} {[LIT_CHARS -u]} {[LIT_CHARS committer] [LIT_OTHER "@"] [LIT_CHARS example.com]}
                      <
                      (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_LESS "<"> 0),
                      (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
                      (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
                      >
                    )
                    (Com {[LIT_CHARS test_set_prereq]} {[LIT_CHARS GPG]})
                  )
                )
              )
            )
          )
        )
      )
    )
  )
  (If
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS test_have_prereq]} {[LIT_CHARS GPG]})
      (Pipeline
        (Com {[LIT_CHARS echo]})
        (Com {[LIT_CHARS gpg]} {[LIT_CHARS --homedir]} {[DQ [VarSub GNUPGHOME]]} {[LIT_CHARS -b]} {[LIT_CHARS --rfc1991]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT ">"> 1),
          (DescriptorRedirectNode target={[LIT_CHARS 1]} <REDIR_GREATAND "2>&"> 2),
          >
        )
      )
    )
    (Com {[LIT_CHARS test_set_prereq]} {[LIT_CHARS RFC1991]})
  )
  (FunctionDef sanitize_pgp []
    (Com {[LIT_CHARS perl]} {[LIT_CHARS -ne]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\t/^-----END PGP/ and $in_pgp = 0;\n"> <LIT_CHARS "\t\tprint unless $in_pgp;\n"> <LIT_CHARS "\t\t/^-----BEGIN PGP/ and $in_pgp = 1;\n"> <LIT_CHARS "\t">]})
  )
)