normalize_pathname.adb\gnat.dg\testsuite\gcc - riscv-gnu-toolchain/gcc.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/gcc.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/gcc/testsuite/gnat.dg/normalize_pathname.adb

blob: 7d0bcb10429c90ddadb127b194b22a467e7354af (plain)

--  { dg-do run }

with GNAT.OS_Lib;

procedure Normalize_Pathname is
   S : constant String := GNAT.OS_Lib.Normalize_Pathname
     ("/../tmp", Directory => "", Resolve_Links => True);
begin
   null;
end Normalize_Pathname;