diff options
Diffstat (limited to 'mac/tclMacOSA.c')
| -rw-r--r-- | mac/tclMacOSA.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/mac/tclMacOSA.c b/mac/tclMacOSA.c index d4bc14d..b09cb59 100644 --- a/mac/tclMacOSA.c +++ b/mac/tclMacOSA.c @@ -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: tclMacOSA.c,v 1.2 1998/09/14 18:40:05 stanton Exp $ + * RCS: @(#) $Id: tclMacOSA.c,v 1.3 1999/04/16 00:47:20 stanton Exp $ */ #define MAC_TCL @@ -1926,7 +1926,7 @@ tclOSAAddContext( int newPtr; if (contextName == NULL) { - contextName = ckalloc(24 * sizeof(char)); + contextName = ckalloc(16 + TCL_INTEGER_SPACE); sprintf(contextName, "OSAContext%d", contextIndex++); } else if (*contextName == '\0') { sprintf(contextName, "OSAContext%d", contextIndex++); @@ -2057,7 +2057,7 @@ tclOSAStore( Str255 rezName; int result = TCL_OK; short saveRef, fileRef = -1; - char idStr[64]; + char idStr[16 + TCL_INTEGER_SPACE]; FSSpec fileSpec; Tcl_DString buffer; char *nativeName; @@ -2276,7 +2276,7 @@ tclOSALoad( Str255 rezName; int result = TCL_OK; short saveRef, fileRef = -1; - char idStr[64]; + char idStr[16 + TCL_INTEGER_SPACE]; FSSpec fileSpec; Tcl_DString buffer; char *nativeName; |