MODULE TQual;
IMPORT DLibC;
VAR ExitCode : INTEGER;
BEGIN
  ExitCode := DLibC.K
END TQual.