Re: Default directory in Ada 2005

["ME" <abcdefg@nonodock.net>]

Thanks Randy,

I am using Gnat 4.02 (20061211)

A) I set the default directory using Set_directory which works.
B) I read the files into an array of strings using "search" . The strings 
are padded with blanks.
C) I try an "open" using just the filename with no path and I get a 
Name_error
"Randy Brukardt" <randy@rrsoftware.com> wrote in message 
news:fe9h82$g6u$1@jacob-sparre.dk...
> All common target systems for Ada have the concept of a default directory,
> and that is built into the target system, so it would take a lot of work 
> for
> any Ada compiler (of ANY vintage, including Ada 83) to ignore the default
> directory in file opens. The only new thing is that Ada has acknowledged 
> the
> existence of this common concept.
>
> Surely, any failure to properly handle Open is a bug in a particular
> implementation, not of the language. (Nothing has changed in the 
> definition
> of Open; the meaning of the default directory is target-specific and
> implementation-defined in any case.) You need to contact the vendor of 
> your
> implementation, or at least tell us exactly what implementation you are
> referring to, in order to get any useful help.
>
>                              Randy.
>
> "ME" <abcdefg@nonodock.net> wrote in message
> news:13ge6d348ciln86@corp.supernews.com...
>> This does not appear to work. Since open was Ada 95 was it rewritten to
> use
>> default directory ?
>>
>> "Adam Beneschan" <adam@irvine.com> wrote in message
>> news:1191599479.895076.191170@k79g2000hse.googlegroups.com...
>> > On Oct 4, 9:52 pm, "ME" <abcd...@nonodock.net> wrote:
>> >> If the default directory is set then can I just omit the path in 
>> >> "Open"
>> >> so that it will use it or is something else meant by default?
>> >
>> > If you mean that you've used Directories.Set_Directory to set the
>> > default directory, then yes, I think the default directory is supposed
>> > to be used for any external file names that aren't fully specified (A.
>> > 16(48)).
>> >
>> >                           -- Adam
>> >
>> >
>>
>>
>
>