githubmirror/bash-completion

test/unit/quote.exp

65 строк1 KB

Ville Skyttä

test/unit: Whitespace tweaks

17 мар 2018, 03:19

17 мар 2018, 03:1969c318a

proc setup {} {
    save_env
}


proc teardown {} {
    assert_env_unmodified
}


setup


set cmd {quote "a b"}
set test {quote "a b" should output 'a b'}
send "$cmd\r"
expect -ex "$cmd\r\n"
expect {
    -re {'a b'} { pass $test }
    default { fail $test }
}
sync_after_int

set cmd {quote "a  b"}
set test {quote "a  b" should output 'a  b'}
send "$cmd\r"
expect -ex "$cmd\r\n"
expect {
    -re {'a  b'} { pass $test }
    default { fail $test }
}
sync_after_int

set cmd {quote "  a "}
set test {quote "  a " should output '  a '}
send "$cmd\r"
expect -ex "$cmd\r\n"
expect {
    -re {'  a '} { pass $test }
    default { fail $test }
}
sync_after_int

set cmd {quote "a'b'c"}
set test {quote "a'b'c" should output 'a'\''b'\''c'}
send "$cmd\r"
expect -ex "$cmd\r\n"
expect {
    -re {'a'\\''b'\\''c'} { pass $test }
    default { fail $test }
}
sync_after_int

set cmd {quote "a'"}
set test {quote "a'" should output 'a'\'''}
send "$cmd\r"
expect -ex "$cmd\r\n"
expect {
    -re {'a'\\'''} { pass $test }
    default { fail $test }
}
sync_after_int


teardown