Copyright (C) 1994, Digital Equipment Corp. <*EXTERNAL*> INTERFACECsort ; IMPORT Ctypes; TYPE CompareProc = PROCEDURE(x,y: Ctypes.void_star): Ctypes.int; PROCEDURE qsort(base: Ctypes.void_star; nel, width: Ctypes.unsigned_int; p: CompareProc); END Csort.