From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mail-qk1-x729.google.com (mail-qk1-x729.google.com [IPv6:2607:f8b0:4864:20::729]) by sourceware.org (Postfix) with ESMTPS id A94DD3858D35 for ; Sun, 26 Jul 2020 04:49:56 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org A94DD3858D35 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=sourceryinstitute.org Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=damian@sourceryinstitute.org Received: by mail-qk1-x729.google.com with SMTP id j187so12408303qke.11 for ; Sat, 25 Jul 2020 21:49:56 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=sourceryinstitute.org; s=google; h=mime-version:from:date:message-id:subject:to; bh=GFKhEHCmd60v4p/eJ3lUHKj4mGdshgYoqriqfgmoe7c=; b=f/M9UNCsRNex7L1DY2Iv7sFeyTH0GpqwRVfoO1GcwWA45VmcmRevt2FLhi+SDoz5uq 7Lmv7wBN52IuxolZ9su1h9uqWw8DepwrIr+8cV2DzPGFc5oUT0KKdvAaMgWpEfW+Wpaw IfIUSF8q1XGH1WRRVD05VJ0Eq+qWa9LchcQYXYUigALZJGPAsDAKCboYhlfTqLID50jv yeGZ91YgaPNk29LHsqpAo3gOWVGlXgmBg7JECJ/wWrQM3tgY+OaiyI9F8LMbhrdzFWij onKJnOHb4iNVqsKOYoSaN+kKOVZ0vdjvmjJVKD7pCmAORI3H5ycfynIF10jN2M8howf7 XhSg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=GFKhEHCmd60v4p/eJ3lUHKj4mGdshgYoqriqfgmoe7c=; b=eYlzGIeXtYrugG9DBUPl6+QQ8+SJXCUhlaeU2WDOKJZZLj2B4b+iubPBKKx5GU0il5 Cb6cp68eXuMLjzf6fyJWWVdYKAQrBFOXSmpr68nMCf8SiNIgHJv76fvDa1EntYLXyZ0X XLa42Jdqq7QpwBCurC4jvitiAV1D+GAlqdVOGFFQJUUT9OmNFIGjFC5z9sBZxzPhp4KV 82MhkdDgvoq6dUyMTSPYgDRjHIey9NsIhyjNCEnqFe06ovZolnwSJlivk0Y0UGD/3Kah r8ZA9I5op2ChcLTWrwqAc01GWhBh1xRhrhIcBMiFJjN6NGhmTqfqyl6Zu8SmNRdstIHS 4JhQ== X-Gm-Message-State: AOAM532rhpnxDTj3ZkA7b4Jyvx/Nll02Z26BROaoosmbz4jD+KvC9j9J 9et/d/D0ZTKCF4mk73MnVoDBEbjkmrdM4AKZIyMHKMZUm4l67w== X-Google-Smtp-Source: ABdhPJyq+oiycjXEJDa7BybCJcvNEYjIGX7cz/0i/ifDpn9MWs70V7bY3lmUKWyl+pNnLKrxb0PCPfnwlP9BXiwbLus= X-Received: by 2002:a37:aa56:: with SMTP id t83mr11968022qke.150.1595738995837; Sat, 25 Jul 2020 21:49:55 -0700 (PDT) MIME-Version: 1.0 From: Damian Rouson Date: Sat, 25 Jul 2020 21:49:45 -0700 Message-ID: Subject: To: gfortran X-Spam-Status: No, score=-2.2 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, HTML_MESSAGE, RCVD_IN_DNSWL_NONE, 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 Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable X-Content-Filtered-By: Mailman/MimeDel 2.1.29 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: Sun, 26 Jul 2020 04:49:57 -0000 I believe the gfortran error message below is incorrect. Gfotran 8, 9 and 10 give the same message. The code below compiles cleanly with the NAG Fortran compiler. Damian =C2=B1 cat shape-mismatch.f90 module foobar type foo contains procedure, nopass :: bar end type interface module subroutine bar(arg) character(len=3D*) arg(:) end subroutine end interface contains module procedure bar end procedure end module =C2=B1 gfortran -c shape-mismatch.f90 shape-mismatch.f90:12:22: 12 | module procedure bar | 1 Error: Shape mismatch in argument 'arg' at (1) =C2=B1 gfortran --version GNU Fortran (GCC) 10.1.0