{"id":2222481,"url":"http://patchwork.ozlabs.org/api/patches/2222481/?format=json","web_url":"http://patchwork.ozlabs.org/project/gcc/patch/3413762.44csPzL39Z@fomalhaut/","project":{"id":17,"url":"http://patchwork.ozlabs.org/api/projects/17/?format=json","name":"GNU Compiler Collection","link_name":"gcc","list_id":"gcc-patches.gcc.gnu.org","list_email":"gcc-patches@gcc.gnu.org","web_url":null,"scm_url":null,"webscm_url":null,"list_archive_url":"","list_archive_url_format":"","commit_url_format":""},"msgid":"<3413762.44csPzL39Z@fomalhaut>","list_archive_url":null,"date":"2026-04-12T09:09:40","name":"[Ada] Fix maximum path length regression on Windows","commit_ref":null,"pull_url":null,"state":"new","archived":false,"hash":"c0237852bf269ffa0111f5a389edd5b4a6958b5e","submitter":{"id":78832,"url":"http://patchwork.ozlabs.org/api/people/78832/?format=json","name":"Eric Botcazou","email":"botcazou@adacore.com"},"delegate":null,"mbox":"http://patchwork.ozlabs.org/project/gcc/patch/3413762.44csPzL39Z@fomalhaut/mbox/","series":[{"id":499590,"url":"http://patchwork.ozlabs.org/api/series/499590/?format=json","web_url":"http://patchwork.ozlabs.org/project/gcc/list/?series=499590","date":"2026-04-12T09:09:40","name":"[Ada] Fix maximum path length regression on Windows","version":1,"mbox":"http://patchwork.ozlabs.org/series/499590/mbox/"}],"comments":"http://patchwork.ozlabs.org/api/patches/2222481/comments/","check":"pending","checks":"http://patchwork.ozlabs.org/api/patches/2222481/checks/","tags":{},"related":[],"headers":{"Return-Path":"<gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org>","X-Original-To":["incoming@patchwork.ozlabs.org","gcc-patches@gcc.gnu.org"],"Delivered-To":["patchwork-incoming@legolas.ozlabs.org","gcc-patches@gcc.gnu.org"],"Authentication-Results":["legolas.ozlabs.org;\n\tdkim=pass (2048-bit key;\n secure) header.d=adacore.com header.i=@adacore.com header.a=rsa-sha256\n header.s=google header.b=b8+eIYdQ;\n\tdkim-atps=neutral","legolas.ozlabs.org;\n spf=pass (sender SPF authorized) smtp.mailfrom=gcc.gnu.org\n (client-ip=2620:52:6:3111::32; helo=vm01.sourceware.org;\n envelope-from=gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org;\n receiver=patchwork.ozlabs.org)","sourceware.org;\n\tdkim=pass (2048-bit key,\n secure) header.d=adacore.com header.i=@adacore.com header.a=rsa-sha256\n header.s=google header.b=b8+eIYdQ","sourceware.org; dmarc=pass (p=quarantine dis=none)\n header.from=adacore.com","sourceware.org; spf=pass smtp.mailfrom=adacore.com","server2.sourceware.org;\n arc=none smtp.remote-ip=209.85.210.173"],"Received":["from vm01.sourceware.org (vm01.sourceware.org\n [IPv6:2620:52:6:3111::32])\n\t(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)\n\t key-exchange x25519 server-signature ECDSA (secp384r1) server-digest SHA384)\n\t(No client certificate requested)\n\tby legolas.ozlabs.org (Postfix) with ESMTPS id 4ftlB926vWz1yCx\n\tfor <incoming@patchwork.ozlabs.org>; Sun, 12 Apr 2026 19:10:23 +1000 (AEST)","from vm01.sourceware.org (localhost [127.0.0.1])\n\tby sourceware.org (Postfix) with ESMTP id 14DE14BA2E2A\n\tfor <incoming@patchwork.ozlabs.org>; Sun, 12 Apr 2026 09:10:15 +0000 (GMT)","from mail-pf1-f173.google.com (mail-pf1-f173.google.com\n [209.85.210.173])\n by sourceware.org (Postfix) with ESMTPS id A24154BA2E1E\n for <gcc-patches@gcc.gnu.org>; Sun, 12 Apr 2026 09:09:47 +0000 (GMT)","by mail-pf1-f173.google.com with SMTP id\n d2e1a72fcca58-82f33d28c1dso162031b3a.3\n for <gcc-patches@gcc.gnu.org>; Sun, 12 Apr 2026 02:09:47 -0700 (PDT)","from fomalhaut.localnet ([2a01:e0a:107c:2f10:e654:e8ff:fe8f:2ce6])\n by smtp.gmail.com with ESMTPSA id\n d2e1a72fcca58-82f0c377318sm7502408b3a.26.2026.04.12.02.09.44\n for <gcc-patches@gcc.gnu.org>\n (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);\n Sun, 12 Apr 2026 02:09:45 -0700 (PDT)"],"DKIM-Filter":["OpenDKIM Filter v2.11.0 sourceware.org 14DE14BA2E2A","OpenDKIM Filter v2.11.0 sourceware.org A24154BA2E1E"],"DMARC-Filter":"OpenDMARC Filter v1.4.2 sourceware.org A24154BA2E1E","ARC-Filter":"OpenARC Filter v1.0.0 sourceware.org A24154BA2E1E","ARC-Seal":"i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1775984987; cv=none;\n b=Dv9uK4vKqXMYUb/F1JbxWACSBeNOhrMmXi36fpm1RWlmCPB/+q+tGnsD6vrQOwTnkUgEcCiFuSE7MMalKWrV/SMZzqEXxUQHoSW8EceubHNwcAcJMUON0CavYdXjqt2JgJ6ndEd3FfYMYH+ecJ52gT7oXq+9uHyqeF1RaEdtwPs=","ARC-Message-Signature":"i=1; a=rsa-sha256; d=sourceware.org; s=key;\n t=1775984987; c=relaxed/simple;\n bh=tXT7nXrfQkVW5zd4z/1E4EXXqhnwrueHU/Wb7hSgla4=;\n h=DKIM-Signature:From:To:Subject:Date:Message-ID:MIME-Version;\n b=itaSKGxj29KDjC2Bd5PfKHaOTByZkAbVpSZMtTrBoCMiIxhN6L6O9qEuRoyYeFDxDXOJo3Mj04iWBsxeUCSPAKg39WIzRH0VbUMF/47lDvaI29ZRrFl/tpqGzamuF/zJ4Jgf8IxVenk7m3ud/VOtUkt/JBkYFzNqSGOVaPZ3L/8=","ARC-Authentication-Results":"i=1; server2.sourceware.org","DKIM-Signature":"v=1; a=rsa-sha256; c=relaxed/relaxed;\n d=adacore.com; s=google; t=1775984986; x=1776589786; darn=gcc.gnu.org;\n h=content-transfer-encoding:mime-version:message-id:date:subject:to\n :from:from:to:cc:subject:date:message-id:reply-to;\n bh=sPangmbXgCgFfaI7buwqzb64K8fBd6oXw2H2KcCVTRw=;\n b=b8+eIYdQFDvnoLQSMQMCw6xIZc9Nhhw38VL1coblImQSmG63rAnVNFrN/3ZJ0vKRgM\n S6e7WeVaIIfGp++uwVkBhSXVkALMm+BeBCma+WviEMGSsgjtNM94/w9J4YWvYX1LwIhA\n 43Kzx6Ftou6laAkWiQ+khdnBz+XKETzfZyrpLmFpk5nag/ODXTztfOSpYy5b1cxXCMUm\n Q3T6cT0oyakPyhxoAmrioKfY7sJE9ll1REpON9TxpbXoaxRQ6CpTeeB20CStVpqL7X0T\n YxIQ8qozX8nNNpwBkFH1UzoXbixVyUXN7wfM2L3FyOp1J/5bgxfc6QNmEOf54/HllJAy\n iojw==","X-Google-DKIM-Signature":"v=1; a=rsa-sha256; c=relaxed/relaxed;\n d=1e100.net; s=20251104; t=1775984986; x=1776589786;\n h=content-transfer-encoding:mime-version:message-id:date:subject:to\n :from:x-gm-gg:x-gm-message-state:from:to:cc:subject:date:message-id\n :reply-to;\n bh=sPangmbXgCgFfaI7buwqzb64K8fBd6oXw2H2KcCVTRw=;\n b=I0nXGKh41V6tYky2zeyo7ZOvCUUw3Y8VpVxZyhlDD+Eff2Q0MyJRj9NQmFPbbPGGts\n yFzXbzQ/3BZYVEPNil7XCOLelmFeeM2US8NoHWcEZio+aniqvOMWWUOabgCCjA65GT0N\n y+XOuat8gyuyxS/UzwZvSNlWfJ6wMEOVVuRV8SytnpvB21isqQ7j7uE9qR3mcAfaYQXd\n PBFEMLK4vSfF52jXNGfjHBc/PMj0mB+Ss5a3vUH+qpGiCkIIjSKaL0hYTfEqJy7rUL1G\n rkXEqogq9Dv2dLNWPfVNZuJWYEZCa5tODU967Yp4+djY7qnLBn6UQUaTDF76zQHzjWbC\n uKfg==","X-Gm-Message-State":"AOJu0YwOzj++cWL7pTxVZQ3ln/VRYvW/X9hY7fyb+h0kQdLPGoMw5eYU\n ZRMW+Fan7xsA3GOwz9dvjaohgdl4GjdJ3Kti2Cb7VTfa4I5VN8+1U5uCoxjj8E3y/yRITlQaKK1\n IJCI=","X-Gm-Gg":"AeBDieunuZBYkMhbKZC/pIWThW355rbldpLpUj801OumCIE2/0DYiSSUMybYwckTAVi\n TAl1TXZ7xzQyuhWzNwzsH9iadwTgY/R7vGWH7a1FFbWPuru718FVUqMIN0IVQfPln3cF6ZTIsY1\n kbdwstSS5IFCrM++Pb5pFcorq5Ikzytj0OzfANyTvOA3F1YTAQP+fiU2u5PjksLU3uoONWgSygF\n a95p/fuJW0+cXP/DYc/xrvi9R3XrYPbLRlJB6Hs2VX49wiS97O2KdGG842srlUH2wZpUMjCSVmh\n UE+pYtjVZvvJixmeUJJGkVZycAfKKZte0sz+PqtQAF0gM13XdwaJLTs2XZ+GeUBGUnTfYKhZee6\n rQw+WEFNA8aUuigGozTHQJon9luVABIhPll8DE1LKNGXBXmr7xyaJX/NcA+b7SdXgkd9bHh/UrS\n pekAv2k/VlJgtLcSabzgqi0DFAJwZY4crYNHhh","X-Received":"by 2002:a05:6a00:1898:b0:82f:3733:2fa7 with SMTP id\n d2e1a72fcca58-82f373336e5mr1187880b3a.34.1775984986378;\n Sun, 12 Apr 2026 02:09:46 -0700 (PDT)","From":"Eric Botcazou <botcazou@adacore.com>","X-Google-Original-From":"Eric Botcazou <ebotcazou@adacore.com>","To":"gcc-patches@gcc.gnu.org","Subject":"[Ada] Fix maximum path length regression on Windows","Date":"Sun, 12 Apr 2026 11:09:40 +0200","Message-ID":"<3413762.44csPzL39Z@fomalhaut>","MIME-Version":"1.0","Content-Type":"multipart/mixed; boundary=\"nextPart8668303.T7Z3S40VBb\"","Content-Transfer-Encoding":"7Bit","X-BeenThere":"gcc-patches@gcc.gnu.org","X-Mailman-Version":"2.1.30","Precedence":"list","List-Id":"Gcc-patches mailing list <gcc-patches.gcc.gnu.org>","List-Unsubscribe":"<https://gcc.gnu.org/mailman/options/gcc-patches>,\n <mailto:gcc-patches-request@gcc.gnu.org?subject=unsubscribe>","List-Archive":"<https://gcc.gnu.org/pipermail/gcc-patches/>","List-Post":"<mailto:gcc-patches@gcc.gnu.org>","List-Help":"<mailto:gcc-patches-request@gcc.gnu.org?subject=help>","List-Subscribe":"<https://gcc.gnu.org/mailman/listinfo/gcc-patches>,\n <mailto:gcc-patches-request@gcc.gnu.org?subject=subscribe>","Errors-To":"gcc-patches-bounces~incoming=patchwork.ozlabs.org@gcc.gnu.org"},"content":"That's a regression present on all active branches, whereby GNAT uses a \nmaximum path length of 256 instead of 260 bytes on Windows.\n\nTested on x86_64-w64-mingw32, applied on all active branches.\n\n\n2026-04-12  Eric Botcazou  <ebotcazou@adacore.com>\n\n\tPR ada/124836\n\t* adaint.c [__MINGW32__]: Do not include mingw32.h twice, and also\n\tinclude sys/param.h.","diff":"diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c\nindex 2942f3a47cc..7147b03f5bd 100644\n--- a/gcc/ada/adaint.c\n+++ b/gcc/ada/adaint.c\n@@ -350,11 +350,7 @@ const char *__gnat_library_template = GNAT_LIBRARY_TEMPLATE;\n \n #else\n \n-#if defined (__MINGW32__)\n-#include \"mingw32.h\"\n-#else\n #include <sys/param.h>\n-#endif\n \n #ifdef MAXPATHLEN\n #define GNAT_MAX_PATH_LEN MAXPATHLEN\n","prefixes":["Ada"]}