summaryrefslogtreecommitdiff
path: root/gcc/ada/s-os_lib.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-05-20 12:52:23 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-05-20 12:52:23 +0000
commit547371fa3845b2033347b8e9ec5739786399f715 (patch)
tree03ad2770eef9679ec18f3d353a7d8fbfe07c0163 /gcc/ada/s-os_lib.adb
parente4da3b5b9d0383d69fcecc18a113332dad9d2f41 (diff)
downloadgcc-547371fa3845b2033347b8e9ec5739786399f715.tar.gz
* s-winext.ads: Replace representation clause by pragma Pack. Gives
equivalent representation, but has the advantage of allowing compilation of this file under 64 bits platforms. * s-os_lib.adb (Normalize_Pathname): Mark Cur_Dir constant. * s-osinte-irix.ads: (Alternate_Stack_Size): Add dummy declaration. * adaint.c: Don't define dummy implementation of convert_addresses on ppc-linux. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135649 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-os_lib.adb')
-rwxr-xr-xgcc/ada/s-os_lib.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/s-os_lib.adb b/gcc/ada/s-os_lib.adb
index ff65720d6e4..f3e369cf853 100755
--- a/gcc/ada/s-os_lib.adb
+++ b/gcc/ada/s-os_lib.adb
@@ -1896,7 +1896,7 @@ package body System.OS_Lib is
and then Path_Buffer (2) /= Directory_Separator
then
declare
- Cur_Dir : String := Get_Directory ("");
+ Cur_Dir : constant String := Get_Directory ("");
-- Get the current directory to get the drive letter
begin