Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | [3611643fff]: Support TclOO in autoload mechanism. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
f031beec9a8d39926039f7a37edf2893 |
User & Date: | dkf 2013-08-03 15:27:40 |
Context
2013-08-05
| ||
22:00 | Mark unixforkevent-1.1 nonPortable, until proven on more platforms. Make sure that when testing for... check-in: 4e3f024bd7 user: jan.nijtmans tags: trunk | |
16:37 | merge trunk check-in: dd155eb7e2 user: dgp tags: dgp-refactor | |
14:47 | merge trunk check-in: cb1d262fa1 user: dgp tags: dkf-command-type | |
2013-08-03
| ||
15:27 | [3611643fff]: Support TclOO in autoload mechanism. check-in: f031beec9a user: dkf tags: trunk | |
2013-08-02
| ||
20:19 | Deal with the elaborate rip-apart-a-metaclass case as well. check-in: 04e4971bde user: dkf tags: trunk | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 | 2013-08-02 Donal Fellows <[email protected]> * generic/tclOODefineCmds.c (ClassSuperSet): Bug [9d61624b3d]: Stop crashes when emptying the superclass slot, even when doing elaborate things with metaclasses. 2013-08-01 Harald Oehlmann <[email protected]> | > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 | 2013-08-03 Donal Fellows <[email protected]> * library/auto.tcl: [Patch 3611643]: Allow TclOO classes to be found by the autoloading mechanism. 2013-08-02 Donal Fellows <[email protected]> * generic/tclOODefineCmds.c (ClassSuperSet): Bug [9d61624b3d]: Stop crashes when emptying the superclass slot, even when doing elaborate things with metaclasses. 2013-08-01 Harald Oehlmann <[email protected]> |
︙ | ︙ |
Changes to library/auto.tcl.
︙ | ︙ | |||
612 613 614 615 616 617 618 619 620 | set name ::[join [lreverse $contextStack] ::] # create artifical proc to force an entry in the tclIndex $parser eval [list ::proc $name {} {}] } } } } return | > > > > > > > > > > > > > > | 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 | set name ::[join [lreverse $contextStack] ::] # create artifical proc to force an entry in the tclIndex $parser eval [list ::proc $name {} {}] } } } } # AUTO MKINDEX: oo::class create name ?definition? # Adds an entry to the auto index list for the given class name. foreach cmd {oo::class class} { auto_mkindex_parser::command $cmd {ecmd name {body ""}} { if {$cmd eq "create"} { variable index variable scriptFile append index [format "set %s \[list source \[%s]]\n" \ [list auto_index([fullname $name])] \ [list file join $dir {*}[file split $scriptFile]]] } } } return |