Posted to tcl by evilotto at Thu Apr 12 22:04:37 GMT 2018view raw
- set a [encoding convertfrom identity \x00]
- set b "\0"
- puts [string equal $a $b]
- string length $b
- puts [string equal $a $b]
- string length $a
- puts [string equal $a $b]
- puts ------
- set a [encoding convertfrom identity \x00]
- set b "\0"
- puts [string equal $a $b]
- string length $a
- puts [string equal $a $b]
- string length $b
- puts [string equal $a $b]