cleanup gentype

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

diff --git a/gengen/Data/GenType.icl b/gengen/Data/GenType.icl
index 3cdb60d..951b3f4 100644 (file)
--- a/gengen/Data/GenType.icl
+++ b/gengen/Data/GenType.icl
@@ -334,8 +334,8 @@ predef =:
        , ("_!List!", "[!!]"), ("_!Cons!", "(:)"), ("_!Nil!", "[ !]")
        , ("_#List", "[#]"), ("_#Cons", "(:)"), ("_#Nil", "[#]")
        , ("_#List!", "[#!]"), ("_#Cons!", "(:)"), ("_#Nil!", "[#!]")
-       , ("_!Maybe", "?"), ("_!Just", "?Just"), ("_!None", "?None")
-       , ("_Maybe", "?^"), ("_Just", "?^Just"), ("_None", "?^None")
+       , ("_!Maybe", "?"), ("_!Just", "?Just"), ("_!Nothing", "?None")
+       , ("_Maybe", "?^"), ("_Just", "?^Just"), ("_Nothing", "?^None")
        , ("_Array", "{}"), ("_!Array", "{!}"), ("_#Array", "{#}"), ("_32#Array", "{32#}")
        , ("_Unit", "()")
        :[("_Tuple" +++ toString i, "(" +++ createArray i ',' +++")")\\i<-[2..32]]]