Tcl Source Code

View Ticket
Login
Ticket UUID: 2489836
Title: CRASH - tclsh crashes invoking unknown method
Type: Bug Version: obsolete: 8.6b1
Submitter: apnadkarni Created on: 2009-01-06 10:20:06
Subsystem: 35. TclOO Package Assigned To: dkf
Priority: 9 Immediate Severity:
Status: Closed Last Modified: 2009-01-06 21:33:53
Resolution: Fixed Closed By: dkf
    Closed on: 2009-01-06 14:33:53
Description:
Tclsh 8.6b1
WinXP SP2
The following sequence causes tclsh to crash. Don't ask as to what the commands are trying to do! It's the shortest sequence I can come up with that generates the crash. The require map.tcl file is attached. I'm still learning TclOO so it's quite possible I'm not doing things right but a crash should not be the outcome.

% source map.tcl
::Map
% Map create m {a 1 b 2}
::m
% info object methods m -all
-clear -exists -get -set -unset destroy
% oo::objdefine m {unexport [info object methods m -all]}
% info object methods m -all
-clear -exists -get -set -unset destroy
% oo::objdefine m {unexport {*}[info object methods m -all]}
% info object methods m -all
% m a   --> CAUSES CRASH

/Ashok
User Comments: dkf added on 2009-01-06 21:33:53:
Oops, was deleting the contents of a variable that wasn't set.

dkf added on 2009-01-06 21:18:55:
non-aligned pointer access??? WTF...

apnadkarni added on 2009-01-06 17:20:06:

File Added - 307995: map.tcl

Attachments: