[Tcl-bugs] [ tcl-Patches-1530474 ] Shrink the .exe size

[SourceForge.net <no...@so...>]

Patches item #1530474, was opened at 2006-07-28 15:46
Message generated for change (Comment added) made by afredd
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=310894&aid=1530474&group_id=10894

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: None
Group: None
Status: Open
Resolution: Later
Priority: 4
Submitted By: afredd (afredd)
Assigned to: Donal K. Fellows (dkf)
Summary: Shrink the .exe size

Initial Comment:

By converting the 24 calls of:

Tcl_Panic("<function> called with shared object");

in the core, into a (new) function call of

TclSharedObjPanic("<function>");

...where TclSharedObjPanic() constructs the previous
message before calling Tcl_Panic() then
the static .exe shrinks by about 4K (from 770048
to 765952). This is more than i'd expected, so
compilers other than VS6 may give less impressive
savings.

Attached patch includes the trivial changes to

tclBinary.c
tclDictObj.c
tclInt.h
tclListObj.c
tclObj.c
tclStringObj.c



----------------------------------------------------------------------

>Comment By: afredd (afredd)
Date: 2006-08-07 09:03

Message:
Logged In: YES 
user_id=1386588

> can you (afredd) please provide the alternate patch? thx

Sure - here it is.

I've also added in the reworded Tcl_Panic for TclIncrObj.

Note, while i haven't changed them there are 2 possible
 typos in the (original) panic messages. (1) The panic
 at ~1323 of tclListObj.c says "Tcl_ListObjSetElement"
 but is really in TclListObjSetElement (no underscore).
 (2) Similarly, at ~344 in tclBinary.c the panic in the
 function Tcl_SetByteArrayLength says Tcl_SetObjLength.
 

----------------------------------------------------------------------

Comment By: Jeffrey Hobbs (hobbs)
Date: 2006-08-04 22:59

Message:
Logged In: YES 
user_id=72656

can you (afredd) please provide the alternate patch?  thx

----------------------------------------------------------------------

Comment By: afredd (afredd)
Date: 2006-08-04 08:36

Message:
Logged In: YES 
user_id=1386588

> I'm interested to know if the same effect can be had by
> just using:
> 
> Tcl_Panic("%s called with shared object", <function>);

Good idea... yes, this gives the same 4K file
size reduction as with using a TclSharedObjPanic().

Also, spotted in tclExecute.c:

~1043: Tcl_Panic("shared object passed to TclIncrObj")

which could be reworded to match the others.


----------------------------------------------------------------------

Comment By: Jeffrey Hobbs (hobbs)
Date: 2006-08-03 18:31

Message:
Logged In: YES 
user_id=72656

I'm interested to know if the same effect can be had by just
using:

Tcl_Panic("%s called with shared object", <function>);

as the string would remain the same, and no new function is
needed (Tcl_Panic already handles varargs).  If so, that
would be a trivially easy to add in patch.

----------------------------------------------------------------------

Comment By: Donal K. Fellows (dkf)
Date: 2006-08-03 17:04

Message:
Logged In: YES 
user_id=79902

Putting this on the back-burner for now; better to do this
sort of thing during (towards the end of?) the beta cycle.

----------------------------------------------------------------------

Comment By: afredd (afredd)
Date: 2006-07-28 16:59

Message:
Logged In: YES 
user_id=1386588


...and one for tclClock.c that shrinks tclClock.obj
from 23,417 to 23,201 by condensing the clock command
initialisation code.

----------------------------------------------------------------------

Comment By: afredd (afredd)
Date: 2006-07-28 16:08

Message:
Logged In: YES 
user_id=1386588

To go with the previous changes, here's a patch that
removes the need for the "::tcl::mathfunc::" prefix
on all math function name static strings in tclBasic.c.
For me this shrinks tclBasic.obj from 80963 to 79965,
a saving of 998bytes.



----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=310894&aid=1530474&group_id=10894