Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Changed the printing of the symbol tree to be based on table 'preferedparent', and introduced two procs to shorten the fomratting code. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
ae53becda49638f2f84ea03ecb64f4f9 |
User & Date: | aku 2008-03-02 01:09:16.000 |
Context
2008-03-05
| ||
03:24 | Reverting the change of [a5840849d0]. Use of 'preferedparent' is ok. The problem I attempted to fix is properly fixed by looking at the branch changesets as well during import, and by acknowledging that there can be branches which have no changesets committed to them. ... (check-in: 99004d57 user: aku tags: trunk) | |
2008-03-03
| ||
16:50 | Fix a privilege problem in the default page header. ... (check-in: f08599e8 user: drh tags: trunk) | |
2008-03-02
| ||
01:09 | Changed the printing of the symbol tree to be based on table 'preferedparent', and introduced two procs to shorten the fomratting code. ... (check-in: ae53becd user: aku tags: trunk) | |
01:07 | Fixed typo in a comment, and extended the description of the pass to be more clear. ... (check-in: e3e3d301 user: aku tags: trunk) | |
Changes
Changes to tools/cvs2fossil/lib/c2f_pfiltersym.tcl.
︙ | ︙ | |||
530 531 532 533 534 535 536 537 538 539 540 541 542 543 | proc PrintSymbolTree {} { if {![log visible? 9]} return array set sym {} set n 0 set t 0 set c 0 state foreachrow { SELECT S.name AS xs, A.name AS stype, S.commit_count AS cc, P.name AS xp, B.name AS ptype | > | < | < < < < < < < < < < | | | > | | | < > > > | 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 | proc PrintSymbolTree {} { if {![log visible? 9]} return array set sym {} set n 0 set t 0 set c 0 set p 0 state foreachrow { SELECT S.name AS xs, A.name AS stype, S.commit_count AS cc, P.name AS xp, B.name AS ptype FROM symbol S, preferedparent SP, symbol P, symtype A, symtype B WHERE SP.sid = S.sid AND P.sid = SP.pid AND A.tid = S.type AND B.tid = P.type } { lappend sym($xs) $xp $stype $ptype $cc maxlen n $xs maxlen t $stype maxlen t $ptype maxlen c $cc maxlen p $xp } foreach xs [lsort -dict [array names sym]] { struct::list assign $sym($xs) xp stype ptype cc log write 9 filtersym {Tree: [lj $t $stype] ([dj $c $cc]) [lj $n $xs] <-- [lj $t $ptype] $xp} } return } proc lj {n s} { ::format %-${n}s $s } proc dj {n s} { ::format %-${n}d $s } # # ## ### ##### ######## ############# ## Configuration pragma -hasinstances no ; # singleton pragma -hastypeinfo no ; # no introspection pragma -hastypedestroy no ; # immortal |
︙ | ︙ |