Tcl Source Code

Please refer to TIP #182.

Logged In: YES 
user_id=80530


Committed for 8.5a3.

File Deleted - 135061: 



File Added - 135303: 1165062.patch

Logged In: YES 
user_id=80530


updated patch to reflect
the fixing of Bug 1201589.

File Deleted - 134392: 



File Added - 135061: 1165062-final.patch

Logged In: YES 
user_id=80530


Those stanzas are now out of the HEAD.

Attaching another patch updated to
the HEAD; I think TIP 182 is ready
for voting.

Logged In: YES 
user_id=80530


Thanks.  That updated patch modifies
only stanzas dealing with "pure booleans".
If that code still survives when we
integrate a TIP 182 implementation, we'll
include those changes in it.

File Added - 134939: boolTypeFix.diff

Logged In: YES 
user_id=113501


Here is an updated "boolean type fix" patch that logically
goes with this TIP.

Logged In: YES 
user_id=80530


Thanks for the additional review.

We can put that additional stanza of
code into the patch if you really want
it, but I don't think we should bother
since it's a "dead" branch of code.

Note that the patched area only runs
for a "pure boolean" Tcl_Obj, something
with no string rep, and a "boolean"
Tcl_ObjType.  In the development on
the HEAD, that's no longer a valid
state for a "boolean";  that is, there are
no longer any pure booleans, since
the "boolean" Tcl_ObjType is now used
exclusively to cache the boolean 
equivalant of strings like "yes".

Hmmm.... now I notice that task
isn't yet complete.  That's probably
contributing to confusion.  Let me take
care of that...

Logged In: YES 
user_id=113501


The new patch looks good.  However, I still think we need to
add the changes to tclExecute.c back into it.

@@ -4506,7 +4509,14 @@
      * from the string rep.
      */
     if ((tPtr == &tclBooleanType) && (valuePtr->bytes ==
NULL)) {
-valuePtr->typePtr = &tclIntType;
+/*
+ * JJM: For TIP #182, changed this from tclIntType to
tclBooleanType
+ * so that [expr bool()] returns a "real" boolean.  This
change causes
+ * no test failures and should be totally innocuous
because at this point
+ * we are guaranteed to have a numeric boolean result
with no string rep
+ * per the enclosing if statement.
+ */
+valuePtr->typePtr = &tclBooleanType;
 converted = 1;
     } else {
 s = Tcl_GetStringFromObj(valuePtr, &length);

File Added - 134392: 1165062.patch

Logged In: YES 
user_id=80530


Here's a new patch that merges
in the docs/tests from the first
patch.

Note the new bug 1201589
discovered writing these tests.

File Added - 134206: tip182.patch

Logged In: YES 
user_id=80530


Here's an implementation
updated to deal with the
revisions of TIP 232.

File Added - 126038: TIP-182v1.diff