diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-06-04 15:54:35 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-06-04 15:54:35 (GMT) |
| commit | 514638fd758486513ea7eb842bb8972fd854ca06 (patch) | |
| tree | b5c98217485282023c93ab5b46c2cfde0af5ddc5 /generic/tclListObj.c | |
| parent | 14e9a4e0bda3c86ac11baf3c11f900a5837ea70a (diff) | |
| download | tcl-514638fd758486513ea7eb842bb8972fd854ca06.zip tcl-514638fd758486513ea7eb842bb8972fd854ca06.tar.gz tcl-514638fd758486513ea7eb842bb8972fd854ca06.tar.bz2 | |
Make function definitions have right argument style
Diffstat (limited to 'generic/tclListObj.c')
| -rw-r--r-- | generic/tclListObj.c | 26 |
1 files changed, 19 insertions, 7 deletions
diff --git a/generic/tclListObj.c b/generic/tclListObj.c index 2ffaf87..683a0e7 100644 --- a/generic/tclListObj.c +++ b/generic/tclListObj.c @@ -266,7 +266,8 @@ ListSpanNew( *------------------------------------------------------------------------ */ static inline void -ListSpanDecrRefs(ListSpan *spanPtr) +ListSpanDecrRefs( + ListSpan *spanPtr) { if (spanPtr->refCount <= 1) { Tcl_Free(spanPtr); @@ -343,7 +344,8 @@ ListSpanMerited( *------------------------------------------------------------------------ */ static inline void -ListRepFreeUnreferenced(const ListRep *repPtr) +ListRepFreeUnreferenced( + const ListRep *repPtr) { if (! ListRepIsShared(repPtr) && repPtr->spanPtr) { /* T:listrep-1.5.1 */ @@ -492,7 +494,8 @@ MemoryAllocationError( *------------------------------------------------------------------------ */ static int -ListLimitExceededError(Tcl_Interp *interp) +ListLimitExceededError( + Tcl_Interp *interp) { if (interp != NULL) { Tcl_SetObjResult( @@ -523,7 +526,9 @@ ListLimitExceededError(Tcl_Interp *interp) *------------------------------------------------------------------------ */ static inline void -ListRepUnsharedShiftDown(ListRep *repPtr, Tcl_Size shiftCount) +ListRepUnsharedShiftDown( + ListRep *repPtr, + Tcl_Size shiftCount) { ListStore *storePtr; @@ -578,7 +583,9 @@ ListRepUnsharedShiftDown(ListRep *repPtr, Tcl_Size shiftCount) */ #if 0 static inline void -ListRepUnsharedShiftUp(ListRep *repPtr, Tcl_Size shiftCount) +ListRepUnsharedShiftUp( + ListRep *repPtr, + Tcl_Size shiftCount) { ListStore *storePtr; @@ -624,7 +631,10 @@ ListRepUnsharedShiftUp(ListRep *repPtr, Tcl_Size shiftCount) *------------------------------------------------------------------------ */ static void -ListRepValidate(const ListRep *repPtr, const char *file, int lineNum) +ListRepValidate( + const ListRep *repPtr, + const char *file, + int lineNum) { ListStore *storePtr = repPtr->storePtr; const char *condition; @@ -689,7 +699,9 @@ failure: *------------------------------------------------------------------------ */ void -TclListObjValidate(Tcl_Interp *interp, Tcl_Obj *listObj) +TclListObjValidate( + Tcl_Interp *interp, + Tcl_Obj *listObj) { ListRep listRep; if (TclListObjGetRep(interp, listObj, &listRep) != TCL_OK) { |