greg/schala
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

More type work

Browse Source
This commit is contained in:
greg 2018-11-08 02:12:01 -08:00
parent 65c47c20fc
commit e9b90412ce
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
schala-lang/language/src/typechecking.rs
View File

@ -28,6 +28,7 @@ enum TConst {
Int,
Float,
StringT,
Bool,
}
impl TConst {
@ -80,12 +81,17 @@ impl TypeContext {
fn infer_expr_type(&mut self, expr_type: &ExpressionType) -> InferResult<MonoType> {
use self::ExpressionType::*;
match expr_type {
NatLiteral(_) => Ok(MonoType::Const(TConst::Nat)),
FloatLiteral(_) => Ok(MonoType::Const(TConst::Float)),
StringLiteral(_) => Ok(MonoType::Const(TConst::StringT)),
_ => Ok(MonoType::Const(TConst::user("unimplemented")))
}
Ok(match expr_type {
NatLiteral(_) => MonoType::Const(TConst::Nat),
FloatLiteral(_) => MonoType::Const(TConst::Float),
StringLiteral(_) => MonoType::Const(TConst::StringT),
BoolLiteral(_) => MonoType::Const(TConst::Bool),
_ => MonoType::Const(TConst::user("unimplemented"))
})
}
fn unify(t1: MonoType, t2: MonoType) -> InferResult<MonoType> {
unimplemented!()
}
}