diff options
| author | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-19 14:05:36 +0200 |
|---|---|---|
| committer | Einhard Leichtfuß <alguien@respiranto.de> | 2025-05-19 14:05:36 +0200 |
| commit | 1eef63739d9da401bdd4c89da2cfd8d3d9b7acb6 (patch) | |
| tree | 81bcf26963a99d2c23e0535cd2b53f5416996236 /src/Language/SimpleShell/AST/Expr.hs | |
| parent | 1e9e4db59aa48e28ed14fe2498fe5ae940f21e96 (diff) | |
Add Function AST
Diffstat (limited to 'src/Language/SimpleShell/AST/Expr.hs')
| -rw-r--r-- | src/Language/SimpleShell/AST/Expr.hs | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/src/Language/SimpleShell/AST/Expr.hs b/src/Language/SimpleShell/AST/Expr.hs index 0aaf16d..53b33f4 100644 --- a/src/Language/SimpleShell/AST/Expr.hs +++ b/src/Language/SimpleShell/AST/Expr.hs @@ -1,19 +1,12 @@ module Language.SimpleShell.AST.Expr ( Expr(..) , TypedExpr - , VarName - , FunName ) where -import Language.SimpleShell.AST.SimpleType (SimpleType) - -import Data.Text (Text) - - -type VarName = Text -type FunName = Text +import Language.SimpleShell.AST.Name (FunName, VarName) +import Language.SimpleShell.AST.SimpleType (Typed) -- | Pure expression (no side effects). @@ -44,4 +37,4 @@ data Expr | StrCast Expr deriving (Show) -type TypedExpr = (SimpleType, Expr) +type TypedExpr = Typed Expr |