RE: Possible bug in Tcl.pm exposed by Tktable?
[email protected] ("Konovalov, Vadim") Wed, 8 Apr 2020 11:14:15 +0000
| Newsgroups | perl.tcltk |
|---|---|
| Message-ID | <MN2PR19MB403238398B53373AFB88F82B8AC00@MN2PR19MB4032.namprd19.prod.outlook.com> |
PiBPbiA0LzcvMjAyMCAzOjA1IEFNLCBLb25vdmFsb3YsIFZhZGltIHdyb3RlOg0KPiA+IEFzIGEg d29ya2Fyb3VuZCwgeW91IGNhbiBkZWZpbmUNCj4gdGhpcyBlbnZpcm9ubWVudCB2YXJpYWJsZSBp biBQZXJsLCB0aGVuIGVycm9yIGdvZXMgYXdheToNCj4gPg0KPiA+IHZhZEBib25pdGE6fiQgcGVy bA0KPiAtTVRjbCAtd2UgJyRFTlZ7Rk9PfT0ieCI7bXkgJGk9bmV3IFRjbDskaS0+RXZhbCgic2V0 IGVudihGT08pIGJhciIpO3ByaW50DQo+IHFxL29rXG4vJw0KPiA+IG9rDQo+IA0KPiBJIGhhdmUg bm90IHlldCBnaXZlbiB0aGlzIGEgdHJ5LCBidXQgZG9lcyB0aGlzIG1lYW4gaGF2aW5nIHRvDQo+ IGZpcnN0IHNldCB0aGUgZXhhY3QgZW52aXJvbm1lbnQgdmFyaWFibGUgVGNsIHNldHMsIG9yIGlz IGl0DQo+IHRoYXQgKmFueSoNCj4gZW52aXJvbm1lbnQgdmFyaWFibGUgbmVlZHMgdG8gYmUgc2V0 IGZpcnN0IGZyb20gUGVybD8NCg0KQW55IGVudmlyb25tZW50IHZhcmlhYmxlIG5lZWRzIHRvIGJl IHNldCBmaXJzdCBmcm9tIFBlcmwgLSB0aGlzIHdpbGwgYXZvaWQgYWxsb2NhdGluZyBpdHMgbmFt ZSBpbiANCg0KPiANCj4gPiBUY2wgdXNlcyAiY2thbGxvYyINCj4gZnVuY3Rpb24gdG8gYWxsb2Nh dGUgc3RyaW5ncyBmb3IgbmFtZSBvZiBlbnZpcm9ubWVudCB2YXJpYWJsZSAiRk9PIiAob3IgYQ0K PiB2YWx1ZT8pDQo+ID4gVGhpcyAnY2thbGxvYycgaXMgdGhlaXIgaGVscGVyIGZ1bmN0aW9uLCB3 aGljaCBjaGFpbnMgbWVtb3J5IGludG8NCj4gbGluaywgc28gdG8gZnJlZSBpdCBhZnRlciBhbGwu DQo+ID4NCj4gPiBJTU8gSWYgdGhleSBqdXN0IHVzZSAibWFsbG9jIiB0aGUgcHJvYmxlbQ0KPiB3 aWxsIGdvIGF3YXkuDQo+ID4gSSBoYXZlbid0IHZlcmlmaWVkIHRoaXMgYXNzdW1wdGlvbiwgYnV0 IDg1JS1zdXJlIG9mIGl0ID8/DQo+IA0KPiBCZWNhdXNlIEkgY29tcGlsZWQgd2l0aCAtRFBVUklG WSBJJ3ZlIGFscmVhZHkgdmVyaWZpZWQgdGhpcyB3b24ndA0KPiBtYWtlIGENCj4gZGlmZmVyZW5j ZS4NCg0KQXJlIHlvdSBzdGF0aW5nIHRoYXQgaWYgSSBjaGFuZ2UgaW4gZnVuY3Rpb24gIlRjbFNl dEVudiIgaGVyZSBja2FsbG9jIHRvIG1hbGxvYyBhbmQgY2tmcmVlIHRvIGZyZWU6DQoNCg0KICAg IGlmIChpbmRleCA9PSAtMSkgew0KI2lmbmRlZiBVU0VfUFVURU5WDQoJLyoNCgkgKiBXZSBuZWVk IHRvIGhhbmRsZSB0aGUgY2FzZSB3aGVyZSB0aGUgZW52aXJvbm1lbnQgbWF5IGJlIGNoYW5nZWQN CgkgKiBvdXRzaWRlIG91ciBjb250cm9sLiBvdXJFbnZpcm9uU2l6ZSBpcyBvbmx5IHZhbGlkIGlm IHRoZSBjdXJyZW50DQoJICogZW52aXJvbm1lbnQgaXMgdGhlIG9uZSB3ZSBhbGxvY2F0ZWQuIFtC dWcgOTc5NjQwXQ0KCSAqLw0KDQoJaWYgKChlbnYub3VyRW52aXJvbiAhPSBlbnZpcm9uKSB8fCAo bGVuZ3RoKzIgPiBlbnYub3VyRW52aXJvblNpemUpKSB7DQoJICAgIGNoYXIgKipuZXdFbnZpcm9u ID0gY2thbGxvYygobGVuZ3RoICsgNSkgKiBzaXplb2YoY2hhciAqKSk7DQoNCgkgICAgbWVtY3B5 KG5ld0Vudmlyb24sIGVudmlyb24sIGxlbmd0aCAqIHNpemVvZihjaGFyICopKTsNCgkgICAgaWYg KChlbnYub3VyRW52aXJvblNpemUgIT0gMCkgJiYgKGVudi5vdXJFbnZpcm9uICE9IE5VTEwpKSB7 DQoJCWNrZnJlZShlbnYub3VyRW52aXJvbik7DQoJICAgIH0NCgkgICAgZW52aXJvbiA9IGVudi5v dXJFbnZpcm9uID0gbmV3RW52aXJvbjsNCgkgICAgZW52Lm91ckVudmlyb25TaXplID0gbGVuZ3Ro ICsgNTsNCgl9DQoJaW5kZXggPSBsZW5ndGg7DQoJZW52aXJvbltpbmRleCArIDFdID0gTlVMTDsN CiNlbmRpZiAvKiBVU0VfUFVURU5WICovDQoJb2xkVmFsdWUgPSBOVUxMOw0KCW5hbWVMZW5ndGgg PSBzdHJsZW4obmFtZSk7DQoNCkJUVyB3aGF0IGlmIHlvdSdsbCByZWJ1aWxkIHdpdGggVVNFX1BV VEVOVj8NCj4gDQo+IFdpdGhvdXQgbWFudWFsbHkgZGVmaW5pbmcgVENMX01FTV9ERUJVRywgY2th bGxvYygpIGlzIFRjbF9BbGxvYygpLA0KPiBhbmQgVGNsX0FsbG9jKCkgdXNlcyBUY2xwQWxsb2Mo KSBkaXJlY3RseS4NCj4gRGVmaW5pbmcgUFVSSUZZIHVuZGVmaW5lcw0KPiBVU0VfVENMQUxMT0Ms IG1ha2luZyBUY2xwQWxsb2MoKQ0KPiB1c2UgbWFsbG9jKCkgZGlyZWN0bHkuDQo+IA0KPiBUaGlz IGlzIGV2aWRlbnQgaW4gdGhlIHZhbGdyaW5kIHN0YWNrIHRyYWNlIEkgcG9zdGVkIDIwMjAtMDMt MTcuDQoNClRoYXQncyBjb29sDQo=