Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/include/System.hi

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


interface System where {

{-# NEED #-}
instance Prelude.Ord ExitCode;

{-# NEED #-}
instance Prelude.Show ExitCode;

{-# NEED #-}
instance Prelude.Eq ExitCode;

{-# NEED #-}
instance Prelude.Read ExitCode;
interface ! System
{-# NEED getEnv #-}
getEnv{-# 1 #-}::(Prelude.String -> (NHC.Internal.IO Prelude.String));

{-# NEED getArgs #-}
getArgs{-# 0 #-}::(NHC.Internal.IO [Prelude.String]);

{-# NEED system #-}
system{-# 1 #-}::(Prelude.String -> (NHC.Internal.IO ExitCode));

{-# NEED exitWith #-}
exitWith{-# 1 #-}::(ExitCode -> (NHC.Internal.IO a));

{-# NEED exitFailure #-}
exitFailure{-# 0 #-}::(NHC.Internal.IO a);

{-# NEED getProgName #-}
getProgName{-# 0 #-}::(NHC.Internal.IO Prelude.String);

{-# NEED {ExitCode ExitSuccess ExitFailure} #-}
data ExitCode
  = ExitSuccess 
  | ExitFailure Prelude.Int;
interface NHC.Internal
{-# NEED IO #-}
newtype {-#  #-} IO;
}

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].