diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-03-13 08:38:18 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-03-13 08:38:18 (GMT) |
| commit | 6f905e1f0fa598055c516aa33529d41d2fadbe4a (patch) | |
| tree | 88e761607718492f5525bd50f6afbb0fa84da34d /generic/tcl.h | |
| parent | 4ccedfaec494d98f1677ce45925f496c2d7c2b70 (diff) | |
| download | tcl-6f905e1f0fa598055c516aa33529d41d2fadbe4a.zip tcl-6f905e1f0fa598055c516aa33529d41d2fadbe4a.tar.gz tcl-6f905e1f0fa598055c516aa33529d41d2fadbe4a.tar.bz2 | |
Eliminate internal use of TclNewBooleanObj()/TclSetBooleanObj()/TclSetIntObj(). Replace Tcl_DbNewBooleanObj() with trivial macro.
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index c67eafc..1491745 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2538,7 +2538,7 @@ EXTERN void Tcl_GetMemoryInfo(Tcl_DString *dsPtr); Tcl_DbNewBignumObj(val, __FILE__, __LINE__) # undef Tcl_NewBooleanObj # define Tcl_NewBooleanObj(val) \ - Tcl_DbNewBooleanObj(val, __FILE__, __LINE__) + Tcl_DbNewLongObj((val)!=0, __FILE__, __LINE__) # undef Tcl_NewByteArrayObj # define Tcl_NewByteArrayObj(bytes, len) \ Tcl_DbNewByteArrayObj(bytes, len, __FILE__, __LINE__) |