Fix a couple typos.

This commit is contained in:
2011-02-04 13:15:14 -05:00
parent f5bc625500
commit e91067f984

View File

@@ -1,11 +1,11 @@
module Data.Bool module Data.Bool
datatype Bool = True | False; datatype Bool = True() | False();
export (&)(x :: Bool, y :: Bool) :: Bool = prim%and; export (&)(x :: Bool, y :: Bool) :: Bool = prim%and;
export (|)(x :: Bool, y :: Bool) :: Bool = prim%or; export (|)(x :: Bool, y :: Bool) :: Bool = prim%or;
export (^)(x :: Bool, y :: Bool) :: Bool = prim%xor; export (^)(x :: Bool, y :: Bool) :: Bool = prim%xor;
export (not)(x :: Bool) :: Bool = prim%not; export not(x :: Bool) :: Bool = prim%not;
export otherwise :: Bool = True; export otherwise :: Bool = True;