Posted to tcl by alex at Sat Jul 28 17:11:17 GMT 2007view raw
- package provide t 1
- namespace eval t {
- proc t0 {} {return t}
- proc t1 {} {return [t0]}
- proc t2 {} {return [t1]}
- proc t3 {} {return [t2]}
- proc t4 {} {return [t3]}
- proc t5 {} {return [t4]}
- proc t6 {} {return [t5]}
- proc t7 {} {return [t6]}
- proc t8 {} {return [t7]}
- ........
- ........
- ........
- proc t987 {} {return [t986]}
- proc t988 {} {return [t987]}
- proc t989 {} {return [t988]}
- proc t990 {} {return [t989]}
- proc t991 {} {return [t990]}
- proc t992 {} {return [t991]}
- proc t993 {} {return [t992]}
- proc t994 {} {return [t993]}
- proc t995 {} {return [t994]}
- proc t996 {} {return [t995]}
- proc t997 {} {return [t996]}
- proc t998 {} {return [t997]}
- }