diff options
| author | davygrvy <davygrvy@pobox.com> | 2003-12-24 04:20:05 (GMT) |
|---|---|---|
| committer | davygrvy <davygrvy@pobox.com> | 2003-12-24 04:20:05 (GMT) |
| commit | 450e0b447aa36f21067a4ea054a4238ad158d40c (patch) | |
| tree | 4e2818206be831befad45cfb49ac88e75d1c5bc8 /generic | |
| parent | 5d224fb11538aa654ba2028f75e5ffa06df2c579 (diff) | |
| download | tcl-450e0b447aa36f21067a4ea054a4238ad158d40c.zip tcl-450e0b447aa36f21067a4ea054a4238ad158d40c.tar.gz tcl-450e0b447aa36f21067a4ea054a4238ad158d40c.tar.bz2 | |
Deprected use of Tcl_Ckalloc changed to Tcl_Alloc in the
TclAllocObjStorage macro.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index d622f15..4734cd7 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.138 2003/11/03 12:49:31 vincentdarley Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.139 2003/12/24 04:20:05 davygrvy Exp $ */ #ifndef _TCLINT @@ -2163,7 +2163,7 @@ EXTERN void TclDbInitNewObj _ANSI_ARGS_((Tcl_Obj *objPtr)); */ # define TclAllocObjStorage(objPtr) \ - (objPtr) = (Tcl_Obj *) Tcl_Ckalloc(sizeof(Tcl_Obj)) + (objPtr) = (Tcl_Obj *) Tcl_Alloc(sizeof(Tcl_Obj)) # define TclFreeObjStorage(objPtr) \ ckfree((char *) (objPtr)) |