Re: timeouts

[Stephen Leake <stephen_leake@acm.org>]

Brian May <bam@snoopy.apana.org.au> writes:

> >>>>> "Jeffrey" == Jeffrey Carter <spam@spam.com> writes:
> 
>     Jeffrey> PragmARC.Date_Handler uses this internal procedure to split the
>     Jeffrey> seconds value from Ada.Calendar into hour, minute, and seconds:
> 
> I found PragmARC.Date_Handler the Image function, and am now using it.
> 
> For some weird reason, when I compile my program with the latest
> mingw32 GNAT compiler, it constantly prints "N = 1" on a separate line
> on its own whenever I call the Image function. If I remove the call to
> the Image function, the N = 1 goes away. Sometimes I get two, most of
> the time I only get one. Any ideas why? This didn't happen with Gnat
> 3.15p. Not a show stopper, it just irks me that I can't explain this
> difference in behaviour. Will continue investigating.

I had a similar problem, and tracked it down to a "pragma Debug" in
the GNAT sources for Ada.Text_IO. Try compiling without -gnata. Mine
went away with the next release of GNAT (5.02a1).

> Also with GNAT 3.15 this would work, but it come up with a compiler
> error on mingw32:
> 
> with Types;
> use Types;
> use type Byte;
> 
> I had to change it to
> 
> with Types;
> use Types;
> use type Types.Byte;
> 
> Strange. Not sure which behaviour is correct.

The Annotated Language Reference Manual 8.4 (6) has a note that says
"The scope does not include context_clauses themselves". So 'byte' is
_not_ supposed to be visible before the start of the package
declaration; the second version is correct. This would also work:

with Types;
use Types;
package Foo is
   use type Byte;
...
end package Foo;

> Anyway, I am now running my program compiled with mingw32 and will
> see it if still crashes...
> 
> When installing mingw32, I found I had to keep GNAT 3.15p installed,
> so I can keep with win32ada bindings installed. They appear to work
> fine with mingw32. Is there anyway I can install the win32ada bindings
> without GNAT 3.15p?

That used to be possible in earlier versions of GNAT. But the
installer has gotten simpler, I suspect because GNAT customer base is
getting less sophisticated as it gets bigger :). 

You can just copy the Win32Ada binding directories, then uninstall
GNAT 3.15p. Or just keep 3.15p installed, but not in you path. That
way you can test the two compilers against each other.

-- 
-- Stephe