paramRow tcl html rparam

paramRow tcl html rparam,tcl,Tcl,嗨,我正在尝试使用以下库分配tr标记 proc ::html::paramRow {list {rparam {}} {cparam {}}} { ::set html "<tr $rparam>\n" ::foreach x $list { append html \t[cell $cparam $x td]\n } append html "</tr>\n" return $html } 没有分配标记,但我得到

嗨,我正在尝试使用以下库分配tr标记

proc ::html::paramRow {list {rparam {}} {cparam {}}} {
    ::set html "<tr $rparam>\n"
    ::foreach x $list {
        append html \t[cell $cparam $x td]\n
    }
    append html "</tr>\n"
    return $html
}
没有分配
标记,但我得到了以下信息 输出


数据1
数据2
数据3
数据4
数据5
rparam{pass}

在您的情况下,应该将该值作为单独的参数传递,而不是在
[列表…]
中传递:

puts $infile [html::paramRow [list \
        $TestCaseName $IDFNumber $Actual_Output $Expected_Output $RESULT2] \
    "fail"]

这是因为Tcl的过程在位置上采用可选参数。(键/值处理的方式不同。)

在您的情况下,应该将该值作为单独的参数传递,而不是在
[list…]
中传递:

puts $infile [html::paramRow [list \
        $TestCaseName $IDFNumber $Actual_Output $Expected_Output $RESULT2] \
    "fail"]

这是因为Tcl的过程在位置上采用可选参数。(键/值处理的方式不同。)

我打赌当你得到那个输出时你说的是
{rparam{pass}
,我打赌当你得到那个输出时你说的是
{rparam{pass}
puts $infile [html::paramRow [list \
        $TestCaseName $IDFNumber $Actual_Output $Expected_Output $RESULT2] \
    "fail"]