aboutsummaryrefslogtreecommitdiff
path: root/src/type/mod.rs
blob: 5e7076aa7feef58a1bc1f6613fee2001aea3ab5d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43


pub mod util;
pub mod display;
pub mod check;


use crate::sexp::SExp;


#[derive(Clone,Debug,PartialEq)]
pub enum Type {

    Integer,

    Arrow(Box<Type>, Box<Type>),

    List(Vec<Type>),

    UndefinedType, // only for errors

}


#[derive(Debug,PartialEq)]
pub enum TypeError {

    UndefinedVariable(String),

    InvalidOperator {
	operator: SExp,
	expected: Type,
	found:    Type,
    },

    InvalidArgList {
	arglist:  SExp,
	expected: Type,
	found:    Type,
    },

    OtherError
}