ktoklib/src/IntInt.m3


 Copyright (c) 2000 California Institute of Technology 
 All rights reserved. See the file COPYRIGHT for a full description. 
 $Id: IntInt.m3.html,v 1.2.2.1 2010-04-15 20:59:26 wagner Exp $ 

MODULE IntInt;
IMPORT Integer;
PROCEDURE Compare(a, b: T): [-1..1] =
  BEGIN
    RETURN Integer.Compare(a.key, b.key);
  END Compare;
BEGIN
END IntInt.