diff options
| author | Akshay <[email protected]> | 2020-10-23 13:33:31 +0100 |
|---|---|---|
| committer | Akshay <[email protected]> | 2020-10-23 13:33:31 +0100 |
| commit | 494078074e5f620f11f72e48d0fc44cff73faaf2 (patch) | |
| tree | 25aea03ceaae5fc3010e1894ae74d6eee0259cb5 /src/Operators.hs | |
| parent | f68c7f7a140127320f9dadc57a3d2a485b86d3df (diff) | |
refactor internal datatypes to Base
- avoids cyclic module dependencies
- cleaner exports to Main module
Diffstat (limited to 'src/Operators.hs')
| -rw-r--r-- | src/Operators.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Operators.hs b/src/Operators.hs index fa39e23..bab888d 100644 --- a/src/Operators.hs +++ b/src/Operators.hs | |||
| @@ -1,8 +1,8 @@ | |||
| 1 | module Operators (primitives) where | 1 | module Operators (primitives) where |
| 2 | 2 | ||
| 3 | import Base | ||
| 3 | import Control.Monad.Except | 4 | import Control.Monad.Except |
| 4 | import Error.Base (LispError (..), LispResult (..)) | 5 | import Error.Base (LispError (..), LispResult (..)) |
| 5 | import Parser | ||
| 6 | 6 | ||
| 7 | primitives :: [(String, [Expr] -> LispResult Expr)] | 7 | primitives :: [(String, [Expr] -> LispResult Expr)] |
| 8 | primitives = map (\(n, f) -> (n, f n)) | 8 | primitives = map (\(n, f) -> (n, f n)) |