aboutsummaryrefslogtreecommitdiff
path: root/src/Language/SimpleShell/AST
diff options
context:
space:
mode:
Diffstat (limited to 'src/Language/SimpleShell/AST')
-rw-r--r--src/Language/SimpleShell/AST/Name.hs3
-rw-r--r--src/Language/SimpleShell/AST/SimpleType.hs6
2 files changed, 9 insertions, 0 deletions
diff --git a/src/Language/SimpleShell/AST/Name.hs b/src/Language/SimpleShell/AST/Name.hs
index 69162db..3ca08f4 100644
--- a/src/Language/SimpleShell/AST/Name.hs
+++ b/src/Language/SimpleShell/AST/Name.hs
@@ -9,6 +9,9 @@ where
import Data.Text (Text)
+-- TODO: Replace type aliases by proper types.
+
+
type VarName = Text
type FunName = Text
diff --git a/src/Language/SimpleShell/AST/SimpleType.hs b/src/Language/SimpleShell/AST/SimpleType.hs
index a919529..6c2f916 100644
--- a/src/Language/SimpleShell/AST/SimpleType.hs
+++ b/src/Language/SimpleShell/AST/SimpleType.hs
@@ -2,10 +2,14 @@ module Language.SimpleShell.AST.SimpleType
( SimpleType(..)
, Typed
, FunSig
+ , ProcedureSig
)
where
+-- TODO: Replace type aliases by proper types.
+
+
data SimpleType
= IntType
| StrType
@@ -15,3 +19,5 @@ data SimpleType
type Typed a = (SimpleType, a)
type FunSig = (SimpleType, [SimpleType])
+
+type ProcedureSig = (SimpleType, [SimpleType])