Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!uunet!zaphod.mps.ohio-state.edu!ncar!gatech!mcnc!uvaarpa!vger.nsu.edu!g_harrison
From: g_harrison@vger.nsu.edu (George C. Harrison, Norfolk State University)
Newsgroups: comp.lang.pascal
Subject: DISPOSE'ing
Message-ID: <1144.286c2900@vger.nsu.edu>
Date: 29 Jun 91 10:30:24 GMT
Lines: 36

A student has been crying the blues because he code works on
Turbo Pascal and not on VAX Pascal.  It is totally ISO standard.
His program contains code similar to

program TEST;
type  PTR = ^NODE;
      NODE = record
              DATA : INTEGER;
              NEXT : PTR
             end;
var
      P, TEMP : PTR;
begin
      new(P);
      TEMP := P;
      DISPOSE(P);
      DISPOSE(TEMP)
end.

Apparently TP (of which I am NOT an expert) allows for a program to 
dispose of the nodes pointed to by P and TEMP even though the nodes 
are at exactly the same location.  On the other hand, VAX Pascal
gives the following RUN-TIME error:

PAS-F-ERRDURDIS, error during DISPOSE
%TRACE-F-TRACEBACK, symbolic stack dump follows
module name     routine name                     line       rel PC    abs PC

                                                           00021361  00021361
TEST            TEST                               13      00000020  00000220

Is this of any significance?  

George C. Harrison, Professor of Computer Science
Norfolk State University, 2401 Corprew Avenue, Norfolk VA 23504
Internet:  g_harrison@vger.nsu.edu    Phone:  804-683-8654