From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 123269 invoked by alias); 8 Sep 2017 12:13:40 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Received: (qmail 123255 invoked by uid 89); 8 Sep 2017 12:13:40 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-25.3 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_0,GIT_PATCH_1,GIT_PATCH_2,GIT_PATCH_3,MIME_BASE64_BLANKS,RP_MATCHES_RCVD,SPF_PASS autolearn=ham version=3.3.2 spammy=Managing, nicole, Nicole, Supervisory X-HELO: mga11.intel.com Received: from mga11.intel.com (HELO mga11.intel.com) (192.55.52.93) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 12:13:37 +0000 Received: from fmsmga005.fm.intel.com ([10.253.24.32]) by fmsmga102.fm.intel.com with ESMTP/TLS/DHE-RSA-AES256-GCM-SHA384; 08 Sep 2017 05:13:35 -0700 X-ExtLoop1: 1 Received: from irsmsx109.ger.corp.intel.com ([163.33.3.23]) by fmsmga005.fm.intel.com with ESMTP; 08 Sep 2017 05:13:35 -0700 Received: from irsmsx105.ger.corp.intel.com ([169.254.7.75]) by IRSMSX109.ger.corp.intel.com ([169.254.13.28]) with mapi id 14.03.0319.002; Fri, 8 Sep 2017 13:12:22 +0100 From: "Wiederhake, Tim" To: Yao Qi CC: "gdb-patches@sourceware.org" Subject: RE: [PATCH v3 6/6] Fortran: Nested functions, add scope parameter. Date: Fri, 08 Sep 2017 12:13:00 -0000 Message-ID: <9676A094AF46E14E8265E7A3F4CCE9AF636368EC@irsmsx105.ger.corp.intel.com> References: <1502449611-8865-1-git-send-email-tim.wiederhake@intel.com> <1502449611-8865-7-git-send-email-tim.wiederhake@intel.com> <20170904095816.GB8425@1170ee0b50d5> In-Reply-To: <20170904095816.GB8425@1170ee0b50d5> dlp-product: dlpe-windows dlp-version: 11.0.0.116 dlp-reaction: no-action Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00201.txt.bz2 SGkgWWFvLA0KDQpUaGFua3MgZm9yIHRoZSBmZWVkYmFjayENCg0KPiAtLS0t LU9yaWdpbmFsIE1lc3NhZ2UtLS0tLQ0KPiBGcm9tOiBZYW8gUWkgW21haWx0 bzpxaXlhb2x0Y0BnbWFpbC5jb21dDQo+IFNlbnQ6IE1vbmRheSwgU2VwdGVt YmVyIDQsIDIwMTcgMTE6NTggQU0NCj4gVG86IFdpZWRlcmhha2UsIFRpbSA8 dGltLndpZWRlcmhha2VAaW50ZWwuY29tPg0KPiBDYzogZ2RiLXBhdGNoZXNA c291cmNld2FyZS5vcmc7IEJlcm5oYXJkIEhlY2tlbA0KPiA8YmVybmhhcmQu aGVja2VsQGludGVsLmNvbT4NCj4gU3ViamVjdDogUmU6IFtQQVRDSCB2MyA2 LzZdIEZvcnRyYW46IE5lc3RlZCBmdW5jdGlvbnMsIGFkZCBzY29wZQ0KPiBw YXJhbWV0ZXIuDQo+IA0KPiBPbiAxNy0wOC0xMSAxMzowNjo1MSwgVGltIFdp ZWRlcmhha2Ugd3JvdGU6DQo+ID4gRnJvbTogQmVybmhhcmQgSGVja2VsIDxi ZXJuaGFyZC5oZWNrZWxAaW50ZWwuY29tPg0KPiA+DQo+ID4gSW4gb3JkZXIg dG8gYXZvaWQgbmFtZSBjbGFzaGluZyBpbiBHREIsIHdlIGFkZCBhIHNjb3Bl DQo+ID4gdG8gbmVzdGVkIHN1YnJvdXRpbmVzLiBFbnZlbG9waW5nIGZ1bmN0 aW9uIGdpdmVzIHRoZQ0KPiA+IHNjb3BlLg0KPiANCj4gSGkgVGltLA0KPiBJ cyB0aGVyZSBhbnkgcmVhc29uIHRoYXQgeW91IHNwbGl0IGl0IGZyb20gcGF0 Y2ggIzU/ICBJTU8sIGJvdGggIzUgYW5kDQo+ICM2IHNob3VsZCBiZSBhIHNp bmdsZSBwYXRjaCwgYW5kIHdlIG5lZWQgYSBORVdTIGVudHJ5Lg0KDQpJIGFn cmVlLiBNZXJnZWQgYW5kIE5FV1MgZW50cnkgd3JpdHRlbi4NCg0KPiBBY2Nv cmRpbmcgdG8geW91ciBwYXRjaCAjNSwgSSB0aGluayBib3RoIEFkYSBhbmQg Rm9ydHJhbiBoYXZlIHRoZSBzaW1pbGFyDQo+IGZlYXR1cmUgaGVyZS4gIEkg dGhpbmsgd2UgbmVlZCB0byBrZWVwIHNlbWFudGljcyBzYW1lIGluIGJvdGgg bGFuZ3VhZ2VzLA0KPiBsaWtlLCAiYnJlYWsgZnVuYzo6bmVzdF9mdW5jIj8N Cg0KU29ycnksIEkgZG9uJ3QgcXVpdGUgZm9sbG93IHlvdS4gV2hhdCBpcyBp dCB0aGF0IHlvdSdkIGxpa2UgdG8gc2VlIGNoYW5nZWQ/DQoNCj4gPg0KPiA+ IC0tLQ0KPiA+ICBnZGIvZG9jL2dkYi50ZXhpbmZvICAgICAgICAgICAgICAg ICAgICAgICAgfCAgMyArKw0KPiA+ICBnZGIvZHdhcmYycmVhZC5jICAgICAg ICAgICAgICAgICAgICAgICAgICAgfCAyNiArKysrKysrKysrKy0NCj4gPiAg Z2RiL3Rlc3RzdWl0ZS9nZGIuZm9ydHJhbi9uZXN0ZWQtZnVuY3MuZXhwIHwg MjggKysrKysrKysrKystLQ0KPiA+ICBnZGIvdGVzdHN1aXRlL2dkYi5mb3J0 cmFuL25lc3RlZC1mdW5jcy5mOTAgfCA2Ng0KPiArKysrKysrKysrKysrKysr KysrKysrKysrKysrLS0NCj4gPiAgNCBmaWxlcyBjaGFuZ2VkLCAxMTQgaW5z ZXJ0aW9ucygrKSwgOSBkZWxldGlvbnMoLSkNCj4gPiAgbW9kZSBjaGFuZ2Ug MTAwNzU1ID0+IDEwMDY0NCBnZGIvdGVzdHN1aXRlL2dkYi5mb3J0cmFuL25l c3RlZC1mdW5jcy5mOTANCj4gPg0KPiA+IGRpZmYgLS1naXQgYS9nZGIvZG9j L2dkYi50ZXhpbmZvIGIvZ2RiL2RvYy9nZGIudGV4aW5mbw0KPiA+IGluZGV4 IGQwOThlYmEuLjk4M2E1NzAgMTAwNjQ0DQo+ID4gLS0tIGEvZ2RiL2RvYy9n ZGIudGV4aW5mbw0KPiA+ICsrKyBiL2dkYi9kb2MvZ2RiLnRleGluZm8NCj4g PiBAQCAtMTUyNTksNiArMTUyNTksOSBAQCBUaGUgYWNjZXNzIGNvbXBvbmVu dCBvcGVyYXRvci4gIE5vcm1hbGx5IHVzZWQgdG8NCj4gYWNjZXNzIGVsZW1l bnRzIGluIGRlcml2ZWQNCj4gPiAgdHlwZXMuICBBbHNvIHN1aXRhYmxlIGZv ciB1bmlvbnMuICBBcyB1bmlvbnMgYXJlbid0IHBhcnQgb2YgcmVndWxhcg0K PiBGb3J0cmFuLA0KPiA+ICB0aGlzIGNhbiBvbmx5IGhhcHBlbiB3aGVuIGFj Y2Vzc2luZyBhIHJlZ2lzdGVyIHRoYXQgdXNlcyBhIGdkYmFyY2gtDQo+IGRl ZmluZWQNCj4gPiAgdW5pb24gdHlwZS4NCj4gPiArQGl0ZW0gOjoNCj4gPiAr VGhlIHNjb3BlIG9wZXJhdG9yLiAgTm9ybWFsbHkgdXNlZCB0byBhY2Nlc3Mg dmFyaWFibGVzIGluIG1vZHVsZXMgb3IgdG8NCj4gc2V0DQo+ID4gK2JyZWFr cG9pbnRzIG9uIHN1YnJvdXRpbmVzIG5lc3RlZCBpbiBtb2R1bGVzIG9yIGlu IG90aGVyIChpbnRlcm5hbCkNCj4gc3Vicm91dGluZXMuDQo+ID4gIEBlbmQg dGFibGUNCj4gPg0KPiA+ICBAbm9kZSBGb3J0cmFuIERlZmF1bHRzDQo+ID4g ZGlmZiAtLWdpdCBhL2dkYi9kd2FyZjJyZWFkLmMgYi9nZGIvZHdhcmYycmVh ZC5jDQo+ID4gaW5kZXggODk0ZTZhMC4uOTJhOWM0OSAxMDA2NDQNCj4gPiAt LS0gYS9nZGIvZHdhcmYycmVhZC5jDQo+ID4gKysrIGIvZ2RiL2R3YXJmMnJl YWQuYw0KPiA+IEBAIC03MDQyLDYgKzcwNDIsNyBAQCBwYXJ0aWFsX2RpZV9w YXJlbnRfc2NvcGUgKHN0cnVjdCBwYXJ0aWFsX2RpZV9pbmZvDQo+ICpwZGks DQo+ID4gICAgICAgIHJldHVybiBOVUxMOw0KPiA+ICAgICAgfQ0KPiA+DQo+ ID4gKyAgLyogSW50ZXJuYWwgKG5lc3RlZCkgc3Vicm91dGluZXMgaW4gRm9y dHJhbiBnZXQgYSBwcmVmaXguICAqLw0KPiA+ICAgIGlmIChwZGktPnRhZyA9 PSBEV19UQUdfZW51bWVyYXRvcikNCj4gPiAgICAgIC8qIEVudW1lcmF0b3Jz IHNob3VsZCBub3QgZ2V0IHRoZSBuYW1lIG9mIHRoZSBlbnVtZXJhdGlvbiBh cyBhDQo+IHByZWZpeC4gICovDQo+ID4gICAgICBwYXJlbnQtPnNjb3BlID0g Z3JhbmRwYXJlbnRfc2NvcGU7DQo+ID4gQEAgLTcwNTEsNyArNzA1MiwxMCBA QCBwYXJ0aWFsX2RpZV9wYXJlbnRfc2NvcGUgKHN0cnVjdCBwYXJ0aWFsX2Rp ZV9pbmZvDQo+ICpwZGksDQo+ID4gICAgICAgIHx8IHBhcmVudC0+dGFnID09 IERXX1RBR19jbGFzc190eXBlDQo+ID4gICAgICAgIHx8IHBhcmVudC0+dGFn ID09IERXX1RBR19pbnRlcmZhY2VfdHlwZQ0KPiA+ICAgICAgICB8fCBwYXJl bnQtPnRhZyA9PSBEV19UQUdfdW5pb25fdHlwZQ0KPiA+IC0gICAgICB8fCBw YXJlbnQtPnRhZyA9PSBEV19UQUdfZW51bWVyYXRpb25fdHlwZSkNCj4gPiAr ICAgICAgfHwgcGFyZW50LT50YWcgPT0gRFdfVEFHX2VudW1lcmF0aW9uX3R5 cGUNCj4gPiArICAgICAgfHwgKGN1LT5sYW5ndWFnZSA9PSBsYW5ndWFnZV9m b3J0cmFuDQo+ID4gKwkgICYmIHBhcmVudC0+dGFnID09IERXX1RBR19zdWJw cm9ncmFtDQo+ID4gKwkgICYmIHBkaS0+dGFnID09IERXX1RBR19zdWJwcm9n cmFtKSkNCj4gPiAgICAgIHsNCj4gPiAgICAgICAgaWYgKGdyYW5kcGFyZW50 X3Njb3BlID09IE5VTEwpDQo+ID4gIAlwYXJlbnQtPnNjb3BlID0gcGFyZW50 LT5uYW1lOw0KPiA+IEBAIC04NTYwLDggKzg1NjQsMTMgQEAgcHJvY2Vzc19k aWUgKHN0cnVjdCBkaWVfaW5mbyAqZGllLCBzdHJ1Y3QNCj4gZHdhcmYyX2N1 ICpjdSkNCj4gPiAgICAgIGNhc2UgRFdfVEFHX3R5cGVfdW5pdDoNCj4gPiAg ICAgICAgcmVhZF90eXBlX3VuaXRfc2NvcGUgKGRpZSwgY3UpOw0KPiA+ICAg ICAgICBicmVhazsNCj4gPiAtICAgIGNhc2UgRFdfVEFHX2VudHJ5X3BvaW50 Og0KPiA+ICAgICAgY2FzZSBEV19UQUdfc3VicHJvZ3JhbToNCj4gPiArICAg ICAgLyogSW50ZXJuYWwgc3VicHJvZ3JhbXMgaW4gRm9ydHJhbiBnZXQgYSBw cmVmaXguICAqLw0KPiA+ICsgICAgICBpZiAoY3UtPmxhbmd1YWdlID09IGxh bmd1YWdlX2ZvcnRyYW4NCj4gPiArCSAgJiYgZGllLT5wYXJlbnQgIT0gTlVM TA0KPiA+ICsJICAmJiBkaWUtPnBhcmVudC0+dGFnID09IERXX1RBR19zdWJw cm9ncmFtKQ0KPiA+ICsgICAgICBjdS0+cHJvY2Vzc2luZ19oYXNfbmFtZXNw YWNlX2luZm8gPSAxOw0KPiANCj4gV2UgbmVlZCBzb21lIGZhbGwtdGhyb3Vn aCBhbm5vdGF0aW9uIHRvIHN1cHByZXNzIHdhcm5pbmcgaW4gR0NDIDcuDQoN ClRoYW5rcywgZml4ZWQuDQoNCj4gPiArICAgIGNhc2UgRFdfVEFHX2VudHJ5 X3BvaW50Og0KPiA+ICAgICAgY2FzZSBEV19UQUdfaW5saW5lZF9zdWJyb3V0 aW5lOg0KPiA+ICAgICAgICByZWFkX2Z1bmNfc2NvcGUgKGRpZSwgY3UpOw0K PiA+ICAgICAgICBicmVhazsNCj4gPiBAQCAtMjAxNjksNiArMjAxNzgsMTkg QEAgZGV0ZXJtaW5lX3ByZWZpeCAoc3RydWN0IGRpZV9pbmZvICpkaWUsIHN0 cnVjdA0KPiBkd2FyZjJfY3UgKmN1KQ0KPiA+ICAJICAgICAgcmV0dXJuIFRZ UEVfVEFHX05BTUUgKHBhcmVudF90eXBlKTsNCj4gPiAgCSAgICByZXR1cm4g IiI7DQo+ID4gIAkgIH0NCj4gPiArICAgICAgY2FzZSBEV19UQUdfc3VicHJv Z3JhbToNCj4gPiArCS8qIE9ubHkgaW50ZXJuYWwgc3Vicm91dGluZXMgaW4g Rm9ydHJhbiBnZXQgYSBwcmVmaXggd2l0aCB0aGUgbmFtZQ0KPiA+ICsJICAg b2YgdGhlIHBhcmVudCdzIHN1YnJvdXRpbmUuICAqLw0KPiA+ICsJaWYgKGN1 LT5sYW5ndWFnZSA9PSBsYW5ndWFnZV9mb3J0cmFuKQ0KPiA+ICsJICB7DQo+ ID4gKwkgICAgaWYgKChkaWUtPnRhZyA9PSAgRFdfVEFHX3N1YnByb2dyYW0p DQo+ID4gKwkJJiYgKGR3YXJmMl9uYW1lIChwYXJlbnQsIGN1KSAhPSBOVUxM KSkNCj4gPiArCSAgICAgIHJldHVybiBkd2FyZjJfbmFtZSAocGFyZW50LCBj dSk7DQo+ID4gKwkgICAgZWxzZQ0KPiA+ICsJICAgICAgcmV0dXJuICIiOw0K PiA+ICsJICB9DQo+ID4gKwllbHNlDQo+ID4gKwkgIHJldHVybiBkZXRlcm1p bmVfcHJlZml4IChwYXJlbnQsIGN1KTsNCj4gPiAgCS8qIEZhbGwgdGhyb3Vn aC4gICovDQo+ID4gICAgICAgIGRlZmF1bHQ6DQo+ID4gIAlyZXR1cm4gZGV0 ZXJtaW5lX3ByZWZpeCAocGFyZW50LCBjdSk7DQo+ID4gZGlmZiAtLWdpdCBh L2dkYi90ZXN0c3VpdGUvZ2RiLmZvcnRyYW4vbmVzdGVkLWZ1bmNzLmV4cA0K PiBiL2dkYi90ZXN0c3VpdGUvZ2RiLmZvcnRyYW4vbmVzdGVkLWZ1bmNzLmV4 cA0KPiA+IGluZGV4IDRjMmVlMmEuLjBjOGE0MTYgMTAwNjQ0DQo+ID4gLS0t IGEvZ2RiL3Rlc3RzdWl0ZS9nZGIuZm9ydHJhbi9uZXN0ZWQtZnVuY3MuZXhw DQo+ID4gKysrIGIvZ2RiL3Rlc3RzdWl0ZS9nZGIuZm9ydHJhbi9uZXN0ZWQt ZnVuY3MuZXhwDQo+ID4gQEAgLTMxLDggKzMxLDggQEAgaWYgIVtydW50byBN QUlOX19dIHRoZW4gew0KPiA+ICB9DQo+ID4NCj4gPiAgIyBUZXN0IGlmIHdl IGNhbiBzZXQgYSBicmVha3BvaW50IGluIGEgbmVzdGVkIGZ1bmN0aW9uDQo+ ID4gLWdkYl9icmVha3BvaW50ICJzdWJfbmVzdGVkX291dGVyIg0KPiA+IC1n ZGJfY29udGludWVfdG9fYnJlYWtwb2ludCAic3ViX25lc3RlZF9vdXRlciIg Ii4qbG9jYWxfaW50ID0gMTkiDQo+ID4gK2dkYl9icmVha3BvaW50ICJ0ZXN0 bmVzdGVkZnVuY3M6OnN1Yl9uZXN0ZWRfb3V0ZXIiDQo+ID4gK2dkYl9jb250 aW51ZV90b19icmVha3BvaW50ICJ0ZXN0bmVzdGVkZnVuY3M6OnN1Yl9uZXN0 ZWRfb3V0ZXIiDQo+ICIuKmxvY2FsX2ludCA9IDE5Ig0KPiA+DQo+ID4gICMg VGVzdCBpZiB3ZSBjYW4gYWNjZXNzIGxvY2FsIGFuZA0KPiA+ICAjIG5vbi1s b2NhbCB2YXJpYWJsZXMgZGVmaW5lZCBvbmUgbGV2ZWwgdXAuDQo+ID4gQEAg LTQzLDEzICs0MywxNiBAQCBnZGJfdGVzdCAic2V0IGluZGV4ID0gNDIiDQo+ ID4gIGdkYl90ZXN0ICJwcmludCBpbmRleCIgIj0gNDIiICJwcmludCBpbmRl eCBhdCBCUF9vdXRlciwgbWFuaXB1bGF0ZWQiDQo+ID4gIGdkYl90ZXN0ICJw cmludCBsb2NhbF9pbnQiICI9IDE5IiAicHJpbnQgbG9jYWxfaW50IGluIG91 dGVyIGZ1bmN0aW9uIg0KPiA+DQo+ID4gKw0KPiANCj4gVW5uZWNlc3Nhcnkg Y2hhbmdlLCBtdWx0aXBsZSBpbnN0YW5jZXMuDQoNCkZpeGVkIGFzIHdlbGwu DQoNCj4gDQo+ID4gICMgTm9uLWxvY2FsIHZhcmlhYmxlIHNob3VsZCBiZSBh ZmZlY3RlZCBpbiBvbmUgZnJhbWUgdXAgYXMgd2VsbC4NCj4gPiAgZ2RiX3Rl c3QgInVwIg0KPiANCj4gDQo+IC0tDQo+IFlhbyAo6b2Q5bCnKQ0KDQpSZWdh cmRzLA0KVGltDQpJbnRlbCBEZXV0c2NobGFuZCBHbWJIClJlZ2lzdGVyZWQg QWRkcmVzczogQW0gQ2FtcGVvbiAxMC0xMiwgODU1NzkgTmV1YmliZXJnLCBH ZXJtYW55ClRlbDogKzQ5IDg5IDk5IDg4NTMtMCwgd3d3LmludGVsLmRlCk1h bmFnaW5nIERpcmVjdG9yczogQ2hyaXN0aW4gRWlzZW5zY2htaWQsIENocmlz dGlhbiBMYW1wcmVjaHRlcgpDaGFpcnBlcnNvbiBvZiB0aGUgU3VwZXJ2aXNv cnkgQm9hcmQ6IE5pY29sZSBMYXUKUmVnaXN0ZXJlZCBPZmZpY2U6IE11bmlj aApDb21tZXJjaWFsIFJlZ2lzdGVyOiBBbXRzZ2VyaWNodCBNdWVuY2hlbiBI UkIgMTg2OTI4Cg== >From gdb-patches-return-141469-listarch-gdb-patches=sources.redhat.com@sourceware.org Fri Sep 08 13:17:14 2017 Return-Path: Delivered-To: listarch-gdb-patches@sources.redhat.com Received: (qmail 85317 invoked by alias); 8 Sep 2017 13:17:13 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 85076 invoked by uid 89); 8 Sep 2017 13:17:13 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-7.4 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_2,MIME_BASE64_BLANKS,RP_MATCHES_RCVD,SPF_PASS autolearn=ham version=3.3.2 spammy=Tel, tel, commercial, office X-HELO: mga04.intel.com Received: from mga04.intel.com (HELO mga04.intel.com) (192.55.52.120) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 13:17:11 +0000 Received: from fmsmga002.fm.intel.com ([10.253.24.26]) by fmsmga104.fm.intel.com with ESMTP/TLS/DHE-RSA-AES256-GCM-SHA384; 08 Sep 2017 06:17:11 -0700 X-ExtLoop1: 1 Received: from irsmsx152.ger.corp.intel.com ([163.33.192.66]) by fmsmga002.fm.intel.com with ESMTP; 08 Sep 2017 06:17:10 -0700 Received: from irsmsx155.ger.corp.intel.com (163.33.192.3) by IRSMSX152.ger.corp.intel.com (163.33.192.66) with Microsoft SMTP Server (TLS) id 14.3.319.2; Fri, 8 Sep 2017 14:17:09 +0100 Received: from irsmsx105.ger.corp.intel.com ([169.254.7.75]) by irsmsx155.ger.corp.intel.com ([169.254.14.70]) with mapi id 14.03.0319.002; Fri, 8 Sep 2017 14:17:09 +0100 From: "Wiederhake, Tim" To: Yao Qi CC: "gdb-patches@sourceware.org" Subject: RE: [PATCH 3/4] fortran: Testsuite, fix typos in vla-value. Date: Fri, 08 Sep 2017 13:17:00 -0000 Message-ID: <9676A094AF46E14E8265E7A3F4CCE9AF63636937@irsmsx105.ger.corp.intel.com> References: <1503317966-12486-1-git-send-email-tim.wiederhake@intel.com> <1503317966-12486-4-git-send-email-tim.wiederhake@intel.com> <86ziaad28a.fsf@gmail.com> In-Reply-To: <86ziaad28a.fsf@gmail.com> dlp-product: dlpe-windows dlp-version: 11.0.0.116 dlp-reaction: no-action Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00203.txt.bz2 Content-length: 1298 VGhhbmtzIQ0KDQpQdXNoZWQgYXMgZTBmODY0MzVmOGIzYzYxZTIxMDcwYTIz MmEwN2MwMzkyOGMyZDU0NC4NCg0KVGltDQoNCj4gLS0tLS1PcmlnaW5hbCBN ZXNzYWdlLS0tLS0NCj4gRnJvbTogWWFvIFFpIFttYWlsdG86cWl5YW9sdGNA Z21haWwuY29tXQ0KPiBTZW50OiBNb25kYXksIFNlcHRlbWJlciA0LCAyMDE3 IDM6MjYgUE0NCj4gVG86IFdpZWRlcmhha2UsIFRpbSA8dGltLndpZWRlcmhh a2VAaW50ZWwuY29tPg0KPiBDYzogZ2RiLXBhdGNoZXNAc291cmNld2FyZS5v cmc7IEJlcm5oYXJkIEhlY2tlbA0KPiA8YmVybmhhcmQuaGVja2VsQGludGVs LmNvbT4NCj4gU3ViamVjdDogUmU6IFtQQVRDSCAzLzRdIGZvcnRyYW46IFRl c3RzdWl0ZSwgZml4IHR5cG9zIGluIHZsYS12YWx1ZS4NCj4gDQo+IFRpbSBX aWVkZXJoYWtlIDx0aW0ud2llZGVyaGFrZUBpbnRlbC5jb20+IHdyaXRlczoN Cj4gDQo+ID4gZ2RiL3Rlc3RzdWl0ZS9DaGFuZ2VMb2c6DQo+ID4gCSogZ2Ri LmZvcnRyYW4vdmxhLXB0eXBlLmV4cDogRml4IHR5cG9zLg0KPiA+IAkqIGdk Yi5mb3J0cmFuL3ZsYS12YWx1ZS5leHA6IFNhbWUuDQo+IA0KPiBJdCBpcyBv YnZpb3VzLiAgUGF0Y2ggaXMgZ29vZCB0byBtZS4NCj4gDQo+IC0tDQo+IFlh byAo6b2Q5bCnKQ0KSW50ZWwgRGV1dHNjaGxhbmQgR21iSApSZWdpc3RlcmVk IEFkZHJlc3M6IEFtIENhbXBlb24gMTAtMTIsIDg1NTc5IE5ldWJpYmVyZywg R2VybWFueQpUZWw6ICs0OSA4OSA5OSA4ODUzLTAsIHd3dy5pbnRlbC5kZQpN YW5hZ2luZyBEaXJlY3RvcnM6IENocmlzdGluIEVpc2Vuc2NobWlkLCBDaHJp c3RpYW4gTGFtcHJlY2h0ZXIKQ2hhaXJwZXJzb24gb2YgdGhlIFN1cGVydmlz b3J5IEJvYXJkOiBOaWNvbGUgTGF1ClJlZ2lzdGVyZWQgT2ZmaWNlOiBNdW5p Y2gKQ29tbWVyY2lhbCBSZWdpc3RlcjogQW10c2dlcmljaHQgTXVlbmNoZW4g SFJCIDE4NjkyOAo= >From gdb-patches-return-141468-listarch-gdb-patches=sources.redhat.com@sourceware.org Fri Sep 08 13:17:10 2017 Return-Path: Delivered-To: listarch-gdb-patches@sources.redhat.com Received: (qmail 83983 invoked by alias); 8 Sep 2017 13:17:09 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 83531 invoked by uid 89); 8 Sep 2017 13:17:09 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-7.5 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_2,MIME_BASE64_BLANKS,RP_MATCHES_RCVD,SPF_PASS autolearn=ham version=3.3.2 spammy=Tel, tel, commercial, office X-HELO: mga04.intel.com Received: from mga04.intel.com (HELO mga04.intel.com) (192.55.52.120) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 13:17:08 +0000 Received: from orsmga002.jf.intel.com ([10.7.209.21]) by fmsmga104.fm.intel.com with ESMTP/TLS/DHE-RSA-AES256-GCM-SHA384; 08 Sep 2017 06:16:45 -0700 X-ExtLoop1: 1 Received: from irsmsx108.ger.corp.intel.com ([163.33.3.3]) by orsmga002.jf.intel.com with ESMTP; 08 Sep 2017 06:16:44 -0700 Received: from irsmsx105.ger.corp.intel.com ([169.254.7.75]) by IRSMSX108.ger.corp.intel.com ([169.254.11.167]) with mapi id 14.03.0319.002; Fri, 8 Sep 2017 14:16:43 +0100 From: "Wiederhake, Tim" To: Yao Qi CC: "gdb-patches@sourceware.org" Subject: RE: [PATCH 2/4] Fortran: Testsuite, fix differences in type naming. Date: Fri, 08 Sep 2017 13:17:00 -0000 Message-ID: <9676A094AF46E14E8265E7A3F4CCE9AF63636928@irsmsx105.ger.corp.intel.com> References: <1503317966-12486-1-git-send-email-tim.wiederhake@intel.com> <1503317966-12486-3-git-send-email-tim.wiederhake@intel.com> <864lsieguc.fsf@gmail.com> In-Reply-To: <864lsieguc.fsf@gmail.com> dlp-product: dlpe-windows dlp-version: 11.0.0.116 dlp-reaction: no-action Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00202.txt.bz2 Content-length: 1603 VGhhbmtzIQ0KDQpGaXhlZCBhbmQgcHVzaGVkIGFzIDllOWFmNGJlOWY2NTZm ODI5MjJlNmFhZWIzYjY0MjE1MDg0MDNlYTQuDQoNClRpbQ0KDQo+IC0tLS0t T3JpZ2luYWwgTWVzc2FnZS0tLS0tDQo+IEZyb206IFlhbyBRaSBbbWFpbHRv OnFpeWFvbHRjQGdtYWlsLmNvbV0NCj4gU2VudDogTW9uZGF5LCBTZXB0ZW1i ZXIgNCwgMjAxNyAzOjI1IFBNDQo+IFRvOiBXaWVkZXJoYWtlLCBUaW0gPHRp bS53aWVkZXJoYWtlQGludGVsLmNvbT4NCj4gQ2M6IGdkYi1wYXRjaGVzQHNv dXJjZXdhcmUub3JnOyBCZXJuaGFyZCBIZWNrZWwNCj4gPGJlcm5oYXJkLmhl Y2tlbEBpbnRlbC5jb20+DQo+IFN1YmplY3Q6IFJlOiBbUEFUQ0ggMi80XSBG b3J0cmFuOiBUZXN0c3VpdGUsIGZpeCBkaWZmZXJlbmNlcyBpbiB0eXBlDQo+ IG5hbWluZy4NCj4gDQo+IFRpbSBXaWVkZXJoYWtlIDx0aW0ud2llZGVyaGFr ZUBpbnRlbC5jb20+IHdyaXRlczoNCj4gDQo+ID4gZ2RiL1Rlc3RzdWl0ZS9D aGFuZ2Vsb2c6DQo+IA0KPiBzL1Rlc3RzdWl0ZS90ZXN0c3VpdGUvDQo+IA0K PiA+IAkqIGdkYi5mb3J0cmFuL3ZsYS12YWx1ZS5leHA6IFVzZSB0eXBlIG5h bWVzIGRlZmluZWQgaW4NCj4gPiAJbGliZm9ydHJhbi4NCj4gDQo+ICJVc2Ug dHlwZSBuYW1lIGZyb20gZm9ydHJhbl9yZWFsNCIuDQo+IA0KPiA+IAkqIGdk Yi5taS9taS12YXItY2hpbGQtZi5leHA6IExpa2V3aXNlLg0KPiANCj4gIlVz ZSB0eXBlIG5hbWUgZnJvbSBmb3J0cmFuX2ludDQiLg0KPiANCj4gPiAJKiBn ZGIubWkvbWktdmxhLWZvcnRyYW4uZXhwOiBMaWtld2lzZS4NCj4gDQo+IG90 aGVyd2lzZSwgcGF0Y2ggaXMgZ29vZCB0byBtZS4NCj4gDQo+IC0tDQo+IFlh byAo6b2Q5bCnKQ0KSW50ZWwgRGV1dHNjaGxhbmQgR21iSApSZWdpc3RlcmVk IEFkZHJlc3M6IEFtIENhbXBlb24gMTAtMTIsIDg1NTc5IE5ldWJpYmVyZywg R2VybWFueQpUZWw6ICs0OSA4OSA5OSA4ODUzLTAsIHd3dy5pbnRlbC5kZQpN YW5hZ2luZyBEaXJlY3RvcnM6IENocmlzdGluIEVpc2Vuc2NobWlkLCBDaHJp c3RpYW4gTGFtcHJlY2h0ZXIKQ2hhaXJwZXJzb24gb2YgdGhlIFN1cGVydmlz b3J5IEJvYXJkOiBOaWNvbGUgTGF1ClJlZ2lzdGVyZWQgT2ZmaWNlOiBNdW5p Y2gKQ29tbWVyY2lhbCBSZWdpc3RlcjogQW10c2dlcmljaHQgTXVlbmNoZW4g SFJCIDE4NjkyOAo= >From gdb-patches-return-141470-listarch-gdb-patches=sources.redhat.com@sourceware.org Fri Sep 08 13:18:28 2017 Return-Path: Delivered-To: listarch-gdb-patches@sources.redhat.com Received: (qmail 89564 invoked by alias); 8 Sep 2017 13:18:28 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 89553 invoked by uid 89); 8 Sep 2017 13:18:27 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-7.4 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_2,MIME_BASE64_BLANKS,RP_MATCHES_RCVD,SPF_PASS autolearn=ham version=3.3.2 spammy=Tel, tel, commercial, office X-HELO: mga14.intel.com Received: from mga14.intel.com (HELO mga14.intel.com) (192.55.52.115) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 13:18:21 +0000 Received: from fmsmga005.fm.intel.com ([10.253.24.32]) by fmsmga103.fm.intel.com with ESMTP/TLS/DHE-RSA-AES256-GCM-SHA384; 08 Sep 2017 06:18:20 -0700 X-ExtLoop1: 1 Received: from irsmsx154.ger.corp.intel.com ([163.33.192.96]) by fmsmga005.fm.intel.com with ESMTP; 08 Sep 2017 06:18:19 -0700 Received: from irsmsx105.ger.corp.intel.com ([169.254.7.75]) by IRSMSX154.ger.corp.intel.com ([169.254.12.83]) with mapi id 14.03.0319.002; Fri, 8 Sep 2017 14:18:19 +0100 From: "Wiederhake, Tim" To: Yao Qi CC: "gdb-patches@sourceware.org" Subject: RE: [PATCH 4/4] Remove C/C++ relevant code in Fortran specific file. Date: Fri, 08 Sep 2017 13:18:00 -0000 Message-ID: <9676A094AF46E14E8265E7A3F4CCE9AF6363694F@irsmsx105.ger.corp.intel.com> References: <1503317966-12486-1-git-send-email-tim.wiederhake@intel.com> <1503317966-12486-5-git-send-email-tim.wiederhake@intel.com> <86vakyd1yt.fsf@gmail.com> In-Reply-To: <86vakyd1yt.fsf@gmail.com> dlp-product: dlpe-windows dlp-version: 11.0.0.116 dlp-reaction: no-action Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00204.txt.bz2 Content-length: 2180 VGhhbmtzIQ0KDQpDbGFyaWZpZWQgaW4gdGhlIGNvbW1pdCBtZXNzYWdlIHRo YXQgdGhlIG91dHB1dCBpcyB1bmNoYW5nZWQuIFB1c2hlZCBhcyA0Njk0MTJk ZDljY2M0ZGU1ODc0ZmQzMjk5YjEwNTgzM2YzNmIzNGNkLg0KDQpUaW0NCg0K PiAtLS0tLU9yaWdpbmFsIE1lc3NhZ2UtLS0tLQ0KPiBGcm9tOiBZYW8gUWkg W21haWx0bzpxaXlhb2x0Y0BnbWFpbC5jb21dDQo+IFNlbnQ6IE1vbmRheSwg U2VwdGVtYmVyIDQsIDIwMTcgMzozMiBQTQ0KPiBUbzogV2llZGVyaGFrZSwg VGltIDx0aW0ud2llZGVyaGFrZUBpbnRlbC5jb20+DQo+IENjOiBnZGItcGF0 Y2hlc0Bzb3VyY2V3YXJlLm9yZzsgV2Vpbm1hbm4sIENocmlzdG9waCBUDQo+ IDxjaHJpc3RvcGgudC53ZWlubWFubkBpbnRlbC5jb20+DQo+IFN1YmplY3Q6 IFJlOiBbUEFUQ0ggNC80XSBSZW1vdmUgQy9DKysgcmVsZXZhbnQgY29kZSBp biBGb3J0cmFuIHNwZWNpZmljDQo+IGZpbGUuDQo+IA0KPiBUaW0gV2llZGVy aGFrZSA8dGltLndpZWRlcmhha2VAaW50ZWwuY29tPiB3cml0ZXM6DQo+IA0K PiA+IFJlbW92ZSBjb2RlIHJlbGV2YW50IGZvciBwcmludGluZyBDL0MrKyBJ bnRlZ2VyIHZhbHVlcyBpbiBhDQo+ID4gRm9ydHJhbiBzcGVjaWZpYyBmaWxl IHRvIHVuaWZ5IHByaW50aW5nIG9mIEZvcnRyYW4gdmFsdWVzLg0KPiANCj4g RG9lcyB0aGlzIHBhdGNoIGFmZmVjdCB0aGUgb3V0cHV0IG9mIHByaW50aW5n IHZhcmlhYmxlcyBpbiBGb3J0cmFuPw0KPiBJZiBzbywgaG93IGRvZXMgaXQg YWZmZWN0IHRoZSBvdXRwdXQ/ICBJdCB3b3VsZCBiZSBncmVhdCB0byBtZW50 aW9uDQo+IHRoZXNlIGNoYW5nZXMgaW4gY29tbWl0IGxvZywgYXQgbGVhc3Qu DQo+IA0KPiA+DQo+ID4geHh4eC15eS16eiAgQ2hyaXN0b3BoIFdlaW5tYW5u ICA8Y2hyaXN0b3BoLnQud2Vpbm1hbm5AaW50ZWwuY29tPg0KPiA+DQo+ID4g Z2RiL0NoYW5nZUxvZzoNCj4gPg0KPiA+IAkqIGYtdmFscHJpbnQuYyAoZl92 YWxfcHJpbnQpOiBSZW1vdmUgY2hlY2sgZm9yIG9uZSBieXRlDQo+ID4gCXNp emVkIGludGVnZXJzLiBSZW1vdmUgcHJpbnRpbmcgb2YgY2hhcmFjdGVyIHR5 cGUuDQo+ID4NCj4gPiBnZGIvdGVzdHN1aXRlL0NoYW5nZUxvZzoNCj4gPg0K PiA+IAkqIGdkYi5mb3J0cmFuL3ByaW50aW5nLXR5cGVzLmV4cDogTmV3IGZp bGUuDQo+IA0KPiBnZGIuZm9ydHJhbi9wcmludGluZy10eXBlcy5mOTAuDQo+ IA0KPiA+IAkqIGdkYi5mb3J0cmFuL3ByaW50aW5nLXR5cGVzLmV4cDogTmV3 IGZpbGUuDQo+IA0KPiAtLQ0KPiBZYW8gKOm9kOWwpykNCkludGVsIERldXRz Y2hsYW5kIEdtYkgKUmVnaXN0ZXJlZCBBZGRyZXNzOiBBbSBDYW1wZW9uIDEw LTEyLCA4NTU3OSBOZXViaWJlcmcsIEdlcm1hbnkKVGVsOiArNDkgODkgOTkg ODg1My0wLCB3d3cuaW50ZWwuZGUKTWFuYWdpbmcgRGlyZWN0b3JzOiBDaHJp c3RpbiBFaXNlbnNjaG1pZCwgQ2hyaXN0aWFuIExhbXByZWNodGVyCkNoYWly cGVyc29uIG9mIHRoZSBTdXBlcnZpc29yeSBCb2FyZDogTmljb2xlIExhdQpS ZWdpc3RlcmVkIE9mZmljZTogTXVuaWNoCkNvbW1lcmNpYWwgUmVnaXN0ZXI6 IEFtdHNnZXJpY2h0IE11ZW5jaGVuIEhSQiAxODY5MjgK >From gdb-patches-return-141471-listarch-gdb-patches=sources.redhat.com@sourceware.org Fri Sep 08 13:19:18 2017 Return-Path: Delivered-To: listarch-gdb-patches@sources.redhat.com Received: (qmail 91069 invoked by alias); 8 Sep 2017 13:19:18 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 91058 invoked by uid 89); 8 Sep 2017 13:19:17 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-7.4 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_2,MIME_BASE64_BLANKS,RP_MATCHES_RCVD,SPF_PASS autolearn=ham version=3.3.2 spammy=Tel, tel X-HELO: mga06.intel.com Received: from mga06.intel.com (HELO mga06.intel.com) (134.134.136.31) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 13:19:16 +0000 Received: from orsmga001.jf.intel.com ([10.7.209.18]) by orsmga104.jf.intel.com with ESMTP; 08 Sep 2017 06:16:15 -0700 X-ExtLoop1: 1 Received: from irsmsx106.ger.corp.intel.com ([163.33.3.31]) by orsmga001.jf.intel.com with ESMTP; 08 Sep 2017 06:16:15 -0700 Received: from irsmsx105.ger.corp.intel.com ([169.254.7.75]) by IRSMSX106.ger.corp.intel.com ([169.254.8.36]) with mapi id 14.03.0319.002; Fri, 8 Sep 2017 14:16:14 +0100 From: "Wiederhake, Tim" To: Yao Qi CC: "gdb-patches@sourceware.org" Subject: RE: [PATCH 1/4] Fix indentation for printing Fortran types with pointers Date: Fri, 08 Sep 2017 13:19:00 -0000 Message-ID: <9676A094AF46E14E8265E7A3F4CCE9AF63636919@irsmsx105.ger.corp.intel.com> References: <1503317966-12486-1-git-send-email-tim.wiederhake@intel.com> <1503317966-12486-2-git-send-email-tim.wiederhake@intel.com> <86r2vmd1sg.fsf@gmail.com> In-Reply-To: <86r2vmd1sg.fsf@gmail.com> dlp-product: dlpe-windows dlp-version: 11.0.0.116 dlp-reaction: no-action Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00205.txt.bz2 Content-length: 1794 VGhhbmtzIQ0KDQpQdXNoZWQgYXMgYTVhZDIzMmIzZTZmMzljZjI5NTVhOGVj M2FhNDM1NTM1OWE5ZjcyZS4NCg0KVGltDQoNCj4gLS0tLS1PcmlnaW5hbCBN ZXNzYWdlLS0tLS0NCj4gRnJvbTogWWFvIFFpIFttYWlsdG86cWl5YW9sdGNA Z21haWwuY29tXQ0KPiBTZW50OiBNb25kYXksIFNlcHRlbWJlciA0LCAyMDE3 IDM6MzYgUE0NCj4gVG86IFdpZWRlcmhha2UsIFRpbSA8dGltLndpZWRlcmhh a2VAaW50ZWwuY29tPg0KPiBDYzogZ2RiLXBhdGNoZXNAc291cmNld2FyZS5v cmc7IFBlbmN6ZWssIEZyYW5rIDxmcmFuay5wZW5jemVrQGludGVsLmNvbT4N Cj4gU3ViamVjdDogUmU6IFtQQVRDSCAxLzRdIEZpeCBpbmRlbnRhdGlvbiBm b3IgcHJpbnRpbmcgRm9ydHJhbiB0eXBlcyB3aXRoDQo+IHBvaW50ZXJzDQo+ IA0KPiBUaW0gV2llZGVyaGFrZSA8dGltLndpZWRlcmhha2VAaW50ZWwuY29t PiB3cml0ZXM6DQo+IA0KPiA+IHh4eHgteXktenogIEZyYW5rIFBlbmN6ZWsg IDxmcmFuay5wZW5jemVrQGludGVsLmNvbT4NCj4gPiAgICAgICAgICAgICBD aHJpc3RvcGggV2Vpbm1hbm4gIDxjaHJpc3RvcGgudC53ZWlubWFubkBpbnRl bC5jb20+DQo+ID4gICAgICAgICAgICAgQmVybmhhcmQgSGVja2VsICA8YmVy bmhhcmQuaGVja2VsQGludGVsLmNvbT4NCj4gPg0KPiA+IGdkYi9DaGFuZ2VM b2c6DQo+ID4NCj4gPiAJKiBmLXR5cGVwcmludC5jIChmX3R5cGVfcHJpbnRf YmFzZSk6IFVzZSBmcHJpbnRmaV9maWx0ZXJlZA0KPiA+IAl0byBtYWludGFp biBwcm9wZXIgaW5kZW50YXRpb24gd2hlbiBwcmludGluZyBwb2ludGVycy9y ZWZzLg0KPiA+DQo+ID4gdGVzdHN1aXRlL0NoYW5nZUxvZw0KPiA+DQo+ID4g CSogZ2RiLmZvcnRyYW4vcHRyLWluZGVudGF0aW9uLmY5MDogTmV3IGZpbGUu DQo+ID4gCSogZ2RiLmZvcnRyYW4vcHRyLWluZGVudGF0aW9uLmV4cDogTmV3 IGZpbGUuDQo+IA0KPiBQYXRjaCBpcyBnb29kIHRvIG1lLg0KPiANCj4gLS0N Cj4gWWFvICjpvZDlsKcpDQpJbnRlbCBEZXV0c2NobGFuZCBHbWJIClJlZ2lz dGVyZWQgQWRkcmVzczogQW0gQ2FtcGVvbiAxMC0xMiwgODU1NzkgTmV1Ymli ZXJnLCBHZXJtYW55ClRlbDogKzQ5IDg5IDk5IDg4NTMtMCwgd3d3LmludGVs LmRlCk1hbmFnaW5nIERpcmVjdG9yczogQ2hyaXN0aW4gRWlzZW5zY2htaWQs IENocmlzdGlhbiBMYW1wcmVjaHRlcgpDaGFpcnBlcnNvbiBvZiB0aGUgU3Vw ZXJ2aXNvcnkgQm9hcmQ6IE5pY29sZSBMYXUKUmVnaXN0ZXJlZCBPZmZpY2U6 IE11bmljaApDb21tZXJjaWFsIFJlZ2lzdGVyOiBBbXRzZ2VyaWNodCBNdWVu Y2hlbiBIUkIgMTg2OTI4Cg== >From gdb-patches-return-141477-listarch-gdb-patches=sources.redhat.com@sourceware.org Fri Sep 08 13:33:39 2017 Return-Path: Delivered-To: listarch-gdb-patches@sources.redhat.com Received: (qmail 23588 invoked by alias); 8 Sep 2017 13:33:39 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 23548 invoked by uid 89); 8 Sep 2017 13:33:38 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-25.6 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_0,GIT_PATCH_1,GIT_PATCH_2,GIT_PATCH_3,KAM_LAZY_DOMAIN_SECURITY,RP_MATCHES_RCVD autolearn=ham version=3.3.2 spammy=3200, 2200 X-HELO: mga14.intel.com Received: from mga14.intel.com (HELO mga14.intel.com) (192.55.52.115) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 08 Sep 2017 13:33:31 +0000 Received: from fmsmga006.fm.intel.com ([10.253.24.20]) by fmsmga103.fm.intel.com with ESMTP/TLS/DHE-RSA-AES256-GCM-SHA384; 08 Sep 2017 06:33:28 -0700 X-ExtLoop1: 1 Received: from irvmail001.ir.intel.com ([163.33.26.43]) by fmsmga006.fm.intel.com with ESMTP; 08 Sep 2017 06:33:27 -0700 Received: from ulvlx001.iul.intel.com (ulvlx001.iul.intel.com [172.28.207.17]) by irvmail001.ir.intel.com (8.14.3/8.13.6/MailSET/Hub) with ESMTP id v88DXQ20024578; Fri, 8 Sep 2017 14:33:26 +0100 Received: from ulvlx001.iul.intel.com (localhost [127.0.0.1]) by ulvlx001.iul.intel.com with ESMTP id v88DXQvo022712; Fri, 8 Sep 2017 15:33:26 +0200 Received: (from twiederh@localhost) by ulvlx001.iul.intel.com with LOCAL id v88DXQL3022708; Fri, 8 Sep 2017 15:33:26 +0200 From: Tim Wiederhake To: gdb-patches@sourceware.org Cc: qiyaoltc@gmail.com, Bernhard Heckel Subject: [PATCH v4 2/5] Fortran: Accessing fields of inherited types via fully qualified name. Date: Fri, 08 Sep 2017 13:33:00 -0000 Message-Id: <1504877571-22441-3-git-send-email-tim.wiederhake@intel.com> In-Reply-To: <1504877571-22441-1-git-send-email-tim.wiederhake@intel.com> References: <1504877571-22441-1-git-send-email-tim.wiederhake@intel.com> X-IsSubscribed: yes X-SW-Source: 2017-09/txt/msg00209.txt.bz2 Content-length: 7596 From: Bernhard Heckel Fortran 2003 supports type extension. This patch allows access to inherited members by using it's fully qualified name as described in the Fortran Standard. Before: (gdb) print my_extended_obj%base_class_name%member_base Syntax error near base_class_name%member_base (gdb) print my_extended_obj%member_base $1 = (10, 10, 10) After: (gdb) print my_extended_obj%base_clase_name%member_base $1 = (10, 10, 10) (gdb) print my_extended_obj%member_base $1 = (10, 10, 10) xxxx-yy-zz Bernhard Heckel gdb/ChangeLog: * f-exp.y (name): Allow TYPENAME. * valops.c (search_struct_method): Look also for baseclass. gdb/testsuite/ChangeLog: * gdb.fortran/oop_extend_type.f90: New file. * gdb.fortran/oop_extend_type.exp: New file. --- gdb/f-exp.y | 7 +- gdb/testsuite/gdb.fortran/oop_extend_type.exp | 97 +++++++++++++++++++++++++++ gdb/testsuite/gdb.fortran/oop_extend_type.f90 | 56 ++++++++++++++++ gdb/valops.c | 6 ++ 4 files changed, 164 insertions(+), 2 deletions(-) create mode 100644 gdb/testsuite/gdb.fortran/oop_extend_type.exp create mode 100644 gdb/testsuite/gdb.fortran/oop_extend_type.f90 diff --git a/gdb/f-exp.y b/gdb/f-exp.y index 8dcc811..4870bdc 100644 --- a/gdb/f-exp.y +++ b/gdb/f-exp.y @@ -608,8 +608,11 @@ nonempty_typelist } ; -name : NAME - { $$ = $1.stoken; } +name + : NAME + { $$ = $1.stoken; } + | TYPENAME + { $$ = $1.stoken; } ; name_not_typename : NAME diff --git a/gdb/testsuite/gdb.fortran/oop_extend_type.exp b/gdb/testsuite/gdb.fortran/oop_extend_type.exp new file mode 100644 index 0000000..162a23b --- /dev/null +++ b/gdb/testsuite/gdb.fortran/oop_extend_type.exp @@ -0,0 +1,97 @@ +# Copyright 2017 Free Software Foundation, Inc. +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see . + +standard_testfile ".f90" +load_lib "fortran.exp" + +if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} \ + {debug f90 quiet}] } { + return -1 +} + +if ![runto MAIN__] { + untested "could not run to breakpoint MAIN__" + return -1 +} + +# Depending on the compiler being used, the type names can be printed +# differently. +set real [fortran_real4] + +gdb_breakpoint [gdb_get_line_number "! Before vla allocation"] +gdb_continue_to_breakpoint "! Before vla allocation" ".*! Before vla allocation" +gdb_test "whatis wp_vla" "type = " + +gdb_breakpoint [gdb_get_line_number "! After value assignment"] +gdb_continue_to_breakpoint "! After value assignment" ".*! After value assignment" +set test "p wp%coo" +gdb_test_multiple "$test" "$test" { + -re " = \\(1, 2, 1\\)\r\n$gdb_prompt $" { + pass "$test" + } + -re "There is no member named coo.\r\n$gdb_prompt $" { + xfail "gcc/49475" + } +} +gdb_test "p wp%point%coo" " = \\(1, 2, 1\\)" +gdb_test "p wp%point" " = \\( coo = \\(1, 2, 1\\) \\)" +gdb_test "p wp" " = \\( point = \\( coo = \\(1, 2, 1\\) \\), angle = 100 \\)" + +gdb_test "whatis wp" "type = Type waypoint" +gdb_test "ptype wp" \ + [multi_line "type = Type waypoint" \ + " Type point :: point" \ + " $real :: angle" \ + "End Type waypoint"] +set test "ptype wp%coo" +gdb_test_multiple "$test" "$test" { + -re "$real \\(3\\)\r\n$gdb_prompt $" { + pass "$test" + } + -re "There is no member named coo.\r\n$gdb_prompt $" { + xfail "gcc/49475" + } +} +gdb_test "ptype wp%point%coo" "$real \\(3\\)" + +set test "p wp_vla(1)%coo" +gdb_test_multiple "$test" "$test" { + -re " = \\(10, 12, 10\\)\r\n$gdb_prompt $" { + pass "$test" + } + -re "There is no member named coo.\r\n$gdb_prompt $" { + xfail "gcc/49475" + } +} +gdb_test "p wp_vla(1)%point%coo" " = \\(10, 12, 10\\)" +gdb_test "p wp_vla(1)%point" " = \\( coo = \\(10, 12, 10\\) \\)" +gdb_test "p wp_vla(1)" " = \\( point = \\( coo = \\(10, 12, 10\\) \\), angle = 101 \\)" + +gdb_test "whatis wp_vla" "type = Type waypoint \\(3\\)" +gdb_test "ptype wp_vla" \ + [multi_line "type = Type waypoint" \ + " Type point :: point" \ + " $real :: angle" \ + "End Type waypoint \\(3\\)"] +set test "ptype wp_vla(1)%coo" +gdb_test_multiple "$test" "$test" { + -re "$real \\(3\\)\r\n$gdb_prompt $" { + pass "$test" + } + -re "There is no member named coo.\r\n$gdb_prompt $" { + xfail "gcc/49475" + } +} +gdb_test "ptype wp_vla(1)%point%coo" "$real \\(3\\)" diff --git a/gdb/testsuite/gdb.fortran/oop_extend_type.f90 b/gdb/testsuite/gdb.fortran/oop_extend_type.f90 new file mode 100644 index 0000000..95bf4d5 --- /dev/null +++ b/gdb/testsuite/gdb.fortran/oop_extend_type.f90 @@ -0,0 +1,56 @@ +! Copyright 2017 Free Software Foundation, Inc. +! +! This program is free software; you can redistribute it and/or modify +! it under the terms of the GNU General Public License as published by +! the Free Software Foundation; either version 3 of the License, or +! (at your option) any later version. +! +! This program is distributed in the hope that it will be useful, +! but WITHOUT ANY WARRANTY; without even the implied warranty of +! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +! GNU General Public License for more details. +! +! You should have received a copy of the GNU General Public License +! along with this program. If not, see . + +module testmod + implicit none + type :: point + real :: coo(3) + end type + + type, extends(point) :: waypoint + real :: angle + end type + +end module + +program testprog + use testmod + implicit none + + logical l + type(waypoint) :: wp + type(waypoint), allocatable :: wp_vla(:) + + l = allocated(wp_vla) + allocate(wp_vla(3)) ! Before vla allocation + + l = allocated(wp_vla) ! After vla allocation + wp%angle = 100.00 + wp%point%coo(:) = 1.00 + wp%point%coo(2) = 2.00 + + wp_vla(1)%angle = 101.00 + wp_vla(1)%point%coo(:) = 10.00 + wp_vla(1)%point%coo(2) = 12.00 + wp_vla(2)%angle = 102.00 + wp_vla(2)%point%coo(:) = 20.00 + wp_vla(2)%point%coo(2) = 22.00 + wp_vla(3)%angle = 103.00 + wp_vla(3)%point%coo(:) = 30.00 + wp_vla(3)%point%coo(2) = 32.00 + + print *, wp, wp_vla ! After value assignment + +end program diff --git a/gdb/valops.c b/gdb/valops.c index 19f96c8..c02d4fb 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -2187,6 +2187,12 @@ value_struct_elt (struct value **argp, struct value **args, if (v) return v; + /* fortran: If it is not a field it is the + type name of an inherited structure. */ + v = search_struct_field (name, *argp, t, 1); + if (v) + return v; + /* C++: If it was not found as a data field, then try to return it as a pointer to a method. */ v = search_struct_method (name, argp, args, 0, -- 2.7.4