From: fist1000 AT aol DOT com (Fist1000)
Newsgroups: comp.os.msdos.djgpp
Subject: Converting pascal 6-byte reals to C 8-byte doubles
Date: 3 Apr 1998 12:18:14 GMT
Lines: 41
Message-ID: <1998040312181401.HAA20698@ladder03.news.aol.com>
NNTP-Posting-Host: ladder03.news.aol.com
Organization: AOL http://www.aol.com
To: djgpp AT delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp
Precedence: bulk

Not sure where I should post this, but here goes:

A friend of mine has written a program in TP7 and in it he uses a bunch of
reals and writes them to disk. I'm helping him port his code to C (Watcom C),
but I'm at a loss as to how I read in this data from a C program. For example,
I wrote this test in Pascal:

(**********************)
program WriteReal;
var
  r : real;
  f : file of real;
begin
  r := 3.14159;
  assign(f,'real.log');
  rewrite(f);
  write(f, r);
  close(f);
end.
(**********************)

Then I wrote a simple C prog to read the file written:

//////////////////////////////
void main(void)
  {
  double dbl = 0.0;

  FILE * f = fopen("real.log", "rb");
  fread(&dbl, 6, 1, f);
  fclose(f);

  printf("%f", dbl);
  }
//////////////////////////////

Yet when I run the C prog, I get an output of 0.000000. Does anyone know how to
do this?

Thanks,
Aen (fist1000 AT aol DOT com)