diff options
| author | Camil Staps | 2023-02-28 20:49:17 +0100 |
|---|---|---|
| committer | Camil Staps | 2023-02-28 20:49:17 +0100 |
| commit | 63d6d6072e95b98f1db963a27e361bb3dafe37b4 (patch) | |
| tree | 5fc189d554c2e148f2f532e99525bb47b29117cd /snug-clean/src/Snug/Compile.dcl | |
| parent | Pass errors using MonadFail, avoid aborts (diff) | |
Remove aborts in Snug.Compile, use MonadFail instead
Diffstat (limited to 'snug-clean/src/Snug/Compile.dcl')
| -rw-r--r-- | snug-clean/src/Snug/Compile.dcl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/snug-clean/src/Snug/Compile.dcl b/snug-clean/src/Snug/Compile.dcl index d329156..9ad66ff 100644 --- a/snug-clean/src/Snug/Compile.dcl +++ b/snug-clean/src/Snug/Compile.dcl @@ -1,5 +1,6 @@ definition module Snug.Compile +from Data.Error import :: MaybeError from Data.Map import :: Map from MIPS.MIPS32 import :: Line @@ -23,6 +24,4 @@ from Snug.Syntax import :: ConstructorDef, :: ConstructorIdent, :: Definition, , type :: !Type } -compile :: !Namespace ![Definition] -> [Line] - -compileDefinition :: !Namespace !Globals !Definition -> [Line] +compile :: !Namespace ![Definition] -> MaybeError String [Line] |