Annotation of embedaddon/php/ext/mbstring/libmbfl/tests/strwidth.tests/strwidth.exp, revision 1.1

1.1     ! misho       1: #!/usr/bin/expect -f
        !             2: spawn tests/strwidth Japanese UTF-8
        !             3: set timeout 1
        !             4: 
        !             5: expect_after {
        !             6:     "\[^\r\n\]*\r\n" { fail $test }
        !             7: }
        !             8: 
        !             9: set test "basic test"
        !            10: send "testtest\r"
        !            11: expect {
        !            12:     "8\r\n" { pass $test }
        !            13: }
        !            14: 
        !            15: set test "CJK kanji"
        !            16: send "漢字\r"
        !            17: expect {
        !            18:     "4\r\n" { pass $test }
        !            19: }
        !            20: 
        !            21: set test "CJK hiragana"
        !            22: send "ひらがな\r"
        !            23: expect {
        !            24:     "8\r\n" { pass $test }
        !            25: }
        !            26: 
        !            27: set test "CJK katakana"
        !            28: send "カタカナ\r"
        !            29: expect {
        !            30:     "8\r\n" { pass $test }
        !            31: }
        !            32: 
        !            33: set test "Fullwidth symbols (1)"
        !            34: send "〜!”#$%&’())\r"
        !            35: expect {
        !            36:     "20\r\n" { pass $test }
        !            37: }
        !            38: 
        !            39: set test "Halfwidth symbols assumed to be fullwidth in JISX0208 (2)"
        !            40: send "○●◎\r"
        !            41: expect {
        !            42:     "3\r\n" { pass $test }
        !            43: }
        !            44: 
        !            45: close
        !            46: 
        !            47: # vim: sts=4 sw=4 ts=4 et encoding=UTF-8

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>