gm2
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gm2] mea culpa, testcase9 is good, but testcase8??


From: Dragiša Durić
Subject: [Gm2] mea culpa, testcase9 is good, but testcase8??
Date: Fri, 10 Sep 2010 23:28:31 +0200

(* as per comments, but why??? *)

MODULE TestCase8;

TYPE
  T = POINTER TO RECORD
    cmp: PROCEDURE;
    left, right: T;
  END;

VAR
  a, b: T;

BEGIN
  IF a^.cmp <> b^.cmp THEN (* FAIL *)
  END;
  IF NOT (a^.cmp = b^.cmp) THEN (* PASS *)
  END;
END TestCase8.

-- 
Dragiša Durić <address@hidden>




reply via email to

[Prev in Thread] Current Thread [Next in Thread]