X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FExit.hs;h=7cca0174a0b2c4490bd0fc322101f75b02758d5a;hb=0bf2fdab482da7a287ef09f18e7656abe62256d0;hp=3377c5283a6ba96fe3e815325eb7c7c694d3022c;hpb=7dfe4a22aa6a2c598b1496c661c7d532aaafa94f;p=ghc-base.git diff --git a/System/Exit.hs b/System/Exit.hs index 3377c52..7cca017 100644 --- a/System/Exit.hs +++ b/System/Exit.hs @@ -86,6 +86,6 @@ exitFailure = exitWith (ExitFailure 1) -- | The computation 'exitSuccess' is equivalent to -- 'exitWith' 'ExitSuccess', It terminates the program --- sucessfully. +-- successfully. exitSuccess :: IO a exitSuccess = exitWith ExitSuccess