M2compiler-V3/compiler/tests/g_sort.def

GENERIC DEFINITION MODULE Sort (Element : TYPE;
                                Compare : PROCEDURE(a, b : Element) : INTEGER);
PROCEDURE Smaller(x, y : Element) : Element;
END Sort.