summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2016-11-22 15:04:28 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2016-11-22 15:04:28 (GMT)
commitd510c90352989ab2f1332ce903526b9052def6de (patch)
treedcc25582241a4d359d26305a907c749d6dc4b4e3 /generic
parenta3271d4360790d34a08896e46f0a6a37aa344568 (diff)
downloadtcl-d510c90352989ab2f1332ce903526b9052def6de.zip
tcl-d510c90352989ab2f1332ce903526b9052def6de.tar.gz
tcl-d510c90352989ab2f1332ce903526b9052def6de.tar.bz2
Corrections to misleading comments.
Diffstat (limited to 'generic')
-rw-r--r--generic/tcl.h11
1 files changed, 6 insertions, 5 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index eb53c70..7984005 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -831,19 +831,20 @@ typedef struct Tcl_Obj {
union { /* The internal representation: */
long longValue; /* - an long integer value. */
double doubleValue; /* - a double-precision floating value. */
- void *otherValuePtr; /* - another, type-specific value,
- not used internally any more. */
+ void *otherValuePtr; /* - another, type-specific value, not used
+ * internally any more. */
Tcl_WideInt wideValue; /* - a long long value. */
struct { /* - internal rep as two pointers.
- * the main use of which is a bignum's
+ * Many uses in Tcl, including a bignum's
* tightly packed fields, where the alloc,
* used and signum flags are packed into
- * ptr2 with everything else hung off ptr1. */
+ * ptr2 with everything else hung off
+ * ptr1. */
void *ptr1;
void *ptr2;
} twoPtrValue;
struct { /* - internal rep as a pointer and a long,
- not used internally any more. */
+ * not used internally any more. */
void *ptr;
unsigned long value;
} ptrAndLongRep;