diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-02-10 13:49:15 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-02-10 13:49:15 +0000 |
| commit | fda708fecf0f53769f452ce92f5c2ba78bee59cf (patch) | |
| tree | 5dc2dd33c332df90154ebf5f0909edf17dcd72d9 /gcc/ada/mlib-tgt-vms-ia64.adb | |
| parent | 3bb8af62398b088423a940f1ec2294f2550ca17c (diff) | |
| download | gcc-fda708fecf0f53769f452ce92f5c2ba78bee59cf.tar.gz | |
2005-02-09 Doug Rupp <rupp@adacore.com>
* gnatchop.adb (dup, dup2),
g-dirope.adb (closedir, opendir, rmdir): Reference via System.CRTL.
* gnatlbr.adb (mkdir),
mlib-tgt-vms-ia64.adb (popen, plose): Import with decc$ prefix.
* s-crtl.ads (closdir, dup, dup2, opendir, rmdir): Import.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@94807 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/mlib-tgt-vms-ia64.adb')
| -rw-r--r-- | gcc/ada/mlib-tgt-vms-ia64.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/mlib-tgt-vms-ia64.adb b/gcc/ada/mlib-tgt-vms-ia64.adb index cad8ae1401b..e921566473c 100644 --- a/gcc/ada/mlib-tgt-vms-ia64.adb +++ b/gcc/ada/mlib-tgt-vms-ia64.adb @@ -7,7 +7,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2004, Free Software Foundation, Inc. -- +-- Copyright (C) 2004-2005 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- -- @@ -77,10 +77,10 @@ package body MLib.Tgt is ------------------------------ function Popen (Command, Mode : System.Address) return System.Address; - pragma Import (C, Popen); + pragma Import (C, Popen, "decc$popen"); function Pclose (File : System.Address) return Integer; - pragma Import (C, Pclose); + pragma Import (C, Pclose, "decc$pclose"); --------------------- -- Archive_Builder -- |