Commit fe4f6fe3 authored by Steffen Michels's avatar Steffen Michels

re-added Data.Generics, but without all generic libraries in the dcl

parent 767ed472
Pipeline #10389 passed with stage
in 1 minute and 44 seconds
definition module Data.Generics
import StdGeneric
fromOBJECT :: !(OBJECT x) -> x
fromCONS :: !(CONS x) -> x
fromRECORD :: !(RECORD x) -> x
fromFIELD :: !(FIELD x) -> x
fromPAIRX :: !(PAIR x y) -> x
fromPAIRY :: !(PAIR x y) -> y
implementation module Data.Generics
import StdGeneric
fromOBJECT :: !(OBJECT x) -> x
fromOBJECT (OBJECT x) = x
fromCONS :: !(CONS x) -> x
fromCONS (CONS x) = x
fromRECORD :: !(RECORD x) -> x
fromRECORD (RECORD x) = x
fromFIELD :: !(FIELD x) -> x
fromFIELD (FIELD x) = x
fromPAIRX :: !(PAIR x y) -> x
fromPAIRX (PAIR x _) = x
fromPAIRY :: !(PAIR x y) -> y
fromPAIRY (PAIR _ y) = y
......@@ -92,6 +92,7 @@ import qualified Data.Tree
import qualified Data.Tuple
import qualified Data.Word8
import qualified Data._Array
import qualified Data.Generics
//import qualified Database.SQL
//import qualified Database.SQL.MySQL
//import qualified Database.SQL.RelationalMapping
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment