Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site noscvax.UUCP
Path: utzoo!watmath!clyde!akgua!mcnc!decvax!ittvax!dcdwest!sdcsvax!noscvax!dukelow
From: dukelow@noscvax.UUCP
Newsgroups: net.micro
Subject: Turbo Pascal bug
Message-ID: <347@noscvax.UUCP>
Date: Tue, 6-Mar-84 07:52:26 EST
Article-I.D.: noscvax.347
Posted: Tue Mar  6 07:52:26 1984
Date-Received: Thu, 8-Mar-84 19:35:01 EST
Organization: Naval Ocean Systems Center
Lines: 36

I sent the following bug report to Borland International last week. I will post
another article if and when I get a response. The following program produces
incorrect results for the MS DOS version of Turbo Pascal for the IBM PC. I have
no idea whether it works for other versions and have not tried to further
generalize the nature of the bug.

I am generally very impressed with Turbo Pascal and hope that Borland is
pricing it at a level which will allow them to continue to improve the product.
It is too good to just let sit.

The values for the constants or whether the program is run from memory or
COM file seem to make no difference (except for the value of the resulting
garbage).

					Bob Dukelow
					(dukelow@nosc)

program bugtest;
  const
    m = 5; {arbitrary as far as I know}
    n = 5; {also arbitrary}
  type
    s = array [1..m] of char;
  var
    a: array[1..n] of s;
    b: s;

  begin
  a[1] := '12345';
  writeln('the following is garbage: ', a[1]);
  b := '12345';
  a[1] := b;
  writeln('the following seems to be ok: ', a[1]);
  writeln('type CR to continue');
  readln;
  end.