Re: Returning multiple variables to Pascal

17 Nov 2003

      Hi!

On Sun, Nov 16, 2003 at 07:50:16PM +0000, Dr Christian Hicks wrote:
...
How can I change my simple program to get the value
56 back from the C function?
Try this:

pascal-code:
[
program pastest;
var
  i: Integer;

procedure W1 (var i: Integer); external name 'c_w1';

begin
  i := 100;
  WriteLn ('i is: ', i);
  W1 (i);
  WriteLn ('i is: ', i)
end.
]

c-code
[
void c_w1 (int *i)
{
  (*i) = 50;
}
]

Eike

Re: Returning multiple variables to Pascal

Eike Lange