[gcc r13-1492] [Ada] qnx-7.1: ACATS cxag001 failure on qnx - realpath

[gcc r13-1492] [Ada] qnx-7.1: ACATS cxag001 failure on qnx - realpath

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:5709fac357bb922a9eeecf42adbedd532c00fde6

commit r13-1492-g5709fac357bb922a9eeecf42adbedd532c00fde6
Author: Doug Rupp <rupp@adacore.com>
Date:   Wed Jun 8 07:39:16 2022 -0700

    [Ada] qnx-7.1: ACATS cxag001 failure on qnx - realpath
    
    The implementation of __gnat_full_name uses the CRTL realpath, however
    this function returns a null string so use the default implementation
    instead.
    
    gcc/ada/
    
            * cstreams.c (__gnat_full_name) [QNX]: Remove block.

Diff:
---
 gcc/ada/cstreams.c | 13 -------------
 1 file changed, 13 deletions(-)

diff --git a/gcc/ada/cstreams.c b/gcc/ada/cstreams.c
index 48f996d09fa..10cc3a6faf8 100644
--- a/gcc/ada/cstreams.c
+++ b/gcc/ada/cstreams.c
@@ -202,19 +202,6 @@ __gnat_full_name (char *nam, char *buffer)
      getcwd approach instead. */
   realpath (nam, buffer);
 
-#elif defined (__QNX__)
-
-  int length;
-
-  if (__gnat_is_absolute_path (nam, strlen (nam)))
-    realpath (nam, buffer);
-  else
-    {
-      length = __gnat_max_path_len;
-      __gnat_get_current_dir (buffer, &length);
-      strncat (buffer, nam, __gnat_max_path_len - length - 1);
-    }
-
 #elif defined (__vxworks)
 
   /* On VxWorks systems, an absolute path can be represented (depending on