1
2
3
4
5
6
7
8
9
10
|
# Tests for printing. -*- tcl -*-
#----------------------------------------------------------------------
# $Revision$
|
<
|
|
|
1
2
3
4
5
6
7
8
9
|
#------------------------------------------------------------*- tcl -*-
# Tests for printing.
#----------------------------------------------------------------------
test print-1.1 {Tab expansion} {FixTextBlock "a\fp\fa" 1.0} {apa}
test print-1.2 {Tab expansion} {FixTextBlock "\tapa" 1.0} { apa}
test print-1.3 {Tab expansion} {FixTextBlock "\tapa" 1.1} { apa}
test print-1.4 {Tab expansion} {FixTextBlock "\tapa" 1.7} { apa}
test print-1.5 {Tab expansion} {FixTextBlock "\tapa" 1.8} { apa}
|