From patchwork Sun Nov 15 18:14:34 2015 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: =?utf-8?q?Andris_Pav=C4=93nis?= X-Patchwork-Id: 544859 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]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by ozlabs.org (Postfix) with ESMTPS id 077061402D5 for ; Mon, 16 Nov 2015 05:14:50 +1100 (AEDT) Authentication-Results: ozlabs.org; dkim=pass (1024-bit key; unprotected) header.d=gcc.gnu.org header.i=@gcc.gnu.org header.b=xLNrH7Ny; dkim-atps=neutral DomainKey-Signature: a=rsa-sha1; c=nofws; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender:from :subject:to:message-id:date:mime-version:content-type; q=dns; s= default; b=T9ve1K/DZOZ4IUKP4wOuklMXPlueQZQSdJ6QZ1B27HaXIhL+h+Q0I 9KU/vJyHjRwwmEZBhnAsPrks2DQAhfOHGSiNchz/Nu+myU/c5w3Sd4CdYs2MD77h t+kl4QQ3g+DXYYG89PqvL+B1JgkbyLPHd50gqnlJFsUyDNU77bPcYE= DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender:from :subject:to:message-id:date:mime-version:content-type; s= default; bh=1HROg8iRMjy3DaE0Qj2zCvY4kJ8=; b=xLNrH7NyxpK71lUIVKB4 12NXdKVPbIjaYvvEEJ3Px8DofyREsCjKBHsjUD+Wrm9BkM2IkYgAGVzqyKwm9/4i 7kB9QX3kWuQwHp85Bf0seY6GL2Iz6jT0spW+gQgxNgC/mg48/OOuBte7URZINnB0 o1Tj97Pi6SdPO5NOOCYpWZ8= Received: (qmail 42888 invoked by alias); 15 Nov 2015 18:14:44 -0000 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 Received: (qmail 42879 invoked by uid 89); 15 Nov 2015 18:14:43 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=0.2 required=5.0 tests=AWL, BAYES_20, RCVD_IN_DNSWL_NONE, SPF_NEUTRAL autolearn=no version=3.3.2 X-HELO: julia1.inet.fi Received: from mta-out1.inet.fi (HELO julia1.inet.fi) (62.71.2.234) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Sun, 15 Nov 2015 18:14:41 +0000 Received: from ap.localhost.localdomain (84.249.219.59) by julia1.inet.fi (9.0.002.03-2-gbe5d057) (authenticated as pavean-2) id 5613C7B1010B0B95; Sun, 15 Nov 2015 20:13:05 +0200 From: Andris Pavenis Subject: [PATCH][DJGPP][libgfortran] Do not use S_ISVTX for DJGPP in libfortran/intrinsic/chmod.c To: GCC Patches , DJ Delorie Message-ID: <5648CB8A.9050407@iki.fi> Date: Sun, 15 Nov 2015 20:14:34 +0200 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:38.0) Gecko/20100101 Thunderbird/38.3.0 MIME-Version: 1.0 DJGPP do not have S_ISVTX defined. Therefore its use should be avoided. Attached patch updates existing preprocessor conditional constructions not to use S_ISVTX also for DJGPP Andris 2015-11-15 Andris Pavenis * libgfortran/intrinsics/chmod.c (chmod_internal): do not use S_ISVTX for DJGPP target From 09606704601c67d87ab69c0ee1da140b8f2d984d Mon Sep 17 00:00:00 2001 From: Andris Pavenis Date: Sat, 14 Nov 2015 19:37:36 +0200 Subject: [PATCH] [DJGPP] libgfortran/intrinsic/chmod.c: avoid using S_ISVTX for DJGPP --- libgfortran/intrinsics/chmod.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/libgfortran/intrinsics/chmod.c b/libgfortran/intrinsics/chmod.c index 1fffa3d..482a8a6 100644 --- a/libgfortran/intrinsics/chmod.c +++ b/libgfortran/intrinsics/chmod.c @@ -451,7 +451,7 @@ clause_done: if ((ugo[2] || honor_umask) && !rwxXstugo[8]) file_mode = (file_mode & ~(S_IROTH | S_IWOTH | S_IXOTH)) | (new_mode & (S_IROTH | S_IWOTH | S_IXOTH)); -#ifndef __VXWORKS__ +#if !defined(__VXWORKS__) && !defined(__DJGPP__) if (is_dir && rwxXstugo[5]) file_mode |= S_ISVTX; else if (!is_dir) @@ -463,7 +463,7 @@ clause_done: { /* Clear '-'. */ file_mode &= ~new_mode; -#if !defined( __MINGW32__) && !defined (__VXWORKS__) +#if !defined( __MINGW32__) && !defined (__VXWORKS__) && !defined(__DJGPP__) if (rwxXstugo[5] || !is_dir) file_mode &= ~S_ISVTX; #endif @@ -471,7 +471,7 @@ clause_done: else if (set_mode == 3) { file_mode |= new_mode; -#if !defined (__MINGW32__) && !defined (__VXWORKS__) +#if !defined (__MINGW32__) && !defined (__VXWORKS__) && !defined(__DJGPP__) if (rwxXstugo[5] && is_dir) file_mode |= S_ISVTX; else if (!is_dir) -- 2.4.3