diff options
Diffstat (limited to 'gcc/ada/a-dirval.adb')
| -rw-r--r-- | gcc/ada/a-dirval.adb | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/gcc/ada/a-dirval.adb b/gcc/ada/a-dirval.adb index d4395e1d15c..b4582645082 100644 --- a/gcc/ada/a-dirval.adb +++ b/gcc/ada/a-dirval.adb @@ -7,7 +7,7 @@ -- B o d y -- -- (POSIX Version) -- -- -- --- Copyright (C) 2004-2005, Free Software Foundation, Inc. -- +-- Copyright (C) 2004-2007, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -103,4 +103,13 @@ package body Ada.Directories.Validity is return False; end OpenVMS; + ------------- + -- Windows -- + ------------- + + function Windows return Boolean is + begin + return False; + end Windows; + end Ada.Directories.Validity; |