-class_keys
- = [ (str_mod, (k, RnImplicitClass)) | (str_mod,k) <-
- [ ((SLIT("Eq"),pRELUDE), eqClassKey) -- mentioned, derivable
- , ((SLIT("Eval"),pRELUDE), evalClassKey) -- mentioned
- , ((SLIT("Ord"),pRELUDE), ordClassKey) -- derivable
- , ((SLIT("Num"),pRELUDE), numClassKey) -- mentioned, numeric
- , ((SLIT("Real"),pRELUDE), realClassKey) -- numeric
- , ((SLIT("Integral"),pRELUDE), integralClassKey) -- numeric
- , ((SLIT("Fractional"),pRELUDE), fractionalClassKey) -- numeric
- , ((SLIT("Floating"),pRELUDE), floatingClassKey) -- numeric
- , ((SLIT("RealFrac"),pRELUDE), realFracClassKey) -- numeric
- , ((SLIT("RealFloat"),pRELUDE), realFloatClassKey) -- numeric
- , ((SLIT("Ix"),iX), ixClassKey) -- derivable (but it isn't Prelude.Ix; hmmm)
- , ((SLIT("Bounded"),pRELUDE), boundedClassKey) -- derivable
- , ((SLIT("Enum"),pRELUDE), enumClassKey) -- derivable
- , ((SLIT("Show"),pRELUDE), showClassKey) -- derivable
- , ((SLIT("Read"),pRELUDE), readClassKey) -- derivable
- , ((SLIT("Monad"),pRELUDE), monadClassKey)
- , ((SLIT("MonadZero"),pRELUDE), monadZeroClassKey)
- , ((SLIT("MonadPlus"),pRELUDE), monadPlusClassKey)
- , ((SLIT("Functor"),pRELUDE), functorClassKey)
- , ((SLIT("CCallable"),pRELUDE), cCallableClassKey) -- mentioned, ccallish
- , ((SLIT("CReturnable"),pRELUDE), cReturnableClassKey) -- mentioned, ccallish
- ]]