We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent a00f414 commit ed3b230Copy full SHA for ed3b230
1 file changed
case-lib/apause.exp
@@ -1,6 +1,6 @@
1
#!/usr/bin/env expect
2
3
-# If you're new to expect:
+# If you're new to https://wiki.tcl-lang.org/page/Expect
4
#
5
# - Expect is "only" a Tcl extension and Tcl command.
6
# An "Expect script" is a somewhat misleading shorthand for "a Tcl
@@ -186,7 +186,7 @@ expect {
186
# for some unknown reason, then there could be _multiple_
187
# volume lines in a single of these buffer iterations and then we
188
# could miss some non-zeros.
189
- # This is very unlikely though so this is statically good enough.
+ # This is very unlikely though so this is statistically good enough.
190
if {! [regexp {\| ( |0)0%} "$buffer_with_lf"]} {
191
set volume_always_zero false
192
}
0 commit comments