diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-01 08:42:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-01 08:42:33 (GMT) |
| commit | 9a1c1f5e11679feeaafd9c788631fc98faf6945e (patch) | |
| tree | 4835a5e1b4e1296978b848aa35e35bf0e240dede /generic/tclCompile.h | |
| parent | 33eea6856d85ce80c6097dd8d3673632e57b38bf (diff) | |
| download | tcl-9a1c1f5e11679feeaafd9c788631fc98faf6945e.zip tcl-9a1c1f5e11679feeaafd9c788631fc98faf6945e.tar.gz tcl-9a1c1f5e11679feeaafd9c788631fc98faf6945e.tar.bz2 | |
Use size_t in AuxDataPrintProc
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 0d37c6b..fce7111 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -221,7 +221,7 @@ typedef void *(AuxDataDupProc) (void *clientData); typedef void (AuxDataFreeProc) (void *clientData); typedef void (AuxDataPrintProc)(void *clientData, Tcl_Obj *appendObj, struct ByteCode *codePtr, - unsigned int pcOffset); + size_t pcOffset); /* * We define a separate AuxDataType struct to hold type-related information @@ -1805,8 +1805,8 @@ MODULE_SCOPE void TclDTraceInfo(Tcl_Obj *info, const char **args, int *argsi); FILE *tclDTraceDebugLog = NULL; \ void TclDTraceOpenDebugLog(void) { \ char n[35]; \ - sprintf(n, "/tmp/tclDTraceDebug-%" TCL_Z_MODIFIER "u.log", \ - (size_t) getpid()); \ + sprintf(n, "/tmp/tclDTraceDebug-%d.log", \ + getpid()); \ tclDTraceDebugLog = fopen(n, "a"); \ } |