Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2005-08

fpGetRUsage

7 messages · 3 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Paul Davidson

Trying to get fpGetRusage to work.

Using: 	function fpGetRUsage( who : cint; data : pRUsage ) : cint;
cdecl; external 'c' name 'getrusage';

But this gives silly results. Any hints?

P Davidson
Corax Networks Inc.
http://CoraxNetworks.com

IMPORTANT NOTICE: This message is intended only for the use of the individual or entity to which it is addressed. The message may contain information that is privileged, confidential and exempt from disclosure under applicable law. If the reader of this message is not the intended recipient, or the employee or agent responsible for delivering the message to the intended recipient, you are notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify Corax Networks immediately by email at Thank you.

Paul Davidson

(Oops)
Trying to get fpGetRusage to work WITH DARWIN.

Using: 	function fpGetRUsage( who : cint; data : pRUsage ) : cint;
cdecl; external 'c' name 'getrusage';

But this gives silly results. Any hints?

P Davidson
Corax Networks Inc.
http://CoraxNetworks.com

IMPORTANT NOTICE: This message is intended only for the use of the individual or entity to which it is addressed. The message may contain information that is privileged, confidential and exempt from disclosure under applicable law. If the reader of this message is not the intended recipient, or the employee or agent responsible for delivering the message to the intended recipient, you are notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify Corax Networks immediately by email at Thank you.

Jonas Maebe
to Paul Davidson
Paul Davidson wrote 6 lines
Trying to get fpGetRusage to work WITH DARWIN. Using: function fpGetRUsage( who : cint; data : pRUsage ) : cint; cdecl; external 'c' name 'getrusage'; But this gives silly results. Any hints?

How did you declare prusage/trusage?

Jonas

Paul Davidson
to Jonas Maebe
Jonas Maebe wrote 19 lines
On 31 Aug 2005, at 15:52, Paul Davidson wrote: > Trying to get fpGetRusage to work WITH DARWIN. > > Using: function fpGetRUsage( who : cint; data : pRUsage ) : cint; > cdecl; external 'c' name 'getrusage'; > > But this gives silly results. Any hints? How did you declare prusage/trusage? Jonas _______________________________________________ fpc-pascal maillist - http://lists.freepascal.org/mailman/listinfo/fpc-pascal 
	function fpGetRUsage( who : cint; data : pRUsage ) : cint; cdecl;
external 'some_random_string' name 'getrusage';

P Davidson
http://CoraxNetworks.com

Jonas Maebe
to Paul Davidson
Paul Davidson wrote 11 lines
>> Trying to get fpGetRusage to work WITH DARWIN. >> >> Using: function fpGetRUsage( who : cint; data : pRUsage ) : >> cint; cdecl; external 'c' name 'getrusage'; >> >> But this gives silly results. Any hints? > > How did you declare prusage/trusage? function fpGetRUsage( who : cint; data : pRUsage ) : cint; cdecl; external 'some_random_string' name 'getrusage';

I asked about prusage/trusage, the type of the "data" parameter. It does not exist in the RTL, so you must have declared this type yourself. That's probably where the error is.

Jonas

Paul Davidson
to Jonas Maebe

RUsage is not declared anywhere in app o.0
RUsage is defined in ostypes.inc for BSD. fpGetRUsage is as well, but does not resolve in Darwin.

Jonas Maebe wrote 27 lines
On 7 sep 2005, at 20:21, Paul Davidson wrote: >>> Trying to get fpGetRusage to work WITH DARWIN. >>> >>> Using: function fpGetRUsage( who : cint; data : pRUsage ) : >>> cint; cdecl; external 'c' name 'getrusage'; >>> >>> But this gives silly results. Any hints? >> >> How did you declare prusage/trusage? > > function fpGetRUsage( who : cint; data : pRUsage ) : cint; cdecl; > external 'some_random_string' name 'getrusage'; I asked about prusage/trusage, the type of the "data" parameter. It does not exist in the RTL, so you must have declared this type yourself. That's probably where the error is. Jonas _______________________________________________ fpc-pascal maillist - http://lists.freepascal.org/mailman/listinfo/fpc-pascal

P Davidson
Corax Networks Inc.
http://CoraxNetworks.com

Marco van de Voort
to Paul Davidson
RUsage is not declared anywhere in app o.0 RUsage is defined in ostypes.inc for BSD. fpGetRUsage is as well, but does not resolve in Darwin.

fpgetrusage is used in the implementation. It is not (yet) exported.