diff options
| author | stwo@users.sourceforge.net <stwo> | 2012-09-16 15:56:02 (GMT) |
|---|---|---|
| committer | stwo@users.sourceforge.net <stwo> | 2012-09-16 15:56:02 (GMT) |
| commit | 1105cadb3e05a7459a275481ff6bcc660caeb285 (patch) | |
| tree | 1e582d8fef984892f52d67c874aa0294faf872b5 | |
| parent | 7ec0a84b5958b8c935cbc5cdfc887992aa95bcbf (diff) | |
| download | tcl-1105cadb3e05a7459a275481ff6bcc660caeb285.zip tcl-1105cadb3e05a7459a275481ff6bcc660caeb285.tar.gz tcl-1105cadb3e05a7459a275481ff6bcc660caeb285.tar.bz2 | |
Nicer style test.
| -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); } |