diff options
| author | stwo <stwo@noemail.net> | 2012-09-16 15:56:02 (GMT) |
|---|---|---|
| committer | stwo <stwo@noemail.net> | 2012-09-16 15:56:02 (GMT) |
| commit | 30f37c1d6c3d34f4214857942e0a1db397435b50 (patch) | |
| tree | 1e582d8fef984892f52d67c874aa0294faf872b5 | |
| parent | a91b7b05126b739291ce5fd1ea1759cae9bbbc9d (diff) | |
| download | tcl-30f37c1d6c3d34f4214857942e0a1db397435b50.zip tcl-30f37c1d6c3d34f4214857942e0a1db397435b50.tar.gz tcl-30f37c1d6c3d34f4214857942e0a1db397435b50.tar.bz2 | |
Nicer style test.
FossilOrigin-Name: ef79a774d696a3e3d0e62c1bc44904ad7a717015
| -rw-r--r-- | generic/tclBinary.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index 8c95305..d3b11d3 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -279,10 +279,10 @@ Tcl_SetByteArrayObj( byteArrayPtr = (ByteArray *) ckalloc(BYTEARRAY_SIZE(length)); byteArrayPtr->used = length; byteArrayPtr->allocated = length; - if (length && bytes) { + + if ((length != NULL) && (bytes > 0)) { memcpy(byteArrayPtr->bytes, bytes, (size_t) length); } - objPtr->typePtr = &tclByteArrayType; SET_BYTEARRAY(objPtr, byteArrayPtr); } |