tree and format

[cleanm.git] / format.dcl

diff --git a/format.dcl b/format.dcl
new file mode 100644 (file)
index 0000000..c0bd3b2
--- /dev/null
+++ b/format.dcl
@@ -0,0 +1,9 @@
+definition module format
+
+from StdOverloaded import class ==
+from Data.Error import :: MaybeError, :: MaybeErrorString
+
+:: FormatString
+
+instance == FormatString
+parseFormat :: [Char] -> MaybeErrorString FormatString