Fossil SCM

Account for recent 'hr' markup changes in the th1-tcl tests.

mistachkin 2016-08-21 00:13 trunk
Commit 6a73034e71d50b8c5e705aba1d2c6c2a4d124833
1 file changed +9 -9
--- test/th1-tcl.test
+++ test/th1-tcl.test
@@ -77,55 +77,55 @@
7777
###############################################################################
7878
7979
fossil test-th-render --open-config \
8080
[file nativename [file join $dir th1-tcl3.txt]]
8181
82
-test th1-tcl-3 {$RESULT eq {<hr><p class="thmainError">ERROR:\
82
+test th1-tcl-3 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
8383
invalid command name &quot;bad_command&quot;</p>}}
8484
8585
###############################################################################
8686
8787
fossil test-th-render --open-config \
8888
[file nativename [file join $dir th1-tcl4.txt]]
8989
90
-test th1-tcl-4 {$RESULT eq {<hr><p class="thmainError">ERROR:\
90
+test th1-tcl-4 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
9191
divide by zero</p>}}
9292
9393
###############################################################################
9494
9595
fossil test-th-render --open-config \
9696
[file nativename [file join $dir th1-tcl5.txt]]
9797
98
-test th1-tcl-5 {$RESULT eq {<hr><p class="thmainError">ERROR:\
99
-Tcl command not found: bad_command</p>} || $RESULT eq {<hr><p\
98
+test th1-tcl-5 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
99
+Tcl command not found: bad_command</p>} || $RESULT eq {<hr /><p\
100100
class="thmainError">ERROR: invalid command name &quot;bad_command&quot;</p>}}
101101
102102
###############################################################################
103103
104104
fossil test-th-render --open-config \
105105
[file nativename [file join $dir th1-tcl6.txt]]
106106
107
-test th1-tcl-6 {$RESULT eq {<hr><p class="thmainError">ERROR:\
107
+test th1-tcl-6 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
108108
no such command: bad_command</p>}}
109109
110110
###############################################################################
111111
112112
fossil test-th-render --open-config \
113113
[file nativename [file join $dir th1-tcl7.txt]]
114114
115
-test th1-tcl-7 {$RESULT eq {<hr><p class="thmainError">ERROR:\
115
+test th1-tcl-7 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
116116
syntax error in expression: &quot;2**0&quot;</p>}}
117117
118118
###############################################################################
119119
120120
fossil test-th-render --open-config \
121121
[file nativename [file join $dir th1-tcl8.txt]]
122122
123
-test th1-tcl-8 {$RESULT eq {<hr><p class="thmainError">ERROR:\
124
-cannot invoke Tcl command: tailcall</p>} || $RESULT eq {<hr><p\
123
+test th1-tcl-8 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
124
+cannot invoke Tcl command: tailcall</p>} || $RESULT eq {<hr /><p\
125125
class="thmainError">ERROR: tailcall can only be called from a proc or\
126
-lambda</p>} || $RESULT eq {<hr><p class="thmainError">ERROR: This test\
126
+lambda</p>} || $RESULT eq {<hr /><p class="thmainError">ERROR: This test\
127127
requires Tcl 8.6 or higher.</p>}}
128128
129129
###############################################################################
130130
131131
fossil test-th-render --open-config \
132132
--- test/th1-tcl.test
+++ test/th1-tcl.test
@@ -77,55 +77,55 @@
77 ###############################################################################
78
79 fossil test-th-render --open-config \
80 [file nativename [file join $dir th1-tcl3.txt]]
81
82 test th1-tcl-3 {$RESULT eq {<hr><p class="thmainError">ERROR:\
83 invalid command name &quot;bad_command&quot;</p>}}
84
85 ###############################################################################
86
87 fossil test-th-render --open-config \
88 [file nativename [file join $dir th1-tcl4.txt]]
89
90 test th1-tcl-4 {$RESULT eq {<hr><p class="thmainError">ERROR:\
91 divide by zero</p>}}
92
93 ###############################################################################
94
95 fossil test-th-render --open-config \
96 [file nativename [file join $dir th1-tcl5.txt]]
97
98 test th1-tcl-5 {$RESULT eq {<hr><p class="thmainError">ERROR:\
99 Tcl command not found: bad_command</p>} || $RESULT eq {<hr><p\
100 class="thmainError">ERROR: invalid command name &quot;bad_command&quot;</p>}}
101
102 ###############################################################################
103
104 fossil test-th-render --open-config \
105 [file nativename [file join $dir th1-tcl6.txt]]
106
107 test th1-tcl-6 {$RESULT eq {<hr><p class="thmainError">ERROR:\
108 no such command: bad_command</p>}}
109
110 ###############################################################################
111
112 fossil test-th-render --open-config \
113 [file nativename [file join $dir th1-tcl7.txt]]
114
115 test th1-tcl-7 {$RESULT eq {<hr><p class="thmainError">ERROR:\
116 syntax error in expression: &quot;2**0&quot;</p>}}
117
118 ###############################################################################
119
120 fossil test-th-render --open-config \
121 [file nativename [file join $dir th1-tcl8.txt]]
122
123 test th1-tcl-8 {$RESULT eq {<hr><p class="thmainError">ERROR:\
124 cannot invoke Tcl command: tailcall</p>} || $RESULT eq {<hr><p\
125 class="thmainError">ERROR: tailcall can only be called from a proc or\
126 lambda</p>} || $RESULT eq {<hr><p class="thmainError">ERROR: This test\
127 requires Tcl 8.6 or higher.</p>}}
128
129 ###############################################################################
130
131 fossil test-th-render --open-config \
132
--- test/th1-tcl.test
+++ test/th1-tcl.test
@@ -77,55 +77,55 @@
77 ###############################################################################
78
79 fossil test-th-render --open-config \
80 [file nativename [file join $dir th1-tcl3.txt]]
81
82 test th1-tcl-3 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
83 invalid command name &quot;bad_command&quot;</p>}}
84
85 ###############################################################################
86
87 fossil test-th-render --open-config \
88 [file nativename [file join $dir th1-tcl4.txt]]
89
90 test th1-tcl-4 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
91 divide by zero</p>}}
92
93 ###############################################################################
94
95 fossil test-th-render --open-config \
96 [file nativename [file join $dir th1-tcl5.txt]]
97
98 test th1-tcl-5 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
99 Tcl command not found: bad_command</p>} || $RESULT eq {<hr /><p\
100 class="thmainError">ERROR: invalid command name &quot;bad_command&quot;</p>}}
101
102 ###############################################################################
103
104 fossil test-th-render --open-config \
105 [file nativename [file join $dir th1-tcl6.txt]]
106
107 test th1-tcl-6 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
108 no such command: bad_command</p>}}
109
110 ###############################################################################
111
112 fossil test-th-render --open-config \
113 [file nativename [file join $dir th1-tcl7.txt]]
114
115 test th1-tcl-7 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
116 syntax error in expression: &quot;2**0&quot;</p>}}
117
118 ###############################################################################
119
120 fossil test-th-render --open-config \
121 [file nativename [file join $dir th1-tcl8.txt]]
122
123 test th1-tcl-8 {$RESULT eq {<hr /><p class="thmainError">ERROR:\
124 cannot invoke Tcl command: tailcall</p>} || $RESULT eq {<hr /><p\
125 class="thmainError">ERROR: tailcall can only be called from a proc or\
126 lambda</p>} || $RESULT eq {<hr /><p class="thmainError">ERROR: This test\
127 requires Tcl 8.6 or higher.</p>}}
128
129 ###############################################################################
130
131 fossil test-th-render --open-config \
132

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button