2005-11-17 22:50:08 +01:00
|
|
|
#!/bin/sh
|
|
|
|
#
|
|
|
|
# Copyright (c) 2005 Johannes Schindelin
|
|
|
|
#
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_description='Test git-config in different settings'
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
. ./test-lib.sh
|
|
|
|
|
|
|
|
test -f .git/config && rm .git/config
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config core.penguin "little blue"
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[core]
|
|
|
|
penguin = little blue
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'initial' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config Core.Movie BadPhysics
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[core]
|
|
|
|
penguin = little blue
|
|
|
|
Movie = BadPhysics
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'mixed case' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config Cores.WhatEver Second
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[core]
|
|
|
|
penguin = little blue
|
|
|
|
Movie = BadPhysics
|
|
|
|
[Cores]
|
|
|
|
WhatEver = Second
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'similar section' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config CORE.UPPERCASE true
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[core]
|
|
|
|
penguin = little blue
|
|
|
|
Movie = BadPhysics
|
|
|
|
UPPERCASE = true
|
|
|
|
[Cores]
|
|
|
|
WhatEver = Second
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'similar section' 'cmp .git/config expect'
|
|
|
|
|
2005-11-20 13:24:18 +01:00
|
|
|
test_expect_success 'replace with non-match' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config core.penguin kingpin !blue'
|
2005-11-20 13:24:18 +01:00
|
|
|
|
|
|
|
test_expect_success 'replace with non-match (actually matching)' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config core.penguin "very blue" !kingpin'
|
2005-11-20 13:24:18 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[core]
|
|
|
|
penguin = very blue
|
|
|
|
Movie = BadPhysics
|
|
|
|
UPPERCASE = true
|
|
|
|
penguin = kingpin
|
|
|
|
[Cores]
|
|
|
|
WhatEver = Second
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'non-match result' 'cmp .git/config expect'
|
|
|
|
|
2005-11-17 22:50:08 +01:00
|
|
|
cat > .git/config << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
haha ="beta" # last silly comment
|
2005-11-20 06:52:22 +01:00
|
|
|
haha = hello
|
|
|
|
haha = bello
|
2005-11-17 22:50:08 +01:00
|
|
|
[nextSection] noNewline = ouch
|
|
|
|
EOF
|
|
|
|
|
2005-11-20 06:52:22 +01:00
|
|
|
cp .git/config .git/config2
|
|
|
|
|
|
|
|
test_expect_success 'multiple unset' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --unset-all beta.haha'
|
2005-11-20 06:52:22 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection] noNewline = ouch
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'multiple unset is correct' 'cmp .git/config expect'
|
|
|
|
|
|
|
|
mv .git/config2 .git/config
|
|
|
|
|
|
|
|
test_expect_success '--replace-all' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --replace-all beta.haha gamma'
|
2005-11-20 06:52:22 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
haha = gamma
|
|
|
|
[nextSection] noNewline = ouch
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'all replaced' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config beta.haha alpha
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
haha = alpha
|
|
|
|
[nextSection] noNewline = ouch
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'really mean test' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config nextsection.nonewline wow
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
haha = alpha
|
|
|
|
[nextSection]
|
|
|
|
nonewline = wow
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'really really mean test' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_success 'get value' 'test alpha = $(git-config beta.haha)'
|
|
|
|
git-config --unset beta.haha
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection]
|
|
|
|
nonewline = wow
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'unset' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config nextsection.NoNewLine "wow2 for me" "for me$"
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection]
|
|
|
|
nonewline = wow
|
|
|
|
NoNewLine = wow2 for me
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'multivar' 'cmp .git/config expect'
|
|
|
|
|
2005-11-20 13:24:18 +01:00
|
|
|
test_expect_success 'non-match' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get nextsection.nonewline !for'
|
2005-11-20 13:24:18 +01:00
|
|
|
|
|
|
|
test_expect_success 'non-match value' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'test wow = $(git-config --get nextsection.nonewline !for)'
|
2005-11-20 13:24:18 +01:00
|
|
|
|
2005-11-20 06:52:22 +01:00
|
|
|
test_expect_failure 'ambiguous get' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get nextsection.nonewline'
|
2005-11-20 06:52:22 +01:00
|
|
|
|
|
|
|
test_expect_success 'get multivar' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get-all nextsection.nonewline'
|
2005-11-20 06:52:22 +01:00
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config nextsection.nonewline "wow3" "wow$"
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection]
|
|
|
|
nonewline = wow3
|
|
|
|
NoNewLine = wow2 for me
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'multivar replace' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_failure 'ambiguous value' 'git-config nextsection.nonewline'
|
2005-11-20 06:52:22 +01:00
|
|
|
|
2005-11-17 22:50:08 +01:00
|
|
|
test_expect_failure 'ambiguous unset' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --unset nextsection.nonewline'
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
test_expect_failure 'invalid unset' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --unset somesection.nonewline'
|
2005-11-17 22:50:08 +01:00
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config --unset nextsection.nonewline "wow3$"
|
2005-11-17 22:50:08 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection]
|
|
|
|
NoNewLine = wow2 for me
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'multivar unset' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_failure 'invalid key' 'git-config inval.2key blabla'
|
2005-11-17 22:50:08 +01:00
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_success 'correct key' 'git-config 123456.a123 987'
|
2005-11-17 22:50:08 +01:00
|
|
|
|
2005-11-20 21:22:19 +01:00
|
|
|
test_expect_success 'hierarchical section' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config Version.1.2.3eX.Alpha beta'
|
2005-11-20 21:22:19 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[beta] ; silly comment # another comment
|
|
|
|
noIndent= sillyValue ; 'nother silly comment
|
|
|
|
|
|
|
|
# empty line
|
|
|
|
; comment
|
|
|
|
[nextSection]
|
|
|
|
NoNewLine = wow2 for me
|
|
|
|
[123456]
|
|
|
|
a123 = 987
|
2006-05-09 21:24:02 +02:00
|
|
|
[Version "1.2.3eX"]
|
|
|
|
Alpha = beta
|
2005-11-20 21:22:19 +01:00
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'hierarchical section value' 'cmp .git/config expect'
|
|
|
|
|
2006-05-02 14:22:48 +02:00
|
|
|
cat > expect << EOF
|
|
|
|
beta.noindent=sillyValue
|
|
|
|
nextsection.nonewline=wow2 for me
|
|
|
|
123456.a123=987
|
2006-05-15 22:48:22 +02:00
|
|
|
version.1.2.3eX.alpha=beta
|
2006-05-02 14:22:48 +02:00
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'working --list' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --list > output && cmp output expect'
|
2006-05-02 14:22:48 +02:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
beta.noindent sillyValue
|
|
|
|
nextsection.nonewline wow2 for me
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success '--get-regexp' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get-regexp in > output && cmp output expect'
|
2006-05-02 14:22:48 +02:00
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config --add nextsection.nonewline "wow4 for you"
|
2006-12-15 13:39:04 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
wow2 for me
|
|
|
|
wow4 for you
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success '--add' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get-all nextsection.nonewline > output && cmp output expect'
|
2006-12-15 13:39:04 +01:00
|
|
|
|
2006-03-06 06:23:30 +01:00
|
|
|
cat > .git/config << EOF
|
|
|
|
[novalue]
|
|
|
|
variable
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'get variable with no value' \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --get novalue.variable ^$'
|
2006-03-06 06:23:30 +01:00
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config > output 2>&1
|
2006-05-02 14:22:48 +02:00
|
|
|
|
|
|
|
test_expect_success 'no arguments, but no crash' \
|
|
|
|
"test $? = 129 && grep usage output"
|
|
|
|
|
2006-05-06 21:43:43 +02:00
|
|
|
cat > .git/config << EOF
|
|
|
|
[a.b]
|
|
|
|
c = d
|
|
|
|
EOF
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config a.x y
|
2006-05-06 21:43:43 +02:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[a.b]
|
|
|
|
c = d
|
|
|
|
[a]
|
|
|
|
x = y
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'new section is partial match of another' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config b.x y
|
|
|
|
git-config a.b c
|
2006-05-06 21:43:43 +02:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[a.b]
|
|
|
|
c = d
|
|
|
|
[a]
|
|
|
|
x = y
|
|
|
|
b = c
|
|
|
|
[b]
|
|
|
|
x = y
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'new variable inserts into proper section' 'cmp .git/config expect'
|
|
|
|
|
2006-06-20 00:51:58 +02:00
|
|
|
cat > other-config << EOF
|
|
|
|
[ein]
|
|
|
|
bahn = strasse
|
|
|
|
EOF
|
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
ein.bahn=strasse
|
|
|
|
EOF
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
GIT_CONFIG=other-config git-config -l > output
|
2006-06-20 00:51:58 +02:00
|
|
|
|
|
|
|
test_expect_success 'alternative GIT_CONFIG' 'cmp output expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
GIT_CONFIG=other-config git-config anwohner.park ausweis
|
2006-06-20 00:51:58 +02:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[ein]
|
|
|
|
bahn = strasse
|
|
|
|
[anwohner]
|
|
|
|
park = ausweis
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success '--set in alternative GIT_CONFIG' 'cmp other-config expect'
|
|
|
|
|
2006-12-16 15:14:14 +01:00
|
|
|
cat > .git/config << EOF
|
|
|
|
# Hallo
|
|
|
|
#Bello
|
|
|
|
[branch "eins"]
|
|
|
|
x = 1
|
|
|
|
[branch.eins]
|
|
|
|
y = 1
|
|
|
|
[branch "1 234 blabl/a"]
|
|
|
|
weird
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success "rename section" \
|
2007-01-29 01:16:53 +01:00
|
|
|
"git-config --rename-section branch.eins branch.zwei"
|
2006-12-16 15:14:14 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
# Hallo
|
|
|
|
#Bello
|
|
|
|
[branch "zwei"]
|
|
|
|
x = 1
|
|
|
|
[branch "zwei"]
|
|
|
|
y = 1
|
|
|
|
[branch "1 234 blabl/a"]
|
|
|
|
weird
|
|
|
|
EOF
|
|
|
|
|
2007-02-25 23:36:53 +01:00
|
|
|
test_expect_success "rename succeeded" "git diff expect .git/config"
|
2006-12-16 15:14:14 +01:00
|
|
|
|
|
|
|
test_expect_failure "rename non-existing section" \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --rename-section branch."world domination" branch.drei'
|
2006-12-16 15:14:14 +01:00
|
|
|
|
2007-02-25 23:36:53 +01:00
|
|
|
test_expect_success "rename succeeded" "git diff expect .git/config"
|
2006-12-16 15:14:14 +01:00
|
|
|
|
|
|
|
test_expect_success "rename another section" \
|
2007-01-29 01:16:53 +01:00
|
|
|
'git-config --rename-section branch."1 234 blabl/a" branch.drei'
|
2006-12-16 15:14:14 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
# Hallo
|
|
|
|
#Bello
|
|
|
|
[branch "zwei"]
|
|
|
|
x = 1
|
|
|
|
[branch "zwei"]
|
|
|
|
y = 1
|
|
|
|
[branch "drei"]
|
|
|
|
weird
|
|
|
|
EOF
|
|
|
|
|
2007-02-25 23:36:53 +01:00
|
|
|
test_expect_success "rename succeeded" "git diff expect .git/config"
|
2006-12-16 15:14:14 +01:00
|
|
|
|
2007-03-02 21:53:33 +01:00
|
|
|
cat >> .git/config << EOF
|
|
|
|
[branch "zwei"] a = 1 [branch "vier"]
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success "remove section" "git config --remove-section branch.zwei"
|
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
# Hallo
|
|
|
|
#Bello
|
|
|
|
[branch "drei"]
|
|
|
|
weird
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success "section was removed properly" \
|
2007-03-11 08:26:33 +01:00
|
|
|
"git diff -u expect .git/config"
|
2007-03-02 21:53:33 +01:00
|
|
|
|
2007-05-13 09:12:52 +02:00
|
|
|
rm .git/config
|
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[gitcvs]
|
|
|
|
enabled = true
|
|
|
|
dbname = %Ggitcvs2.%a.%m.sqlite
|
|
|
|
[gitcvs "ext"]
|
|
|
|
dbname = %Ggitcvs1.%a.%m.sqlite
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'section ending' '
|
|
|
|
|
|
|
|
git-config gitcvs.enabled true &&
|
|
|
|
git-config gitcvs.ext.dbname %Ggitcvs1.%a.%m.sqlite &&
|
|
|
|
git-config gitcvs.dbname %Ggitcvs2.%a.%m.sqlite &&
|
|
|
|
cmp .git/config expect
|
|
|
|
|
|
|
|
'
|
|
|
|
|
2006-12-31 04:13:05 +01:00
|
|
|
test_expect_success numbers '
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config kilo.gram 1k &&
|
|
|
|
git-config mega.ton 1m &&
|
|
|
|
k=$(git-config --int --get kilo.gram) &&
|
2006-12-31 04:13:05 +01:00
|
|
|
test z1024 = "z$k" &&
|
2007-01-29 01:16:53 +01:00
|
|
|
m=$(git-config --int --get mega.ton) &&
|
2006-12-31 04:13:05 +01:00
|
|
|
test z1048576 = "z$m"
|
|
|
|
'
|
|
|
|
|
2007-01-09 06:27:41 +01:00
|
|
|
rm .git/config
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git-config quote.leading " test"
|
|
|
|
git-config quote.ending "test "
|
|
|
|
git-config quote.semicolon "test;test"
|
|
|
|
git-config quote.hash "test#test"
|
2007-01-09 06:27:41 +01:00
|
|
|
|
|
|
|
cat > expect << EOF
|
|
|
|
[quote]
|
|
|
|
leading = " test"
|
|
|
|
ending = "test "
|
|
|
|
semicolon = "test;test"
|
|
|
|
hash = "test#test"
|
|
|
|
EOF
|
|
|
|
|
|
|
|
test_expect_success 'quoting' 'cmp .git/config expect'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_failure 'key with newline' 'git config key.with\\\
|
2007-01-20 02:25:37 +01:00
|
|
|
newline 123'
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
test_expect_success 'value with newline' 'git config key.sub value.with\\\
|
2007-01-20 02:25:37 +01:00
|
|
|
newline'
|
|
|
|
|
2007-01-23 13:37:25 +01:00
|
|
|
cat > .git/config <<\EOF
|
|
|
|
[section]
|
|
|
|
; comment \
|
|
|
|
continued = cont\
|
|
|
|
inued
|
|
|
|
noncont = not continued ; \
|
|
|
|
quotecont = "cont;\
|
|
|
|
inued"
|
|
|
|
EOF
|
|
|
|
|
|
|
|
cat > expect <<\EOF
|
|
|
|
section.continued=continued
|
|
|
|
section.noncont=not continued
|
|
|
|
section.quotecont=cont;inued
|
|
|
|
EOF
|
|
|
|
|
2007-01-29 01:16:53 +01:00
|
|
|
git config --list > result
|
2007-01-23 13:37:25 +01:00
|
|
|
|
|
|
|
test_expect_success 'value continued on next line' 'cmp result expect'
|
|
|
|
|
2005-11-17 22:50:08 +01:00
|
|
|
test_done
|
|
|
|
|