Changes to Test Script 1 between r14 and r15
======
set ret [list]
foreach line [split [getpage 0] \n] {
set ret [linsert $ret [expr int(rand() * [llength $ret])] $line]
}
puts [join $ret \n]
puts ""
puts "Page count: [countpages]"
puts "@include [expr int(rand() * [countpages])]"
(blank line)
return
======
Legend
Only in r14
Only in r15 --> Modified slightly between r14 and r15