MODULE DBadExp;
FROM DLib IMPORT ghost;
VAR ExitCode : INTEGER;
BEGIN
  ExitCode := 1
END DBadExp.