Tcl Source Code

View Ticket
Login
Ticket UUID: 638045
Title: Extended genStubs.tcl
Type: RFE Version: None
Submitter: andreas_kupries Created on: 2002-11-13 23:15:28
Subsystem: 70. Sample Extension Assigned To: hobbs
Priority: 5 Medium Severity:
Status: Open Last Modified: 2002-11-14 08:07:49
Resolution: None Closed By:
    Closed on:
Description:
The attached genStubs.tcl is extended to 
recognize 'supressor names'. These are translated into 
CPP directives (#if defined/!defined) to conditionally 
initialize a stub table.

This was used first in the mod-8-3-4-branch (Cisco 
modular Tcl) to enforce that the slots for functions
which are compiled out are initialized with NULL.

IMHO this is useful for extensions too.
User Comments: andreas_kupries added on 2002-11-14 06:15:28:

File Added - 35333: genStubs.tcl

Attachments: