-package org.simantics.scl.compiler.internal.deriving;\r
-\r
-import gnu.trove.map.hash.THashMap;\r
-\r
-import org.simantics.scl.compiler.types.TCon;\r
-import org.simantics.scl.compiler.types.Types;\r
-\r
-public class InstanceDerivers {\r
- private static final THashMap<TCon, InstanceDeriver> MAP = \r
- new THashMap<TCon, InstanceDeriver>();\r
- \r
- static {\r
- MAP.put(Types.EQ, new EqDeriver());\r
- MAP.put(Types.HASHABLE, new HashableDeriver());\r
- MAP.put(Types.IO, new IODeriver());\r
- MAP.put(Types.ORD, new OrdDeriver());\r
- MAP.put(Types.SHOW, new ShowDeriver());\r
- }\r
- \r
- public static InstanceDeriver get(TCon typeClass) {\r
- return MAP.get(typeClass);\r
- }\r
-}\r
+package org.simantics.scl.compiler.internal.deriving;
+
+import org.simantics.scl.compiler.types.TCon;
+import org.simantics.scl.compiler.types.Types;
+
+import gnu.trove.map.hash.THashMap;
+
+public class InstanceDerivers {
+ private static final THashMap<TCon, InstanceDeriver> MAP =
+ new THashMap<TCon, InstanceDeriver>();
+
+ static {
+ MAP.put(Types.IO, new IODeriver());
+ MAP.put(Types.ORD, new OrdDeriver());
+ MAP.put(Types.SHOW, new ShowDeriver());
+ }
+
+ public static InstanceDeriver get(TCon typeClass) {
+ return MAP.get(typeClass);
+ }
+}