From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from cc-smtpout1.netcologne.de (cc-smtpout1.netcologne.de [89.1.8.211]) by sourceware.org (Postfix) with ESMTPS id 45ADB3861802 for ; Mon, 21 Dec 2020 13:04:44 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org 45ADB3861802 Received: from cc-smtpin2.netcologne.de (cc-smtpin2.netcologne.de [89.1.8.202]) by cc-smtpout1.netcologne.de (Postfix) with ESMTP id 38933131AD; Mon, 21 Dec 2020 14:04:42 +0100 (CET) Received: from localhost (localhost [127.0.0.1]) by cc-smtpin2.netcologne.de (Postfix) with ESMTP id 2724F11EA8; Mon, 21 Dec 2020 14:04:42 +0100 (CET) Received: from [2001:4dd7:c9b8:0:b87a:57e9:5345:9efe] (helo=cc-smtpin2.netcologne.de) by localhost with ESMTP (eXpurgate 4.11.6) (envelope-from ) id 5fe09d6a-024d-7f0000012729-7f000001e9f8-1 for ; Mon, 21 Dec 2020 14:04:42 +0100 Received: from linux.fritz.box (2001-4dd7-c9b8-0-b87a-57e9-5345-9efe.ipv6dyn.netcologne.de [IPv6:2001:4dd7:c9b8:0:b87a:57e9:5345:9efe]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits) server-digest SHA256) (No client certificate requested) by cc-smtpin2.netcologne.de (Postfix) with ESMTPSA; Mon, 21 Dec 2020 14:04:40 +0100 (CET) Subject: Re: Update on shared memory coarrays To: dhumieres.dominique@free.fr Cc: fortran@gcc.gnu.org References: <3d57a473-4025-890d-d365-6c2f82e7f513@netcologne.de> <0e1c519febec1c47c411339269455b9d@free.fr> <7e332e70-246e-b44e-7689-477642bf114c@netcologne.de> <23f5fbb548e75b1a5029162b31a8ddd7@free.fr> <522f101eda4e212f98f1f071165a46e5@free.fr> From: Thomas Koenig Message-ID: Date: Mon, 21 Dec 2020 14:04:40 +0100 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.5.0 MIME-Version: 1.0 In-Reply-To: <522f101eda4e212f98f1f071165a46e5@free.fr> Content-Type: text/plain; charset=utf-8; format=flowed Content-Language: de-DE Content-Transfer-Encoding: 8bit X-Spam-Status: No, score=-4.6 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, NICE_REPLY_A, RCVD_IN_DNSWL_LOW, RCVD_IN_MSPIKE_H3, RCVD_IN_MSPIKE_WL, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.2 X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on server2.sourceware.org X-BeenThere: fortran@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Fortran mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 21 Dec 2020 13:04:45 -0000 Hi Dominique, > program hello_world > implicit none >   write(*,*) 'Hello world from ', & >    this_image() , 'of', num_images() > end program hello_world > > does end, apparently looping in _gfortrani_shared_memory_init . Is it possible to debug this further? It works fine on Linux: $ cat > hello.f90 program hello_world implicit none write(*,*) 'Hello world from ', & this_image() , 'of', num_images() end program hello_world $ make hello gfortran -S -O0 -Wall -fdump-tree-optimized -fdump-tree-original -fcoarray=shared -pthread -ggdb3 -fverbose-asm hello.f90 gfortran -c -O0 -Wall -fdump-tree-optimized -fdump-tree-original -fcoarray=shared -pthread -ggdb3 -fverbose-asm hello.s gfortran -O0 -Wall -fdump-tree-optimized -fdump-tree-original -fcoarray=shared -pthread -ggdb3 -fverbose-asm hello.o -o hello /home/ig25/lib64/gcc/x86_64-pc-linux-gnu/11.0.0/libcaf_shared.a -lrt $ ./hello Hello world from 14 of 16 Hello world from 10 of 16 Hello world from 16 of 16 Hello world from 7 of 16 Hello world from 9 of 16 Hello world from 2 of 16 Hello world from 5 of 16 Hello world from 4 of 16 Hello world from 13 of 16 Hello world from 15 of 16 Hello world from 1 of 16 Hello world from 8 of 16 Hello world from 3 of 16 Hello world from 6 of 16 Hello world from 12 of 16 Hello world from 11 of 16 Like I said, hard to debug such a thing without access to the system :-( Best regards Thomas