[PD-dev] 0.37.1 bug: $0 sometimes saving as number (still)

[Hans-Christoph Steiner]

I know that there was a bug in test versions of 0.37.1 where $0 would 
be saved as the numerical ID.  Well, it seems to be back.  $0 remains 
$0 in most of the patches I have tried recently, except for this one 
patch of mine, xp4pd-client.pd.  I have tried it on both of the MacOS X 
installer versions that I posted recently.  Both are based on Miller's 
0.37.1 source, one was built on Tcl 8.5 and the other Tcl 8.4.  Both 
had this problem.  My bro was running this same patch on Windows using 
0.37.1 and he did not have this problem.


--------------------------------------- xp4pd-client.pd 
-------------------------------------------

#N canvas 276 94 628 690 10;
#X obj 163 300 netclient;
#X msg 10 201 disconnect;
#X symbolatom 483 84 0 0 0 2 ClientID $0-ClientID -;
#X obj 101 153 bng 25 250 50 0 empty empty empty 0 -6 0 8 -4033 -1
-1;
#X obj 10 153 bng 25 250 50 0 empty empty empty 0 -6 0 8 -258049 -1
-1;
#X obj 10 107 netreceive 11111;
#X obj 240 300 tgl 17 0 empty empty connection 20 8 1 8 -188399 -1
-1 0 1;
#X obj 8 6 cnv 15 600 60 empty empty xp4pd_client 20 12 1 18 -233017
-66624 0;
#X text 9 74 [netreceive 11111] is for receiving connect/disconnect
from the command line \, or from another machine.;
#X obj 308 159 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X msg 308 177 capture \$1;
#X msg 308 140 1;
#X obj 393 271 bng 15 250 50 0 127.0.0.1 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 234 498 niagara 1;
#X obj 292 526 spigot;
#X msg 329 495 0;
#X msg 436 495 1;
#X obj 329 433 niagara 1;
#N canvas 125 271 666 538 shared_patch 0;
#X restore 415 138 pd shared_patch;
#X obj 308 198 tot shared_patch;
#X obj 292 588 s pd-shared_patch;
#X obj 163 428 s $0-ClientID;
#X obj 436 433 r $0-ClientID;
#X msg 428 201 set \$1;
#X obj 428 182 r $0-ClientID;
#X obj 393 223 prepend;
#X obj 329 452 symbol;
#X obj 234 408 trigger anything anything;
#X obj 329 475 select localhost;
#X msg 153 122 127.0.0.1;
#X obj 124 184 symbol;
#X msg 163 269 send whoami;
#X obj 163 376 route whoami;
#X symbolatom 124 203 15 0 0 0 - - -;
#X obj 163 408 symbol;
#X obj 10 133 route disconnect;
#X obj 393 242 prepend send;
#X text 303 48 (C) at.or.at - released under the GNU GPL;
#X msg 153 144 pdbox.at.or.at;
#X text 49 621 needs [prepend] from cyclone \, [tot] from toxy \, 
[niagara]
from zexy \, and [netclient] from maxlib;
#X text 204 9 (connect to pdbox.at.or.at for a public server);
#X msg 124 221 connect \$1 42776;
#X msg 221 320 \; pd-shared_patch vis \$1 \;;
#X msg 22 539 \; pd-shared_patch selectall \; pd-shared_patch key 1
8 0 \; pd-shared_patch key 0 BackSpace 0;
#X obj 10 180 t b b;
#X connect 0 0 32 0;
#X connect 0 1 6 0;
#X connect 0 1 31 0;
#X connect 0 1 42 0;
#X connect 1 0 0 0;
#X connect 3 0 33 0;
#X connect 4 0 44 0;
#X connect 5 0 35 0;
#X connect 9 0 10 0;
#X connect 10 0 19 0;
#X connect 11 0 9 0;
#X connect 13 1 14 0;
#X connect 14 0 20 0;
#X connect 15 0 14 1;
#X connect 16 0 14 1;
#X connect 17 0 26 0;
#X connect 19 2 25 0;
#X connect 19 3 11 0;
#X connect 22 0 28 1;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X connect 25 0 36 0;
#X connect 26 0 28 0;
#X connect 27 0 13 0;
#X connect 27 1 17 0;
#X connect 28 0 15 0;
#X connect 28 1 16 0;
#X connect 29 0 30 0;
#X connect 30 0 33 0;
#X connect 31 0 0 0;
#X connect 32 0 34 0;
#X connect 32 1 27 0;
#X connect 33 0 41 0;
#X connect 34 0 21 0;
#X connect 35 0 4 0;
#X connect 35 1 3 0;
#X connect 36 0 12 0;
#X connect 36 0 0 0;
#X connect 38 0 30 0;
#X connect 41 0 0 0;
#X connect 44 0 1 0;
#X connect 44 1 43 0;