(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(DQ ('Gettext reencoding of our *.po/*.mo files works'))}
          spids: [13]
        )
      ]
      spids: [13]
    )
    (C {(.)} {(./lib-gettext.sh)})
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:RUNES)
          op: Equal
          rhs: 
            {
              (DQ 
                (
'TILRAUN: \xe1\x9a\xbb\xe1\x9b\x96 \xe1\x9a\xb3\xe1\x9a\xb9\xe1\x9a\xab\xe1\x9a\xa6 \xe1\x9a\xa6\xe1\x9a\xab\xe1\x9b\x8f \xe1\x9a\xbb\xe1\x9b\x96 \xe1\x9b\x92\xe1\x9a\xa2\xe1\x9b\x9e\xe1\x9b\x96 \xe1\x9a\xa9\xe1\x9a\xbe \xe1\x9a\xa6\xe1\x9a\xab\xe1\x9b\x97 \xe1\x9b\x9a\xe1\x9a\xaa\xe1\x9a\xbe\xe1\x9b\x9e\xe1\x9b\x96 \xe1\x9a\xbe\xe1\x9a\xa9\xe1\x9a\xb1\xe1\x9a\xa6\xe1\x9a\xb9\xe1\x9b\x96\xe1\x9a\xaa\xe1\x9a\xb1\xe1\x9b\x9e\xe1\x9a\xa2\xe1\x9b\x97 \xe1\x9a\xb9\xe1\x9b\x81\xe1\x9a\xa6 \xe1\x9a\xa6\xe1\x9a\xaa \xe1\x9a\xb9\xe1\x9b\x96\xe1\x9b\xa5\xe1\x9a\xab'
                )
              )
            }
          spids: [27]
        )
      ]
      spids: [27]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:PUNTS)
          op: Equal
          rhs: {(DQ ('TILRAUN: ?? ???? ??? ?? ???? ?? ??? ????? ??????????? ??? ?? ????'))}
          spids: [32]
        )
      ]
      spids: [32]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:MSGKEY)
          op: Equal
          rhs: {(DQ ('TEST: Old English Runes'))}
          spids: [37]
        )
      ]
      spids: [37]
    )
    (C {(test_expect_success)} {(GETTEXT_LOCALE)} 
      {(SQ <'gettext: Emitting UTF-8 from our UTF-8 *.mo files / Icelandic'>)} 
      {
        (SQ <'\n'> <'    printf "TILRAUN: Hall\xc3\xb3 Heimur!" >expect &&\n'> 
          <'    LANGUAGE=is LC_ALL="$is_IS_locale" gettext "TEST: Hello World!" >actual &&\n'> <'    test_cmp expect actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_LOCALE)} 
      {(SQ <'gettext: Emitting UTF-8 from our UTF-8 *.mo files / Runes'>)} 
      {
        (SQ <'\n'> <'    printf "%s" "$RUNES" >expect &&\n'> 
          <'    LANGUAGE=is LC_ALL="$is_IS_locale" gettext "$MSGKEY" >actual &&\n'> <'    test_cmp expect actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_ISO_LOCALE)} 
      {(SQ <'gettext: Emitting ISO-8859-1 from our UTF-8 *.mo files / Icelandic'>)} 
      {
        (SQ <'\n'> 
          <'    printf "TILRAUN: Hall\xc3\xb3 Heimur!" | iconv -f UTF-8 -t ISO8859-1 >expect &&\n'> <'    LANGUAGE=is LC_ALL="$is_IS_iso_locale" gettext "TEST: Hello World!" >actual &&\n'> 
          <'    test_cmp expect actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_ISO_LOCALE)} {(SQ <'gettext: impossible ISO-8859-1 output'>)} 
      {
        (SQ <'\n'> <'\tLANGUAGE=is LC_ALL="$is_IS_iso_locale" gettext "$MSGKEY" >runes &&\n'> 
          <'\tcase "$(cat runes)" in\n'> <'\t"$MSGKEY")\n'> <'\t\tsay "Your system gives back the key to message catalog"\n'> <'\t\t;;\n'> 
          <'\t"$PUNTS")\n'> <'\t\tsay "Your system replaces an impossible character with ?"\n'> <'\t\t;;\n'> <'\t"$RUNES")\n'> 
          <'\t\tsay "Your system gives back the raw message for an impossible request"\n'> <'\t\t;;\n'> <'\t*)\n'> <'\t\tsay "We never saw the error behaviour your system exhibits"\n'> 
          <'\t\tfalse\n'> <'\t\t;;\n'> <'\tesac\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_LOCALE)} {(SQ <'gettext: Fetching a UTF-8 msgid -> UTF-8'>)} 
      {
        (SQ <'\n'> 
          <
'    printf "TILRAUN: \xe2\x80\x9aeinfaldar\xe2\x80\x98 og \xe2\x80\x9etv\xc3\xb6faldar\xe2\x80\x9c g\xc3\xa6salappir" >expect &&\n'
          > 
          <
'    LANGUAGE=is LC_ALL="$is_IS_locale" gettext "TEST: \xe2\x80\x98single\xe2\x80\x99 and \xe2\x80\x9cdouble\xe2\x80\x9d quotes" >actual &&\n'
          > <'    test_cmp expect actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_ISO_LOCALE)} 
      {(SQ <'gettext: Fetching a UTF-8 msgid -> ISO-8859-1'>)} 
      {
        (SQ <'\n'> 
          <
'    LANGUAGE=is LC_ALL="$is_IS_iso_locale" gettext "TEST: \xe2\x80\x98single\xe2\x80\x99 and \xe2\x80\x9cdouble\xe2\x80\x9d quotes" >actual &&\n'
          > <'    grep "einfaldar" actual &&\n'> 
          <'    grep "$(echo tv\xc3\xb6faldar | iconv -f UTF-8 -t ISO8859-1)" actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_LOCALE)} {(SQ <'gettext.c: git init UTF-8 -> UTF-8'>)} 
      {
        (SQ <'\n'> <'    printf "Bj\xc3\xb3 til t\xc3\xb3ma Git lind" >expect &&\n'> 
          <'    LANGUAGE=is LC_ALL="$is_IS_locale" git init repo >actual &&\n'> <'    test_when_finished "rm -rf repo" &&\n'> <'    grep "^$(cat expect) " actual\n'>
        )
      }
    )
    (C {(test_expect_success)} {(GETTEXT_ISO_LOCALE)} {(SQ <'gettext.c: git init UTF-8 -> ISO-8859-1'>)} 
      {
        (SQ <'\n'> <'    printf "Bj\xc3\xb3 til t\xc3\xb3ma Git lind" >expect &&\n'> 
          <'    LANGUAGE=is LC_ALL="$is_IS_iso_locale" git init repo >actual &&\n'> <'    test_when_finished "rm -rf repo" &&\n'> 
          <'    grep "^$(cat expect | iconv -f UTF-8 -t ISO8859-1) " actual\n'>
        )
      }
    )
    (C {(test_done)})
  ]
)