src/Pure/ML-Systems/smlnj-ptreql.ML
changeset 16528 25a7459d4d4a
equal deleted inserted replaced
16527:80ac7ac3733c 16528:25a7459d4d4a
       
     1 (*  Title:      $Id$
       
     2     Author:     Lawrence C Paulson
       
     3 
       
     4 Pointer Equality: for Standard ML of New Jersey 110.49 or later.
       
     5 
       
     6 Thanks to Matthias Blume for providing InlineT.ptreql!
       
     7 *)
       
     8 
       
     9 CM.autoload "$smlnj/init/init.cmi";
       
    10 val pointer_eq = InlineT.ptreql;