comp.lang.ada
 help / color / mirror / Atom feed
From: Anh Vo <anhvofrcaus@gmail.com>
Subject: Re: How to find the type of operating system.
Date: Wed, 6 Apr 2016 15:42:27 -0700 (PDT)
Date: 2016-04-06T15:42:27-07:00	[thread overview]
Message-ID: <533e9e24-e8b6-42e0-b80c-10eae266ee64@googlegroups.com> (raw)
In-Reply-To: <ne3vqb$219$1@loke.gir.dk>

On Wednesday, April 6, 2016 at 2:41:33 PM UTC-7, Randy Brukardt wrote:
> "ldries46" <bertus.dries@planet.nl> wrote in message 
> news:57053167$0$4216$e4fe514c@news.kpn.nl...
> > How can I fin in which operating system a program runs and other details 
> > of that operating system.
> 
> Ada has System.System_Name provides an implementation-defined indication of 
> the name of the target, but that often isn't set in any useful way. (Dunno 
> what GNAT does with it, if anything.)
 
With GNAT, I managed to make it work for Windows and Linux/Unix not long ago.

   Dir_Separator : Character;
   pragma Import (C, Dir_Separator, "__gnat_dir_separator");
   --...
   Put_Line ("The program is run on OS: => " &
             (if Dir_Separator = '\' then "Windows" else "Unix/Linux"));

Anh Vo

 


  reply	other threads:[~2016-04-06 22:42 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-04-06 15:55 How to find the type of operating system ldries46
2016-04-06 21:41 ` Randy Brukardt
2016-04-06 22:42   ` Anh Vo [this message]
2016-04-07  6:45     ` Simon Wright
2016-04-07  7:31       ` Randy Brukardt
2016-04-07 16:33         ` Jeffrey R. Carter
2016-04-07 11:20 ` Lucretia
2016-06-24 21:12   ` Victor Porton
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox