Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!mcvax!hafro!askja!frisk
From: frisk@askja.UUCP (Fridrik Skulason)
Newsgroups: comp.lang.pascal
Subject: Pointer problem ?
Message-ID: <254@askja.UUCP>
Date: Thu, 23-Jul-87 05:49:22 EDT
Article-I.D.: askja.254
Posted: Thu Jul 23 05:49:22 1987
Date-Received: Sat, 25-Jul-87 06:04:45 EDT
Reply-To: frisk@askja.UUCP (Fridrik Skulason)
Distribution: world
Organization: University of Iceland (RHI)
Lines: 19

Can anyone tell me if this program fragment is supposed to compile or not.
Turbo Pascal refuses to compile it, but VAX/VMS Pascal does.

program t;
type 
  p1 = ^p1;
  p2 = ^p1;
  p3 = ^p2;

var p : p1;
    r : p3;
begin
    p := r;
end.
-- 
Fridrik Skulason  Univ. of Iceland, Computing Center
       UUCP  ...mcvax!hafro!askja!frisk                BIX  frisk

                     "This line intentionally left blank"