diff options
Diffstat (limited to 'sucl/absmodule.dcl')
-rw-r--r-- | sucl/absmodule.dcl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/sucl/absmodule.dcl b/sucl/absmodule.dcl index 2cf9a35..ccea9f3 100644 --- a/sucl/absmodule.dcl +++ b/sucl/absmodule.dcl @@ -5,11 +5,11 @@ definition module absmodule from rule import Rule :: Module sym pvar tsym tvar - = { exportedtypesymbols :: [tsym] // Exported type symbols (from DCL) - , typealias :: [(tsym,Rule tsym tvar)] // Alias types - , typeconstructors :: [(tsym,[sym])] // All constructor symbols of each declared algebraic type - , exportedsymbols :: [sym] // Exported function/constructor symbols - , aliases :: [(sym,Rule sym pvar)] // Macros - , typerules :: [(sym,Rule tsym tvar,[Bool])] // Info from type rules (actual type and argument strictnesses) - , rules :: [(sym,[Rule sym pvar])] // Rewrite rules of each symbol, absent if imported + = { exportedtypesymbols :: [tsym] // Exported type symbols (from DCL) + , typealias :: [(tsym,Rule tsym tvar)] // Alias types + , typeconstructors :: [(tsym,[sym])] // All constructor symbols of each declared algebraic type + , exportedsymbols :: [sym] // Exported function/constructor symbols + , aliases :: [(sym,Rule sym pvar)] // Macros + , typerules :: [(sym,(Rule tsym tvar,[Bool]))] // Info from type rules (actual type and argument strictnesses) + , rules :: [(sym,[Rule sym pvar])] // Rewrite rules of each symbol, absent if imported } |