comp.lang.ada
 help / color / mirror / Atom feed
From: d96andgi@dtek.chalmers.se (Anders Gidenstam)
Subject: Re: Native rts not working on linux (glibc)
Date: 1998/11/16
Date: 1998-11-16T00:00:00+00:00	[thread overview]
Message-ID: <72q5m8$6ih$1@nyheter.chalmers.se> (raw)
In-Reply-To: x7vaf1sr9ty.fsf@pogner.demon.co.uk

In article <x7vaf1sr9ty.fsf@pogner.demon.co.uk>,
	Simon Wright <simon@pogner.demon.co.uk> writes:
>Tasking programs will run fine on Linux with GNAT. If they don't there
>is something wrong!
>
>As far as I can tell the code that does this is in Set_Priority in s-taprop.adb:
>
>      Result := pthread_setschedparam (T.LL.Thread, SCHED_FIFO, Param'Access);
>      pragma Assert (Result = 0 or else Result = EPERM);
>
>If you are root, you get the priority (Result = 0)
>If not, the request fails quietly     (Result = EPERM)
>... or something terrible has occurred

Well, I've found the problem my s-taprop.adb looks like tihs:

  Result := pthread_setschedparam (T.LL.Thread, SCHED_FIFO, Param'Access);
  pragma Assert (Result = 0
                 or else Shutdown ("GNULLI failure---Set_Priority"));

Not very strange that my programs didn't run...(when I wasn't root)...
Might it be possible to remove the offending Shutdown and just ignore
that the call failed? 

/Anders
-- 
--------------------------------------------
"A well-written program is its own heaven; 
 a poorly-written program is its own hell."
  - The Tao of Programming 





  parent reply	other threads:[~1998-11-16  0:00 UTC|newest]

Thread overview: 13+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1998-10-28  0:00 Native rts not working on linux (glibc) Anders Gidenstam
1998-10-29  0:00 ` Sune Falck
1998-10-29  0:00   ` Anders Gidenstam
1998-10-29  0:00     ` Anders Gidenstam
1998-11-12  0:00 ` drees
1998-11-12  0:00   ` Anders Gidenstam
1998-11-12  0:00     ` dewarr
1998-11-13  0:00       ` Anders Gidenstam
1998-11-15  0:00         ` Simon Wright
1998-11-16  0:00           ` Anders Gidenstam
1998-11-16  0:00           ` Anders Gidenstam [this message]
1998-11-17  0:00             ` Simon Wright
1998-11-18  0:00               ` Anders Gidenstam
replies disabled

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