testsuite/tests/rename/should_compile/T3103/GHC/Word.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

{-# LANGUAGE NoImplicitPrelude, MagicHash #-}

module GHC.Word (
    Word(..),
    ) where

import GHC.Base
import GHC.Types

import {-# SOURCE #-} GHC.Unicode ()

instance Num Word where
    signum 0               = 0
    signum _               = 1