From: panne Date: Sat, 21 Apr 2001 10:19:53 +0000 (+0000) Subject: [project @ 2001-04-21 10:19:53 by panne] X-Git-Tag: Approximately_9120_patches~2127 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=708fad0ac01149d2d4a401e994d036f4a5c11116 [project @ 2001-04-21 10:19:53 by panne] Removed Julian's Teletubby --- diff --git a/ghc/compiler/main/TmpFiles.hs b/ghc/compiler/main/TmpFiles.hs index 68ced53..b27217c 100644 --- a/ghc/compiler/main/TmpFiles.hs +++ b/ghc/compiler/main/TmpFiles.hs @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- --- $Id: TmpFiles.hs,v 1.17 2001/04/18 11:58:02 sewardj Exp $ +-- $Id: TmpFiles.hs,v 1.18 2001/04/21 10:19:53 panne Exp $ -- -- Temporary file management -- @@ -100,7 +100,6 @@ removeTmpFiles verb fs = do kludgedSystem cmd phase_name = do #ifndef mingw32_TARGET_OS - la la la exit_code <- system cmd `catchAllIO` (\_ -> throwDyn (PhaseFailed phase_name (ExitFailure 1))) #else