Re: Natural to String without space? (newbie question)

[Ole-Hjalmar Kristensen <ohk@clustra.com>]

"Martin Dowie" <martin.dowie@nospam.baesystems.com> writes:

You can even do the same when importing foreign functions, like :


with Interfaces.C_Streams; use Interfaces.C_Streams;

package Uio is 

   type Oflag_T is mod 2**32;
   type Mode_T is mod 2**32;

<snip>

   function Open(Path : chars; Oflag : Oflag_T; Mode : Mode_T := 8#777#) return int;

<snip>

   pragma Import(C,open);
   pragma Import(C,close);
   pragma Import(C,fsync);
   pragma Import(C,read);
   pragma Import(C,write);

end Uio;

> You're welcome, it's a nice little feature, isn't it? I
> was wuick surprised myself the first time I saw it. :-)
> 
> Beard, Frank <beardf@spawar.navy.mil> wrote in message
> news:mailman.990741393.31666.comp.lang.ada@ada.eu.org...
> > Well, you learn something new everyday.  I didn't know you
> > could do a rename and default a parameter when the parent
> > function was not defaulted.
> >
> > Thanks for the info.
> >
> > Frank
> >
> > -----Original Message-----
> > From: Martin Dowie [mailto:martin.dowie@nospam.baesystems.com]
> >
> > or,
> >
> >    function Trim (Value : String;
> >                   Side  : Ada.Strings.Trim_End := Ada.Strings.Both)
> >       return String renames Ada.Strings.Fixed.Trim;
> 
> 
> 

-- 
Kabelsalat ist gesund.

Ole-Hj. Kristensen