Lines Matching refs:append
478 " Test $buf append (append line in buffer)
482 tcl $buf append 1 "first"
483 tcl $buf append 2 "second"
484 tcl $buf append 2 "third"
485 tcl $buf append 4 "fourth"
486 tcl $buf append 1 "fifth"
489 call assert_fails('tcl $buf append -1 "x"', 'line number out of range')
490 call assert_fails('tcl $buf append 0 "x"', 'line number out of range')
491 call assert_fails('tcl $buf append 7 "x"', 'line number out of range')
493 call assert_fails('tcl $buf append', 'wrong # args:')
494 call assert_fails('tcl $buf append 1 x x', 'wrong # args:')
496 " Try to append lines to a 'nomodifiable' buffer
498 call assert_fails('tcl $buf append 1 "first"',