Re: redirecting the standard output

[Stephen Leake <stephen.a.leake.1@gsfc.nasa.gov>]

"Smark" <not.provided@all.com> writes:

> "Martin Dowie" <martin.dowie@gecm.com> wrote in message
> news:3ad31759$1@pull.gecm.com...
> > This time with a subject... :-)
> >
> > Target System: PowerPC, AdaMULTI v1.8.9b, VxWorks 5.4
> >
> > How do I redirect the standard output? I'd like to redirect it to device
> > "/null"
> >
> > Attempts:
> >  Open (DevNull, Append_File, "/null");
> >  Open (DevNull, "/null", "/null");
> >
> > just cause Status_Error, i.e. the device is already "open". So how can
> > I then "Set_Output (DevNull);" without having the device object in
> > File_Type form?..
> >
> >
> 
> I have also had problems redirecting Ada.Text_Io on the same platform.
> When I use the applicable VxWorks calls, ioGlobalStdSet or ioTaskStdSet,
> my printf's from C programs are redirected, but Ada.Text_Io seems to
> be unaffected.  In my case, I'm trying to redirect IO to an open
> socket.
> 
> The solution I'm toying with is making an Ada interface to printf.
> Is there a better way to get Ada IO to respond to calls to the
> above VxWorks functions?

I don't know precisely, but you should definitely ask your Ada vendor
how to do it. If you are using GNAT, look at the source for Text_IO
and see what they are doing.

Interfacing to printf is _not_ easy. 'puts' is a better C function to
call, if you have to resort to that.

-- 
-- Stephe