added coercions and explicit functions

it compiles
needs testing
This commit is contained in:
Macocian Adrian Radu
2022-04-16 02:23:33 +03:00
parent de940ca92e
commit 3caea6f18a
7 changed files with 118 additions and 96 deletions

View File

@@ -6,7 +6,7 @@ import PrettyPrinter.Function
import PrettyPrinter.Type
-- |Converts a supported Rosetta object into a haskell valid String
printRosettaObject :: RosettaObject -> String
printRosettaObject (EnumObject a) = printEnum a
printRosettaObject (TypeObject a) = printType a
printRosettaObject (FunctionObject a) = printFunction a
printRosettaObject :: CheckedRosettaObject -> String
printRosettaObject (CheckedEnumObject a) = printEnum a
printRosettaObject (CheckedTypeObject a) = printType a
printRosettaObject (CheckedFunctionObject a) = printFunction a