/usr/web/sources/contrib/fernan/nhc98/src/prelude/System/Eq_ExitCode.hs

Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/System/Eq_ExitCode.hs


module System(Eq(..)) where

import DExitCode

instance Eq ExitCode where
  ExitSuccess   == ExitSuccess    = True
  ExitFailure a == ExitFailure b  = a == b
  _             == _	          = False

(Return to Plan 9 Home Page)