shithub: MicroHs

Info  •  Files  •  Log  •  Branches

Move 'otherwise' to Data.Bool

--- a/lib/Data/Bool.hs

+++ b/lib/Data/Bool.hs

@@ -19,3 +19,6 @@

 not :: Bool -> Bool

 not False = True

 not True  = False

+

+otherwise :: Bool

+otherwise = True

--- a/lib/Prelude.hs

+++ b/lib/Prelude.hs

@@ -1,7 +1,6 @@

 -- Copyright 2023 Lennart Augustsson

 -- See LICENSE file for full license.

 module Prelude(

-  module Prelude,

   module Control.Error,

   module Data.Bool,

   module Data.Char,

@@ -25,6 +24,3 @@

 import Data.Tuple

 import System.IO

 import Text.String

-

-otherwise :: Bool

-otherwise = True

-- 

⑨