geg

[clean-tests.git] / gengen / Data / GenType.dcl

diff --git a/gengen/Data/GenType.dcl b/gengen/Data/GenType.dcl
index de08c75..7f751da 100644 (file)
--- a/gengen/Data/GenType.dcl
+++ b/gengen/Data/GenType.dcl
@@ -65,6 +65,11 @@ gTypeToType :: GType -> Type
  */
 typeName :: Type -> String
 
+/**
+ * Gives the genType for a type
+ */
+typeGenType :: Type -> GenType
+
 /**
  * Predicate whether the outer type is a builtin type
  */