From patchwork Thu Dec 9 16:04:47 2010 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Steve Kargl X-Patchwork-Id: 74922 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) by ozlabs.org (Postfix) with SMTP id 53560B6F14 for ; Fri, 10 Dec 2010 03:05:00 +1100 (EST) Received: (qmail 7906 invoked by alias); 9 Dec 2010 16:04:54 -0000 Received: (qmail 7888 invoked by uid 22791); 9 Dec 2010 16:04:53 -0000 X-SWARE-Spam-Status: No, hits=-2.0 required=5.0 tests=AWL, BAYES_00, T_RP_MATCHES_RCVD X-Spam-Check-By: sourceware.org Received: from troutmask.apl.washington.edu (HELO troutmask.apl.washington.edu) (128.208.78.105) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Thu, 09 Dec 2010 16:04:49 +0000 Received: from troutmask.apl.washington.edu (localhost.apl.washington.edu [127.0.0.1]) by troutmask.apl.washington.edu (8.14.4/8.14.4) with ESMTP id oB9G4lLo042855; Thu, 9 Dec 2010 08:04:47 -0800 (PST) (envelope-from sgk@troutmask.apl.washington.edu) Received: (from sgk@localhost) by troutmask.apl.washington.edu (8.14.4/8.14.4/Submit) id oB9G4lfQ042854; Thu, 9 Dec 2010 08:04:47 -0800 (PST) (envelope-from sgk) Date: Thu, 9 Dec 2010 08:04:47 -0800 From: Steve Kargl To: fortran@gcc.gnu.org, gcc-patches@gcc.gnu.org Subject: [PATCH, Fortran] Insert a missing space in an error message. Message-ID: <20101209160447.GA42841@troutmask.apl.washington.edu> Mime-Version: 1.0 Content-Disposition: inline User-Agent: Mutt/1.4.2.3i Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org Committed as obvious. Here's another missing space in an error message issue. 2010-12-09 Steven G. Kargl * check.c (gfc_check_sngl): Insert missing space in error message. Index: check.c =================================================================== --- check.c (revision 167643) +++ check.c (working copy) @@ -3343,7 +3343,7 @@ gfc_check_sngl (gfc_expr *a) return FAILURE; if ((a->ts.kind != gfc_default_double_kind) - && gfc_notify_std (GFC_STD_GNU, "GNU extension: non double precision" + && gfc_notify_std (GFC_STD_GNU, "GNU extension: non double precision " "REAL argument to %s intrinsic at %L", gfc_current_intrinsic, &a->where) == FAILURE) return FAILURE;