diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-28 11:39:18 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-28 11:39:18 (GMT) |
| commit | 5cb710df9af162eecdda7380baae24d5afd8fa3d (patch) | |
| tree | b79ecd67d8af231132b7d1fad936de266d730f71 /generic/tclIO.c | |
| parent | 04474c7892335151b65a951ac743b2855dfaba26 (diff) | |
| download | tcl-5cb710df9af162eecdda7380baae24d5afd8fa3d.zip tcl-5cb710df9af162eecdda7380baae24d5afd8fa3d.tar.gz tcl-5cb710df9af162eecdda7380baae24d5afd8fa3d.tar.bz2 | |
More usage of TCLFLEXARRAY. Make current_malloc_packets/maximum_malloc_packets type size_t
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 9d88948..92bd91b 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -103,7 +103,7 @@ typedef struct CopyState { Tcl_Interp *interp; /* Interp that started the copy. */ Tcl_Obj *cmdPtr; /* Command to be invoked at completion. */ int bufSize; /* Size of appended buffer. */ - char buffer[1]; /* Copy buffer, this must be the last + char buffer[TCLFLEXARRAY]; /* Copy buffer, this must be the last * field. */ } CopyState; @@ -9246,7 +9246,7 @@ TclCopyChannel( * completed. */ - csPtr = (CopyState *)ckalloc(sizeof(CopyState) + !moveBytes * inStatePtr->bufSize); + csPtr = (CopyState *)ckalloc(offsetof(CopyState, buffer) + 1U + !moveBytes * inStatePtr->bufSize); csPtr->bufSize = !moveBytes * inStatePtr->bufSize; csPtr->readPtr = inPtr; csPtr->writePtr = outPtr; |